以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 组合统计结果  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=84995)
--  作者：zcgmxf
--  发布时间：2016/5/15 7:21:00
--  [求助] 组合统计结果

老师，下面的组合统计结果代码，只有一个分组。能否加入一个药品名称的分组或更多的分组？谢谢！

 

Dim bd1 As New GroupTableBuilder("统计表1",DataTables("门诊疫苗药品入库表"))
Dim dt1 As fxDataSource

bd1.Groups.AddDef("药品名称") \'根据型号分组
bd1.Groups.AddDef("药品批号") \'根据型号分组
bd1.Totals.AddDef("数量","进货_数量") \'对数量进行统计
bd1.Totals.AddDef("金额","进货_金额") \'对金额进行统计
dt1 = bd1.BuildDataSource()

 

Dim bd2 As New GroupTableBuilder("统计表2",DataTables("门诊疫苗药品出库表"))
Dim dt2  As fxDataSource

bd2.Groups.AddDef("疫苗药品名称") \'根据型号分组
bd2.Groups.AddDef("批号") \'根据型号分组
bd2.Totals.AddDef("数量","销售_数量") \'对数量进行统计
bd2.Totals.AddDef("金额","销售_金额") \'对金额进行统计
dt2 = bd2.BuildDataSource()

 

Dim nms As String() = {"药品名称","药品批号"} \'指定连接列

dt1.Combine(nms,dt2,nms) \'将销售统计数据组合到进货统计数据
Tables("门诊疫苗库存查询_Table1").DataSource = dt1 \'将统计结果绑定到Table
With DataTables("门诊疫苗库存查询_Table1").DataCols  \'用表达式列计算库存数据
    .Add("库存_数量",Gettype(Integer), "IsNull([进货_数量],0) - ISNULL([销售_数量],0)")
    .Add("库存_金额",Gettype(Double), "[库存_数量] /[进货_数量] * [进货_金额]")
End With

 

提示“：

.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2016.5.13.1
错误所在事件：窗口,门诊疫苗库存查询,Button1,Click
详细错误信息：
列“药品名称”不属于表 。

[此贴子已经被作者于2016/5/15 9:18:14编辑过]
--  作者：zcgmxf
--  发布时间：2016/5/15 9:38:00
--  

一项分组列名不同没问题，多个分组时是不是要求所有列名都必须相同？

 

已解决

[此贴子已经被作者于2016/5/15 9:47:15编辑过]
--  作者：大红袍
--  发布时间：2016/5/15 22:45:00
--  

不一样也可以。

 

Dim nms1 As String() = {"药品名称","药品批号"} \'指定连接列
Dim nms2 As String() = {"疫苗药品名称","批号"} \'指定连接列

dt1.Combine(nms1, dt2, nms2) \'将销售统计数据组合到进货统计数据