Foxtable(狐表)用户栏目专家坐堂 → 关于跨表多行合并代码问题


  共有5297人关注过本帖树形打印复制链接

主题:关于跨表多行合并代码问题

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/4/13 8:49:00 [显示全部帖子]

产品少可以这样,如果有几十上百个,这个功能不是合理的用法。作为一个数据库软件,也不应该这样存储数据,这样出报表倒是可以理解。但是数据存储和数据展示是2种不同的概念,尽量分开处理

如果要做,大概:订单表datacolchanged事件

select case e.datacol.name
case "编号"
dim s as string
for each dr as datarow = datatables("订单明细").select("编号='" & e.datarow("编号") & "'")
s = s & "," & dr("产品名称")  & “(” & dr("数量") & “)”
next
e.datarow("订单详情") = s
end select


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/4/13 9:18:00 [显示全部帖子]

for each dr as datarow in datatables("订单明细").......

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/4/13 9:30:00 [显示全部帖子]

e.datarow("订单详情") = s.trim(",")

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/4/21 10:51:00 [显示全部帖子]

如果有安装wps,参考:http://www.foxtable.com/webhelp/topics/3735.htm

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/4/21 11:20:00 [显示全部帖子]

我使用内置的示例项目“execl报表”测试没有任何问题哦。您试试

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/4/22 9:49:00 [显示全部帖子]

模板文件发上来

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/5/4 8:40:00 [显示全部帖子]

……

       Dim s As String

        For Each s As string In {"户主","妻子","女儿"}

dim dr as datarow = DataTables("家庭人口表").find("户主编号='" & e.DataRow("户主编号") & "' and 与户主关系='" & s & "'")

if dr isnot nothing then

            s = s & "," & dr("姓名") & “(” & s & “)”

end if

        Next

……


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/5/4 9:06:00 [显示全部帖子]

把需要的顺序放到下面数组即可,比如增加一个儿子

{"户主","妻子","女儿","儿子"}

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/5/4 10:03:00 [显示全部帖子]

都按需要的顺序添加到数组里

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/5/4 10:22:00 [显示全部帖子]

都排到后面就行了啊

{"户主", "妻子", "女儿", "儿子","关系a",“关系b”,...............}

 回到顶部
总数 15 1 2 下一页