库存统计 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 库存统计

共有1995人关注过本帖树形打印复制链接主题：库存统计

dengk03

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：童狐帖子：205 积分：1969 威望：0 精华：0 注册：2017/8/17 12:59:00

库存统计

Post By：2019/8/8 14:17:00 [显示全部帖子]

现在有一个出入库表，里面记录所有的出入库流水账

想实现以下几个功能

1.查询当前库存

2.盘库，对照实际库存，对理论库存进行修正，比如A货物当前库存显示为10吨，实际为9吨，则记录下库存减少1吨的信息，并录入到出入库表中。

请教如何实现以上功能？是建立一个临时表么？

dengk03

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：童狐帖子：205 积分：1969 威望：0 精华：0 注册：2017/8/17 12:59:00

Post By：2019/8/8 14:37:00 [显示全部帖子]

如何建立分组查询？sql么？然后用什么语句绑定到窗口表？

dengk03

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：童狐帖子：205 积分：1969 威望：0 精华：0 注册：2017/8/17 12:59:00

Post By：2019/8/8 17:01:00 [显示全部帖子]

Dim b As New GroupTableBuilder("库存",DataTables("出入库"))

b.filter = "货物类型 = '成品' AND 库名 = '" & str & "'"

b.Groups.AddDef("货物编号") '添加客户列用于分组

b.Groups.AddDef("货物名称") '添加产品列用于分组

b.Totals.AddDef("数量") '添加数量列用于统计

b.Groups.AddDef("单位") '添加产品列用于分组

b.Build '生成统计表

DataTables("库存").DataCols.Add("修正数量",Gettype(Double))

Tables("库存管理_table1").datasource = DataTables("库存")

想直接在这个表上进行库存盘点和修改，这样写能运行，但是马上就报错，应该是datatable自动销毁？那这里该怎么处理？

主题：库存统计