Foxtable(狐表)用户栏目专家坐堂 → 表达式列数据变动事件


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

主题:表达式列数据变动事件

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


加好友 发短信
等级:童狐 帖子:234 积分:2326 威望:0 精华:0 注册:2021/3/7 1:27:00
表达式列数据变动事件  发帖心情 Post By:2024/12/15 21:32:00 [只看该作者]

已付金额 表达式:Sum(Child(对账付款2).付款金额)
应付余额 表达式:IsNull([应付金额],0) - IsNull([已付金额],0)

DataColChanged 事件代码:

Select Case e.DataCol.Name
    Case "应付余额"
        If e.NewValue <= 0 Then
            Dim D As New Date(2099, 1, 1)
            e.DataRow("最后付款期限") = D
        End If 
 
End Select

老师,请帮看一下:当余额<=0时,最后付款期限怎么没有反应?

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111374 积分:566934 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/12/15 21:42:00 [只看该作者]

原因:http://www.foxtable.com/webhelp/topics/2381.htm

父表DataColChanged 事件代码:
Select Case e.DataCol.Name
    Case "应付额"
        If e.NewValue - e.DataRow("已付金额") <= 0 Then
            Dim D As New Date(2099, 1, 1)
            e.DataRow("最后付款期限") = D
        End If 
End Select

子表DataColChanged 事件代码:
Select Case e.DataCol.Name
    Case "付款金额"
    Dim pr As DataRow = e.DataRow.GetParentRow("父表名称"
    If 
pr IsNot Nothing Then
        DataTables(
"父表名称").DataCols("应付").RaiseDataColChanged(pr)
    End If
End Select

 回到顶部