12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091 |
- $PBExportHeader$uo_taskdamt_ew.sru
- forward
- global type uo_taskdamt_ew from uo_taskdamt_spi
- end type
- end forward
- global type uo_taskdamt_ew from uo_taskdamt_spi
- end type
- global uo_taskdamt_ew uo_taskdamt_ew
- forward prototypes
- public function integer uf_save (s_eb_cusamt s_import[], ref string arg_msg, boolean ifcommit)
- end prototypes
- public function integer uf_save (s_eb_cusamt s_import[], ref string arg_msg, boolean ifcommit);Int rslt = 1
- // TODO: 企精灵没有订单收款单
- //Long i, j, k
- //s_taskdamt l_s_amt[]
- //uo_taskdamt uo_ware
- //uo_ware = Create uo_taskdamt
- //
- //FOR i = 1 To UpperBound(s_import)
- // FOR j = 1 To UpperBound(l_s_amt)
- // IF l_s_amt[j].scid = s_import[i].scid &
- // And l_s_amt[j].cussptid = s_import[i].cusid &
- // And l_s_amt[j].part = s_import[i].part &
- // And l_s_amt[j].billdate = s_import[i].billdate &
- // And l_s_amt[j].assign_emp = s_import[i].assign_emp &
- // And l_s_amt[j].dscrp = s_import[i].dscrp THEN EXIT
- // NEXT
- //
- // IF j > UpperBound(l_s_amt) THEN
- // l_s_amt[j].billid = 0
- // l_s_amt[j].scid = s_import[i].scid
- // l_s_amt[j].cussptid = s_import[i].cusid
- // l_s_amt[j].part = s_import[i].part
- // l_s_amt[j].billdate = s_import[i].billdate
- // l_s_amt[j].assign_emp = s_import[i].assign_emp
- // l_s_amt[j].dscrp = s_import[i].dscrp
- // END IF
- //
- // k = UpperBound(l_s_amt[j].arg_s_mx) + 1
- // l_s_amt[j].arg_s_mx[k].scid = l_s_amt[j].scid
- // l_s_amt[j].arg_s_mx[k].billid = l_s_amt[j].billid
- // l_s_amt[j].arg_s_mx[k].printid = k
- // l_s_amt[j].arg_s_mx[k].relid = s_import[i].relid
- // l_s_amt[j].arg_s_mx[k].reltaskcode = s_import[i].reltaskcode
- // l_s_amt[j].arg_s_mx[k].damt = s_import[i].damt
- // l_s_amt[j].arg_s_mx[k].dscrp = s_import[i].mxdscrp
- // l_s_amt[j].arg_s_mx[k].accountsid = s_import[i].accountsid
- // l_s_amt[j].arg_s_mx[k].billamt = s_import[i].billamt
- // l_s_amt[j].arg_s_mx[k].itemid = s_import[i].itemid
- // l_s_amt[j].arg_s_mx[k].takeamt = s_import[i].takeamt
- // l_s_amt[j].arg_s_mx[k].reltakeamt = s_import[i].reltakeamt
- // l_s_amt[j].arg_s_mx[k].realmoneyid = s_import[i].realmoneyid
- // l_s_amt[j].arg_s_mx[k].realrate = s_import[i].realrate
- // l_s_amt[j].arg_s_mx[k].billtype = s_import[i].billtype
- // l_s_amt[j].arg_s_mx[k].banktypeid = s_import[i].banktypeid
- // l_s_amt[j].arg_s_mx[k].reldamt = s_import[i].reldamt
- //NEXT
- //
- //FOR i = 1 To UpperBound(l_s_amt)
- // IF uo_ware.Save(l_s_amt[i],arg_msg,False) <> 1 THEN
- // rslt = 0
- // GOTO ext
- // END IF
- //NEXT
- //
- //ext:
- //Destroy uo_ware
- IF ifcommit THEN
- IF rslt = 1 THEN
- COMMIT;
- ELSE
- ROLLBACK;
- END IF
- END IF
- RETURN rslt
- end function
- on uo_taskdamt_ew.create
- call super::create
- end on
- on uo_taskdamt_ew.destroy
- call super::destroy
- end on
|