- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]统计 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=84514)
-- 发布时间：2016/5/4 11:07:00
-- [求助]统计
老师好
Select Case e.DataCol.Name
Case "入库单编号明细","入库批次号"
Dim filter As String = "入库批次号 = \'" & e.DataRow("入库单编号明细") & "\' and 批次号 = \'" & e.DataRow("批次号") & "\'"
e.DataRow("库存") = DataTables("出库明细").Compute("sum(出库_数量)", filter)
End Select
我要求入库明细表的库存列直接得出每批次的库存数量。库存 = 入库-销售 上面的代码望老师帮忙修改。
-- 发布时间：2016/5/4 11:10:00
--
Select Case e.DataCol.Name
Case "入库单编号明细","入库批次号"
Dim filter As String = "入库批次号 = \'" & e.DataRow("入库单编号明细") & "\' and 批次号 = \'" & e.DataRow("批次号") & "\'"
e.DataRow("库存") = e.DataTable.Compute("sum(数量)", filter) - DataTables("出库明细").Compute("sum(出库_数量)", filter)
End Select
-- 发布时间：2016/5/4 11:20:00
--
以下是引用大红袍在2016/5/4 11:10:00的发言：
Select Case e.DataCol.Name
Case "入库单编号明细","入库批次号"
Dim filter As String = "入库批次号 = \'" & e.DataRow("入库单编号明细") & "\' and 批次号 = \'" & e.DataRow("批次号") & "\'"
e.DataRow("库存") = e.DataTable.Compute("sum(数量)", filter) - DataTables("出库明细").Compute("sum(出库_数量)", filter)
End Select
老师，代码报错
-- 发布时间：2016/5/4 11:24:00
--
此主题相关图片如下：图像 1.png
-- 发布时间：2016/5/4 11:26:00
--
Select Case e.DataCol.Name
Case "入库单编号明细","入库批次号"
Dim filter As String = "入库批次号 = \'" & e.DataRow("入库单编号明细") & "\' and 批次号 = \'" & e.DataRow("批次号") & "\'"
e.DataRow("库存") = e.DataRow("数量") - DataTables("出库明细").Compute("sum(出库_数量)", filter)
End Select
-- 发布时间：2016/5/4 11:43:00
--
谢谢老师
怎样在窗口控件绑定的表中过滤掉库存列为零的行
-- 发布时间：2016/5/4 11:44:00
--
e.Form.Controls("Table1").Table.Filter = "库存 > 0"
-- 发布时间：2016/5/4 12:21:00
--
老师，希望出库明细表数量列发生变化后及时触发入库明细表的库存列让其迅速调整库存数据。
-- 发布时间：2016/5/4 12:22:00
--
参考
http://www.foxtable.com/help/topics/1587.htm
-- 发布时间：2016/5/5 18:04:00
--
老师，求：数据列发生变化能重置编号明细列。