Foxtable(狐表)用户栏目专家坐堂 → 跨表引用


  共有178人关注过本帖树形打印复制链接

主题:跨表引用

帅哥哟,离线,有人找我吗?
g1j2h3
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:296 积分:3749 威望:0 精华:0 注册:2016/4/30 10:41:00
跨表引用  发帖心情 Post By:2024/4/25 13:03:00 [只看该作者]

销售接单表中的发货数量引用的是发货明细表中的发货数量,如果把发货明细删除一行,那么销售接单对应的发货数量应该恢复原有的数据,如何写代码
现在发货明细表的代码是:
Select Case e.DataCol.Name
Case "发货数量"
DataTables("销售接单").DataCols("产品名称").RaiseDataColChanged("产品名称 = '" & e.DataRow("产品名称") & "'and 接单单号 = '" & e.DataRow("接单单号") & "'")
End Select
销售接单表中的代码:
Select Case e.DataCol.Name
    Case "接单单号", "产品名称", "规格型号"
        If e.DataRow.IsNull("接单单号") Then
            e.DataRow("已发货数量") = Nothing
        Else
            Dim sl As Integer = DataTables("发货明细").Compute("Sum(发货数量)", "接单单号= '" & e.DataRow("接单单号") & "' And 产品名称='" & e.DataRow("产品名称") & "' and 规格型号='" & e.DataRow("规格型号") & "'")
            e.DataRow("已发货数量") = sl 
        End If
End Select
[此贴子已经被作者于2024/4/25 13:05:29编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106578 积分:542061 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/4/25 13:39:00 [只看该作者]

发货明细DataRowDeleting事件

e.DataRow("发货数量") = nothing

DataTables("销售接单").DataCols("产品名称").RaiseDataColChanged("产品名称 = '" & e.DataRow("产品名称") & "'and 接单单号 = '" & e.DataRow("接单单号") & "'")

[此贴子已经被作者于2024/4/25 13:39:48编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
g1j2h3
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:296 积分:3749 威望:0 精华:0 注册:2016/4/30 10:41:00
  发帖心情 Post By:2024/4/25 15:54:00 [只看该作者]

实际上我是想在跨表引用时,发货明细表增加的行的数据在保存后再引用,不是在录入后就引用,代码如何更改

[此贴子已经被作者于2024/4/25 15:57:10编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106578 积分:542061 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/4/25 16:33:00 [只看该作者]

有什么区别呢?保存的时候再处理,效率会很低的

 回到顶部