此主题相关图片如下:20191024221009.png
新建了个调拨单表,里面有2个仓库列,不知道如何关联了,其他表都是一个仓库列,库存表如何把调拨单表的数据整合到库存表计算了,麻烦老师指导下
库存表计算代码:
Dim nms As String() = {"仓库","商品编号","商品名称","规格","单位"} '指定连接列
dt1.Combine(nms,dt2,nms)
dt1.Combine(nms,dt3,nms)
Tables("实时库存_Table1").DataSource = dt1 '将统计结果绑定到Table
With DataTables("实时库存_Table1").DataCols '用表达式列计算库存数据
.Add("实时库存_数量",Gettype(Double), "IsNull([累计进货_数量],0) + IsNull([期初_库存],0) - IsNull([累计出库_数量],0)")
.Add("实时库存_金额",Gettype(Double), "iif([实时库存_数量]=0 Or [累计进货_数量]=0 Or [累计进货_金额]=0,0,IsNull([实时库存_数量],0) / IsNull([累计进货_数量],0) * IsNull([累计进货_金额],0))")
End With