包材合同，合同明细表两个实现合同中列的总额等于明细表金额的sum,有两个关联列，申请编号，包材合同编号
现在存在问题是，只按申请编号分组求和，没有按申请编号+包材合同编号进行分组求和，请问要怎么写，现在代码如下，
包材合同
Select Case e.DataCol.Name
Case "申请编号","包材合同编号"
Dim Filter3 As String = "申请编号 = " & e.DataRow("申请编号")'' )
e.DataRow("总额") = DataTables("合同_包材申请明细表").Compute("Sum(金额)", Filter3)
End Select
合同明细表
Select Case e.DataCol.Name
Case "采购数量","单价"
If e.OldValue <> e.NewValue Then
Dim pr As DataRow
pr = DataTables("合同_包材合同").Find("[申请编号] = " & e.DataRow("申请编号")
If pr IsNot Nothing Then
DataTables("合同_包材合同").DataCols("申请编号").RaiseDataColChanged(pr)
End If
End If
End Select
[此贴子已经被作者于2017/10/29 18:03:12编辑过]
加好友 
发短信
Post By：2017/10/29 17:59:00 [只看该作者]
