Foxtable(狐表)用户栏目专家坐堂 → 重置相关列失败


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

主题:重置相关列失败

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


加好友 发短信
等级:婴狐 帖子:56 积分:605 威望:0 精华:0 注册:2016/7/21 12:54:00
重置相关列失败  发帖心情 Post By:2016/10/15 12:52:00 [只看该作者]

代码在采购单明细  的 datacolchanged中

Select Case e.DataCol.Name '强行触发父表中的采购编号
   Case "金额"
       DataTables("采购单明细").Save
        Dim prt As DataRow
        prt = DataTables("采购单").SQLFind("采购编号 = '" & e.DataRow("采购编号") & "'")
        If prt IsNot Nothing Then
            DataTables("采购单").DataCols("采购编号").RaiseDataColChanged(prt)
            prt.save
        End If
End Select

为什么变动  金额 列,父表不计算?

父表:
If e.DataCol.Name = "采购编号" Then '统计采购单明细中的同一个采购编号的金额和
    e.DataRow("合计") = DataTables("采购单明细").SQLCompute("Sum(金额)","[采购编号] = '" & e.NewValue & "'")   
End If


求解!

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/15 14:13:00 [只看该作者]

因为用的是SQLFind,查出的是后台数据,只有前台数据才可以触发事件。

改为prt = DataTables("采购单").Find("采购编号 = '" & e.DataRow("采购编号") & "'")

 回到顶部