Foxtable(狐表)用户栏目专家坐堂 → 组合统计查询求助


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

主题:组合统计查询求助

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


加好友 发短信
等级:童狐 帖子:250 积分:2089 威望:0 精华:0 注册:2014/3/25 14:24:00
组合统计查询求助  发帖心情 Post By:2022/5/27 17:30:00 [只看该作者]

数据库有张视图  保存着库存信息    库存表(SKU,可出库数)

我想在下单的时候确定是否有库存,生成一张统计表

SKU,待出库数,可出库数,剩余库存(可出库数-待出库数)

Dim cmd As new SQLCommand
cmd.C
cmd.CommandText = "Select * From {出库单} Where [_Identify] IS NULL"
Dim dt As DataTable = cmd.ExecuteReader(True)
Dim dr As DataRow = dt.AddNew()
dr("SKU") = "001"
dr("待出库数") = 30
dr = dt.AddNew()
dr("SKU") = "001"
dr("待出库数") = 40

Dim b As New SQLGroupTableBuilder("统计表1",dt)
b.C
b.AddTable(dt,"SKU","库存表","SKU") '添加统计表
b.Groups.AddDef("SKU") '根据产品名称分组
b.Groups.AddDef("可出库数")
b.Totals.AddDef("待出库数") '对数量进行统计
b.Build '生成统计表
MainTable = Tables("统计表1") '打开生成的统计表


但这样报错 dt 不是表名
老师有没有更好的实现方式

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


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/27 17:33:00 [只看该作者]

Dim b As New SQLGroupTableBuilder("统计表1",“出库单”)
b.C
b.AddTable(出库单”,"SKU","库存表","SKU") '添加统计表
b.Groups.AddDef("SKU") '根据产品名称分组
b.Groups.AddDef("可出库数")
b.Totals.AddDef("待出库数") '对数量进行统计
b.Build '生成统计表
MainTable = Tables("统计表1") '打开生成的统计表
[此贴子已经被作者于2022/5/27 17:33:32编辑过]

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


加好友 发短信
等级:童狐 帖子:250 积分:2089 威望:0 精华:0 注册:2014/3/25 14:24:00
  发帖心情 Post By:2022/5/27 17:43:00 [只看该作者]

老师您好   这个出库单还未生成  所以才从sql生成个空表

我需要把库存数据回填虚拟出来的dt

我在遍历dt

dim 库存充足 as boolen = true

for each dr as datarow in dt.datarows
if dr("可出库数") - dr("待出库数") < 0 then
库存充足 = false
endif
next

msgbox(库存充足)

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


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/28 8:37:00 [只看该作者]

没看懂。请使用具体的表格和数据,截图举例说明问题

 回到顶部