Foxtable(狐表)用户栏目专家坐堂 → [求助]组合多个统计结果的问题


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

主题:[求助]组合多个统计结果的问题

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


加好友 发短信
等级:幼狐 帖子:180 积分:1669 威望:0 精华:0 注册:2014/8/24 19:22:00
[求助]组合多个统计结果的问题  发帖心情 Post By:2022/1/13 12:30:00 [显示全部帖子]

C r o ssTableBuild e r统计出来的表和GroupTableBui lde r 统计出来的表可以组合吗?
[此贴子已经被作者于2022/1/13 12:49:54编辑过]

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


加好友 发短信
等级:幼狐 帖子:180 积分:1669 威望:0 精华:0 注册:2014/8/24 19:22:00
  发帖心情 Post By:2022/1/13 13:38:00 [显示全部帖子]

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.CommandText = "Se lect  {main_proj}.年度,单位编号,单位名称,{main_proj}.部门编号,部门名称,{main_proj}.项目编号,项目名称,[项目类型_类编号],[项目类型_类名称],[项目类型_款编号],[项目类型_款名称],[项目类型_项编号],[项目类型_项名称],[功能分类_类编号],[功能分类_类名称],[功能分类_款编号],[功能分类_款名称],[功能分类_项编号],[功能分类_项名称],明细项目编号,明细项目名称,[经济分类_类编号],[经济分类_类名称],[经济分类_款编号],[经济分类_款名称],政府采购,政府购买服务,财政拨款,上级拨款,其他收入,上年结余,预算类型 From {de_proj} Inner JOIN {main_proj} ON {main_proj}.[项目编号] = {de_proj}.[项目编号]"
dt = cmd.ExecuteReader()
Dim g1 As New CrossTableBuilder("统计表1", dt)
g1.HGroups.AddDef("年度")
g1.HGroups.AddDef("单位编号")
g1.HGroups.AddDef("单位名称")
g1.HGroups.AddDef("部门编号")
g1.HGroups.AddDef("部门名称")
g1.HGroups.AddDef("项目编号")
g1.HGroups.AddDef("项目名称")
g1.HGroups.AddDef("项目类型_类编号")
g1.HGroups.AddDef("项目类型_类名称")
g1.HGroups.AddDef("项目类型_款编号")
g1.HGroups.AddDef("项目类型_款名称")
g1.HGroups.AddDef("项目类型_项编号")
g1.HGroups.AddDef("项目类型_项名称")
g1.HGroups.AddDef("功能分类_类编号")
g1.HGroups.AddDef("项目类型_类名称")
g1.HGroups.AddDef("功能分类_款编号")
g1.HGroups.AddDef("功能分类_款名称")
g1.HGroups.AddDef("功能分类_项编号")
g1.HGroups.AddDef("功能分类_项名称")
g1.HGroups.AddDef("明细项目编号")
g1.HGroups.AddDef("明细项目名称")
g1.HGroups.AddDef("经济分类_类编号")
g1.HGroups.AddDef("经济分类_类名称")
g1.HGroups.AddDef("经济分类_款编号")
g1.HGroups.AddDef("经济分类_款名称")
g1.HGroups.AddDef("政府采购")
g1.HGroups.AddDef("政府购买服务")
g1.VGroups.AddDef("预算类型")
g1.Totals.AddDef("财政拨款", "财政拨款")
g1.Totals.AddDef("上级拨款", "上级拨款")
g1.Totals.AddDef("其他收入", "其他收入")
g1.Totals.AddDef("上年结余", "上年结余")
g1.HorizontalTotal = True
g1.Build()

Dim g2 As New GroupTableBuilder("统计表2", DataTables("zcmx"))
g2.Groups.AddDef("明细项目编号")
g2.Totals.AddDef("财政拨款","财政拨款支出")
g2.Totals.AddDef("上级拨款","上级拨款支出")
g2.Totals.AddDef("其他收入","其他收入支出")
g2.Totals.AddDef("上年结余","上年结余支出")
g2.Build()


Dim dt1 As fxDataSource=g1.BuildDataSource()
Dim dt2 As fxDataSource= g2.BuildDataSource()
dt1.Combine("明细项目编号",dt2," 明细项目编号")
dt1.Show("统计表1")

[此贴子已经被作者于2022/1/13 16:21:32编辑过]

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


加好友 发短信
等级:幼狐 帖子:180 积分:1669 威望:0 精华:0 注册:2014/8/24 19:22:00
  发帖心情 Post By:2022/1/13 13:40:00 [显示全部帖子]

以上代码,报错
图片点击可在新窗口打开查看此主题相关图片如下:错误.jpg
图片点击可在新窗口打开查看

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


加好友 发短信
等级:幼狐 帖子:180 积分:1669 威望:0 精华:0 注册:2014/8/24 19:22:00
  发帖心情 Post By:2022/1/13 13:46:00 [显示全部帖子]

发现一个问题,按照上面代码,形成的“统计表1”中的列类型原本“文本”的变成了“备注型”
[此贴子已经被作者于2022/1/13 16:25:14编辑过]

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


加好友 发短信
等级:幼狐 帖子:180 积分:1669 威望:0 精华:0 注册:2014/8/24 19:22:00
  发帖心情 Post By:2022/1/13 13:49:00 [显示全部帖子]

统计表1"明细项目编号"类型是备注型,统计表2"明细项目编号"类型是文本,是不是就没法组合了

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


加好友 发短信
等级:幼狐 帖子:180 积分:1669 威望:0 精华:0 注册:2014/8/24 19:22:00
  发帖心情 Post By:2022/1/13 16:14:00 [显示全部帖子]

确认了,真实列名为明细项目编号,去掉g1.Build()和g2.Build()还是报错
[此贴子已经被作者于2022/1/13 16:25:33编辑过]

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


加好友 发短信
等级:幼狐 帖子:180 积分:1669 威望:0 精华:0 注册:2014/8/24 19:22:00
  发帖心情 Post By:2022/1/13 16:25:00 [显示全部帖子]

2个统计表都能够正确生成,就是组合不行
[此贴子已经被作者于2022/1/13 16:24:49编辑过]

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


加好友 发短信
等级:幼狐 帖子:180 积分:1669 威望:0 精华:0 注册:2014/8/24 19:22:00
  发帖心情 Post By:2022/1/13 16:49:00 [显示全部帖子]

找到错误了,自己粗心了,多了个空格

 回到顶部