- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 求助：跨表判断条件进行统计 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=161293)
-- 发布时间：2021/3/12 11:05:00
-- 求助：跨表判断条件进行统计
求助老师：我做了两张表：订单执行状态及订单执行进度
想根据订单执行进度表的预付款送审日期列不为空的情况下，统计订单执行状态表预付款状态列为：进行中
在订单执行进度表的datacolchenged表事件写入以下代码，没反应，请老师指教下，是哪里出了错误？
Select Case e.DataCol.Name
Case "MIS号","预付款送审日期"
If e.DataRow.IsNull("MIS号")=False AndAlso e.DataRow.IsNull("项目名称")=False
If e.DataRow.IsNull("预付款送审日期")=False Then
Dim s As String = Nothing
s = "进行中"
DataTables("订单执行状态").ReplaceFor("预付款状态", s ,"MIS号=\'" & e.DataRow("MIS号") & "\'")
End If
End If
End Select
-- 发布时间：2021/3/12 11:11:00
--
Case "MIS号","预付款送审日期"
If e.DataRow.IsNull("MIS号")=False AndAlso e.DataRow.IsNull("预付款送审日期")=False
Dim s As String = "进行中"
DataTables("订单执行状态").ReplaceFor("预付款状态", s ,"MIS号=\'" & e.DataRow("MIS号") & "\'")
End If
End Select
-- 发布时间：2021/3/12 11:24:00
-- 求助：这段代码之前也试过，不行
老师：这段代码写入后，仍然是没有反应，什么原因呢？
-- 发布时间：2021/3/12 11:36:00
--
选中case里其中一个列，重置列
-- 发布时间：2021/3/12 12:42:00
-- 重置列了，也写了项目事件的chenged代码，仍然没有反应
在项目事件：maintablechenged写入如下代码，重置列也试过了，都没有反应，也没有错误提示
If MainTable.Name = "订单执行状态" Then
DataTables("订单执行状态").DataCols("预付款状态").RaiseDataColChanged()
DataTables("订单执行状态").DataCols("进度款状态").RaiseDataColChanged()
DataTables("订单执行状态").DataCols("尾款状态").RaiseDataColChanged()
DataTables("订单执行状态").DataCols("完工数量").RaiseDataColChanged()
End If
-- 发布时间：2021/3/12 13:38:00
--
选中订单执行进度表的"MIS号"或者"预付款送审日期"列重置
-- 发布时间：2021/3/12 13:46:00
-- 仍然不行，上传实例，请老师亲测
已上传实例，请老师帮我测试下，是哪里出了问题？
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:第一版.foxdb |
-- 发布时间：2021/3/12 13:50:00
--
没有上传成功，重复上传直到编辑区有下载链接
-- 发布时间：2021/3/12 13:53:00
-- 重新上传了，也有下载链接了
重新上传了，也有下载链接了
-- 发布时间：2021/3/12 14:04:00
--
和订单执行状态的datacolchaged事件有冲突，这个表MIS号会导致完工数量进行计算，计算结果为0，又会导致状态列变成"待启动"