48 lines
1.6 KiB
XML
48 lines
1.6 KiB
XML
<?xml version="1.0" encoding='UTF-8'?>
|
|
<Root>
|
|
<!--科目属性修改-->
|
|
<Transaction code="BUI0100210" log_switch="1">
|
|
|
|
<!--更新科目属性信息-->
|
|
<DynSentence name="UPD_ACMTITEM_INF">
|
|
<Sentence>
|
|
UPDATE ACMTITEM
|
|
SET ITM_NO=?,BAL_DRT=?,ITM_CLS=?,ITM_LVL=?,BTM_ITM_FLG=?,TM_SMP=?,ITM_STS=?,ITM_ZBAL_FLG=?,
|
|
LP_BF_FLG=?,ITM_CNM=?,UPD_DT=?,UPD_OPR=?,ITM_TYP=?,BAL_OD_FLG=?,EXP_DT=?,
|
|
ITM_ENM=?,UP_ITM_NO=?,EFF_DT=?
|
|
WHERE ITM_NO=?
|
|
|
|
</Sentence>
|
|
<Fields>ITM_NO|BAL_DRT|ITM_CLS|ITM_LVL|BTM_ITM_FLG|TM_SMP|ITM_STS|ITM_ZBAL_FLG|LP_BF_FLG|ITM_CNM|UPD_DT|UPD_OPR|ITM_TYP|BAL_OD_FLG|EXP_DT|ITM_ENM|UP_ITM_NO|EFF_DT|ITM_NO|</Fields>
|
|
</DynSentence>
|
|
|
|
<FlowCtrl>
|
|
<Set>UPD_DT=GETDATE()</Set>
|
|
<Set>UPD_OPR=$CUR_OPR_ID</Set>
|
|
<Set>TM_SMP=GETDATETIME()</Set>
|
|
<If condition="ISNULL($ITM_ENM)">
|
|
<Set>ITM_ENM=SPACE(1,1)</Set>
|
|
</If>
|
|
<If condition="ISNULL($UP_ITM_NO)">
|
|
<Set>UP_ITM_NO=SPACE(1,1)</Set>
|
|
</If>
|
|
<Exec func="PUB:ExecSql">
|
|
<Arg name="SqlCmd" value="UPD_ACMTITEM_INF"/>
|
|
</Exec>
|
|
|
|
<If condition="~RetCod=2">
|
|
<Exec func="PUB:GWASetMsg" >
|
|
<!-- @msg 没有符合条件的记录 -->
|
|
<Arg name="MsgCd" value="ACM30001"/>
|
|
</Exec>
|
|
<Return/>
|
|
</If>
|
|
<Exec func="PUB:GWASetMsg" >
|
|
<!-- @msg 交易成功 -->
|
|
<Arg name="MsgCd" value="ACM00000"/>
|
|
</Exec>
|
|
<Set>GWA.MSG_INF=修改成功</Set>
|
|
</FlowCtrl>
|
|
</Transaction>
|
|
</Root>
|