主题：库存统计

此主题相关图片如下：123.png

 

库存统计，我想这样实现，选择了本月之后，点查询出来库存统计结果，这个库存明细表分别从进货单、出货单、调拨单里提取数据，库存明细表内容包括进货、调入、出货、调出、期初、期末 ，点上个月、上上月查询出对应的数据。分类查询 包括库房、商品类别。这个库房、商品类别的代码，是全部写在查询代码里，还是待查询结果出来了，通过目录树筛选库存的统计结果。这个想了好长时间，也还没有做出来，请老师指点指点

 

参考：http://www.foxtable.com/webhelp/scr/2320.htm

Dim bd1 As New GroupTableBuilder("统计表1",DataTables("进货单明细表"))
Dim dt1 As fxDataSource
bd1.Groups.AddDef("收货仓库","库房名称")
bd1.Groups.AddDef("品牌名称")
bd1.Groups.AddDef("商品类别")
bd1.Groups.AddDef("商品编号")
bd1.Groups.AddDef("商品名称")
bd1.Groups.AddDef("规格")
bd1.Groups.AddDef("型号") '根据型号分组
bd1.Groups.AddDef("方向")
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("出货仓库","库房名称")
bd2.Groups.AddDef("品牌名称")
bd2.Groups.AddDef("商品类别")
bd2.Groups.AddDef("商品编号")
bd2.Groups.AddDef("商品名称")
bd2.Groups.AddDef("规格")
bd2.Groups.AddDef("型号") '根据型号分组
bd2.Groups.AddDef("方向")
bd2.Groups.AddDef("色号")
bd2.Groups.AddDef("单位")
bd2.Totals.AddDef("数量","出货数量") '对数量进行统计
dt2 = bd2.BuildDataSource()
Dim bd3 As New GroupTableBuilder("统计表3",DataTables("调拨单明细表"))
Dim dt3 As fxDataSource
bd3.Groups.AddDef("源仓库","库房名称")
bd3.Groups.AddDef("收货仓库","库房名称")
bd3.Groups.AddDef("品牌名称")
bd3.Groups.AddDef("商品类别")
bd3.Groups.AddDef("商品编号")
bd3.Groups.AddDef("商品名称")
bd3.Groups.AddDef("规格")
bd3.Groups.AddDef("型号") '根据型号分组
bd3.Groups.AddDef("方向")
bd3.Groups.AddDef("色号")
bd3.Groups.AddDef("单位")
bd3.Totals.AddDef("数量","调入数量") '对数量进行统计
bd3.Totals.AddDef("数量","调出数量") '对数量进行统计
dt3 = bd3.BuildDataSource()
Dim nms As String() = {"库房名称","品牌名称","商品类别","商品编号","商品名称","规格","型号","方向","色号","单位"} '指定连接列
dt1.Combine(nms,dt2,nms) '将销售统计数据组合到进货统计数据
dt1.Combine(nms,dt3,nms)
Tables("库存统计_Table1").DataSource = dt1 '将统计结果绑定到Table
With DataTables("库存统计_Table1").DataCols  '用表达式列计算库存数据
'Dim d As Date = e.Form.Controls("StartDate").value
'If d = Nothing Then
    'd = Date.today
'End If
'Dim ds1 As New Date(d.year, d.month, 1)
'Dim ds2 As Date = dt1.adddays(-1)
'ds1 = ds1.addmonths(-1)
.Add("期初数量",Gettype(Integer))
    .Add("期末数量",Gettype(Integer), "IsNull([期初数量],0) + IsNull([进货数量],0) - ISNULL([出货数量],0) + ISNULL([调入数量],0) - ISNULL([调出数量],0)")
End With

 

 

老师，我想实现功能：库存统计表的“期初数量”等于上个月的“期末数量”，如果初次使用系统，“期初数量”= 0，还有就是调拨单，有 “源仓库”，“收货仓库”，可是现在的结果出来是一个仓库 “调入数量”，“调出数量”都显示出来，应该是比如 总库向商场调拨数据，那么总库数据行 显示调出数量，商场数据行显示调出 ，请教了

参考

 

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=100043&authorid=0&page=0&star=1

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=108344&skin=0

 

 

老师，我想统计库存就上面这个效果，我采用临时统计表的方法，那个对单库房的统计结果可以，现在我这是多个库房，统计还有问题，那个例子代码还没有研究明白，现在的问题是仓库调拨单，要实现这个调入调出数量正确，我觉得应该是录入调拨保存的时候，同时生成仓库调入单、和仓库调出单，我想的这个逻辑对吗，

这个保存一张单据的时候，在同时生成别的的单据，这个怎么写代码，请老师给个例子吧

 

对应的项目，你做一个可以测试的实例发上来。说明最后需要做到的效果。

请老师看一下

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:新建文件夹.rar

 

请老师帮忙了

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:1.txt

老师，很感谢你。可现在还要问题，就是库存的期初数没有，看12月份的时候，库存的期初数要取11月份的期末数，还得再麻烦你，这个怎么取呀