以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  跨表引用的自动更新  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=121043)
--  作者：有点甜
--  发布时间：2018/6/28 9:05:00
--  

datarowdeleted事件重置列

 

http://www.foxtable.com/webhelp/scr/1587.htm

 
--  作者：有点甜
--  发布时间：2018/6/28 16:05:00
--  

改成

 

e.DataRow("已交数量") = val(DataTables("出库明细表").Compute("Sum(实交数量)",filter ))
--  作者：有点甜
--  发布时间：2018/6/28 16:42:00
--  

订单明细表 datarowdeleting事件

 

vars("filter") = "客户名称=\'" & e.DataRow("客户名称")  & "\' and 订单编号=\'" & e.DataRow("订单编号")  & "\'"

 

订单明细表 datarowdeleted事件

 

DataTables("订单主表").DataCols("订单编号").RaiseDataColChanged(vars("filter"))
--  作者：有点甜
--  发布时间：2018/6/29 8:39:00
--  

订单明细表 datarowdeleting事件
vars("filter1") = "客户名称=\'" & e.DataRow("客户名称")  & "\' and 订单编号=\'" & e.DataRow("订单编号")  & "\'"
vars("filter2") = "客户名称=\'" & e.DataRow("物料编号")  & "\' and 物料编号=\'" & e.DataRow("物料编号")  & "\'and 版本号=\'" & e.DataRow("版本号")  & "\'and 物料名称=\'" & e.DataRow("物料名称")  & "\'"


订单明细表 datarowdeleted事件
DataTables("订单主表").DataCols("订单编号").RaiseDataColChanged(vars("filter1"))
DataTables("入库主表").DataCols("物料编号").RaiseDataColChanged(vars("filter2"))
--  作者：有点甜
--  发布时间：2018/6/29 12:00:00
--  
出库主表，DataColchanged事件
 
Select Case e.DataCol.name
    Case "已对账", "关联列"
        DataTables("表B").ReplaceFor("已对账",e.DataRow("已对账"),"关联列=\'" & e.DataRow("关联列") & "\'")
End Select
--  作者：有点甜
--  发布时间：2018/6/29 13:59:00
--  
以下是引用min1979在2018/6/29 12:28:00的发言：
谢谢！出库主表：
 
已对账列可以勾选，但对账单列不起作用，请问老师是不是我那个环节出了问题，谢谢！

 

什么意思？你对账单列要什么效果？
--  作者：有点甜
--  发布时间：2018/6/29 17:29:00
--  
Select Case e.DataCol.name
    Case "对账单", "编号"
        DataTables("表B").ReplaceFor("对账单",e.DataRow("对账单"),"编号=\'" & e.DataRow("编号") & "\'")
End Select