请教老师：父表“预算清单”，子表“外购件茨沟明细表”
想实现，子表中所有行“到货数量”大于等于“数量”，且“到货数量”大于0的情况下，自动统计能够在父表中的“"当前进展_完成"”自动勾选，只要有一行不满足要求，就不自动勾选
请看看下面的代码有什么问题
Select Case e.DataCol.name
Case "预算编号"
If e.DataRow.IsNull("预算编号") Then
DataTables("外购件采购明细表").DeleteFor("预算编号='" & e.DataRow("预算编号") & "'")
e.DataRow("当前进展_完成") = False
Else
If e.DataRow.GetChildRows("外购件采购明细表").Count > 0
Dim cnt As Integer = DataTables("外购件采购明细表").Compute("count(预算编号)","预算编号='" & e.NewValue & "' and (到货数量 = 数量 Or 到货数量 > 数量 or 到货数量 > 0)")
e.DataRow("当前进展_完成") = (cnt=0)
End If
End If
End Select
加好友 
发短信
Post By：2024/6/7 14:37:00 [显示全部帖子]
