-- [求助]SQLGroupTableBuilder 统计结果绑定表时报错
绑定统计结果时提示我找不到Tables("库存查询_库存");
Dim b As New SQLGroupTableBuilder("表1","入库明细")
Dim tb1 As fxDataSource
b.C
b.AddTable("入库明细","商品代码","商品资料","商品代码") \'添加统计表
b.Groups.AddDef("{入库明细}.商品代码") \'根据产品名称分组
b.Groups.AddDef("商品名称") \'根据产品名称分组
b.Groups.AddDef("规格型号") \'根据产品名称分组
b.Groups.AddDef("生产批次") \'根据产品名称分组
b.Groups.AddDef("有效效期",DateGroupEnum.None) \'根据产品名称分组
b.Groups.AddDef("生产日期",DateGroupEnum.None) \'根据产品名称分组
b.Groups.AddDef("仓库") \'根据产品名称分组
b.Groups.AddDef("单位名称","供货单位") \'根据产品名称分组
b.Totals.AddDef("数量","入库数量") \'对数量进行统计
TB1 = b.BuildDataSource()
Dim c As New SQLGroupTableBuilder("表2","出库明细")
Dim tb2 As fxDataSource
c.C
c.Groups.AddDef("{出库明细}.商品代码") \'根据产品名称分组
c.Groups.AddDef("生产批次") \'根据产品名称分组
c.Groups.AddDef("有效效期",DateGroupEnum.None) \'根据产品名称分组
c.Groups.AddDef("生产日期",DateGroupEnum.None) \'根据产品名称分组
c.Groups.AddDef("仓库") \'根据产品名称分组
c.Groups.AddDef("供货单位") \'根据产品名称分组
c.Totals.AddDef("数量","出库数量") \'对数量进行统计
TB2 = c.BuildDataSource()
Dim nms() As String = {"商品代码","生产批次","有效效期","生产日期","仓库","供货单位"}
TB1.Combine(nms,TB2,nms) \'将销售统计数据组合到进货统计数据
Tables("库存查询_库存").DataSource = TB1 \'将统计结果绑定到Table
With DataTables("库存查询_库存").DataCols \'用表达式列计算库存数据
.Add("库存数",Gettype(Integer), "IsNull([入库数量],0) - ISNULL([出库数量],0)")
End With
[此贴子已经被作者于2020/2/27 17:24:21编辑过]