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

各位高手，请教下我想在出货开单的时候想知道这个型号的地板的各个批次的地板实时库存多少，我利用出库明细，入库明细，退货明细，参考狐表组合统计结合我的项目写了如下代码：

Dim bd1 As New GroupTableBuilder("统计表1",DataTables("成品入库明细表"))

Dim dt1 As fxDataSource

bd1.Groups.AddDef("地板型号") '根据型号分组

bd1.Groups.AddDef("批次")

bd1.Totals.AddDef("计算件数","入库件数") '对数量进行统计

dt1 = bd1.BuildDataSource()

Dim bd2 As New GroupTableBuilder("统计表2",DataTables("成品出库明细表"))

Dim dt2 As fxDataSource

bd2.Groups.AddDef("地板型号") '根据型号分组

bd1.Groups.AddDef("批次")

bd2.Totals.AddDef("计算件数","出库件数") '对数量进行统计

dt2 = bd2.BuildDataSource()

Dim bd3 As New GroupTableBuilder("统计表3",DataTables("退货明细表"))

Dim dt3 As fxDataSource

bd3.Groups.AddDef("地板型号") '根据型号分组

bd1.Groups.AddDef("批次")

bd3.Totals.AddDef("退货件数","退货件数") '对数量进行统计

dt3 = bd3.BuildDataSource()

dt1.Combine("地板型号",dt2,"地板型号") '将销售统计数据组合到进货统计数据

dt1.Combine("地板型号",dt3,"地板型号") '将退货统计数据组合到进货统计数据

Tables("批次库存_Table1").DataSource = dt1 '将统计结果绑定到Table

With DataTables("批次库存_Table1").DataCols '用表达式列计算库存数据

.Add("库存件数",Gettype(Integer), "IsNull([入库件数],0) + ISNULL([退货件数],0) - ISNULL([出库件数],0)")

End With

Tables("批次库存_Table1").Filter =" 地板型号 ='" & Tables("成品出库明细表").Current("地板型号") & "'"

Tables("批次库存_Table1").Sort = "批次"

结果：型号和批次分组没问题了入库统计也是按照型号对应的批次累计的，可出库和退货却只是不分批次的累计到第一行的入库上，其他批次显示空值，这是为什么，求解

可是我也这样改过了这个会出现警告对话框

O(∩_∩)O谢谢回复：”有点甜“代码和”狐爸“的指示的修改代码貌似不一样

不管我是按照狐爸的回复代码全复制还是按照“有点甜”大师的修改均出现上述警告框，特上传附件，请赐教指点一二，

我的流程是在成品出库主表的关联明细表上，新增地板明细----输入型号--点击查看单元格 --跳出批次库存窗口，显示该型号的各批次库存情况，（这个是之前我做的但问题所在），另还希望能跳出的统计表上，我点击想要的出货型号的批次列和库存数量列，能赋值给关联明细表的批次列和计算件数列（默认全部）上，我再把库存数字修改成我要出库的计算件数列。后面红色部分看看能不能实现？不胜感激涕零！

下载信息 [文件大小：下载次数： ]
点击浏览该文件:地板生产进销存管理系统.table

回复lsy老师：再次感谢老师指点！

1. 实时库存是最初想做的，后来要求批次管理，按照批次出货，开发版的时候会删除。

2，打个比方：客户要201的150件+10片，明细表开单时候输入201型号，统计表查出201这个型号的地板有：A批次库存件数地板200件，B批次地板50件，（怕地板色差等原因）我就把统计表出现201的A批次的地板200件“行”点击鼠标后，把批次（A）赋值给明细表”批次“列，把200赋值给明细表”计算件数“列，我再把他修改成150.5件我用表达式算出件数片数(150件+10片），出库单给客户看的要的是这个单位（型号，件数，片数，计算面积）

3.以后某个型号的每个批次的很多行，再求个不显示库存件数小于0.5大于0的库存件数代码来（就是这个批次都发完了后，剩余一点点就不显示了，免得统计表老长）

O(∩_∩)O谢谢回复：

这个是知道的，但是我们生产线上的工序，工人结算工资等纸箱损耗等都是用到件数，在地板生产管理上件数还是实用的，

再求lsy 老师我在 9楼的第2。3点解决方案，如果第2点是统计表不能编辑点击赋值的话，我可以手工输入，最好第3点帮我解决下在狐爸的代码上给我加上代码 O(∩_∩)O谢谢

主题：型号批次 组合统计问题

主题：型号批次组合统计问题