27 lines
708 B
XML
27 lines
708 B
XML
<?xml version='1.0' encoding='UTF-8'?>
|
|
<Package>
|
|
|
|
<!--后处理之外发交易数据处理-->
|
|
<Function name="_after_smstsmmt_process">
|
|
|
|
<DynSentence name="UPD_SMSTSMMT_MSGCD"> <!--更新上行表记录状态-->
|
|
<Sentence>
|
|
UPDATE SMSTSMMT SET END_TM=?,MSG_CD=? WHERE MSG_ID=?
|
|
</Sentence>
|
|
<Fields>END_TM|GWA.MSG_CD|MSG_ID|</Fields>
|
|
</DynSentence>
|
|
|
|
<Process>
|
|
<!--交易设置-->
|
|
<Set>END_TM=GETDATETIME()</Set>
|
|
|
|
<!--更新上行表处理码-->
|
|
<Exec func="PUB:ExecSql" error="IGNORE">
|
|
<Arg name="SqlCmd" value="UPD_SMSTSMMT_MSGCD"/>
|
|
</Exec>
|
|
|
|
</Process>
|
|
</Function>
|
|
|
|
</Package>
|