付款申请单审核后将补助项目反写其他应付单原创
金蝶云社区-云社区用户90309233
云社区用户90309233
0人赞赏了该文章 375次浏览 未经作者许可,禁止转载编辑于2021年06月28日 16:09:35
clr

clr.AddReference()
clr.AddReference()
clr.AddReference()
clr.AddReference()
clr.AddReference()
clr.AddReference()
System.Collections.Generic *
Kingdee.BOS.App.Data *
Kingdee.BOS.App.Core *
Kingdee.BOS.ServiceHelper *


(e):
    e.FieldKeys.Add()
    e.FieldKeys.Add()
    e.FieldKeys.Add()
    e.FieldKeys.Add()
    e.FieldKeys.Add()
    e.FieldKeys.Add()
    e.FieldKeys.Add()


(e):
    i e.DataEntitys:
        PAYAPPLYENTRY = i[]
        BILLNO = i[]
        ENTRYID = []
        SOURCETYPE = []
        SRCBILLNO = []
        COSTIDs = [] 
        APPLYAMOUNTFOR = []
        SRCROWID = []
        COSTID = []
        n PAYAPPLYENTRY:
            SRCBILLNO.append(n[])
            COSTIDs.append(n[])
            APPLYAMOUNTFOR.append(n[])
            SOURCETYPE.append(n[])
            ENTRYID.append(n[])
            SRCROWID.append(n[])
        n1 ((COSTIDs)):
            COSTIDs[n1] COSTID:
                n2 ((COSTIDs)):
            COSTIDs[n2] COSTID:
                FENTRYID = DBServiceHelper.GetSequenceInt64(this.Context);
                sql = + (SRCROWID[n2]) + + (FENTRYID[]) + + (APPLYAMOUNTFOR[n2]) + + (
                    APPLYAMOUNTFOR[n2]) + + (COSTIDs[n2]) + + BILLNO + + SRCBILLNO[n1] + + SRCBILLNO[n1] + + SOURCETYPE[
                          n1] + + SRCBILLNO[n1] + + (FENTRYID[]) + + (ENTRYID[n2]) + DBUtils.Execute(this.Contextsql)
        BusinessDataWriter(this.Context).Save(e.DataEntitys)


赞 0