Currenttable.current("合计入库金额") = DataTables("明细库存").Compute("Sum(入库金额)", "单据编号 = '" & Currenttable.current("单据编号") & "'")