Dim dr As DataRow = DataTables("库存明细表").SQLFind("SN = '" & e.DataRow("SN") & "' and 状态 = '配货完成' and U8发货单号 = '" & Vars("u8fhdh") & "' and U8出库单号 = '" & Vars("u8ckdh") & "'")
If dr IsNot Nothing Then
dr("数量") = 0
dr("出库漏扫") = True
dr("状态") = "出库扫描完成"
dr("出库完成时间") = Date.now
dr.Save
For Each nm As String In nms
e.DataRow(nm) = dr(nm)
Next
e.DataRow("数量") = 1
e.DataRow("状态") = "出库扫描完成"
e.DataRow.save
Tables("A-Z出库扫描_table3").filter = "出库漏扫 = 0 and U8出库单号 = '" & vars("u8ckdh") & "' and U8发货单号 = '" & vars("u8fhdh") & "' and 物料编码 = '" & vars("chbm") & "' and 状态 = '配货完成'"
明明蓝色的条件都满足的。这个副本表就没有变化。正常情况datacolchange的dr("出库漏扫") = True了。蓝色条件也满足了，应该副本表显示会减少一行的。可是没有减少。但afterload后就会减少一行。
加好友 
发短信
Post By：2017/4/27 19:33:00 [显示全部帖子]
