36 lines
1.1 KiB
XML
36 lines
1.1 KiB
XML
<?xml version='1.0' encoding='UTF-8'?>
|
|
<Package>
|
|
|
|
<!--结束交易缓存表-->
|
|
<Function name="EndBuffData">
|
|
<Input>TX_CD|MBL_NO|</Input>
|
|
<Output>MSG_CD|</Output>
|
|
|
|
<DynSentence name="UPD_SMSTBUFF_CMDSTS"> <!--更新交易缓存表相关记录为失效-->
|
|
<Sentence>
|
|
UPDATE SMSTBUFF SET CMD_STS='0' WHERE MBL_NO=? AND TX_CD=? AND CMD_STS='1' AND EXP_TM < ?
|
|
</Sentence>
|
|
<Fields>MSG_CD|MBL_NO|TX_CD|TXN_TM|</Fields>
|
|
</DynSentence>
|
|
|
|
<Process>
|
|
<!--交易设置-->
|
|
<Set>MSG_CD=SMS00000</Set>
|
|
<Set>TXN_TM=GETDATETIME()</Set>
|
|
|
|
<!--更新交易缓存表相关指令为失效-->
|
|
<Exec func="PUB:ExecSql" error="IGNORE">
|
|
<Arg name="SqlCmd" value="UPD_SMSTBUFF_CMDSTS"/>
|
|
</Exec>
|
|
<If condition="~RetCod=-1">
|
|
<Exec func="PUB:CmpSetMsg">
|
|
<Arg name="MsgCd" value="SMS80000"/>
|
|
<Arg name="MsgDat" value="数据库操作错误"/>
|
|
</Exec>
|
|
<Return/>
|
|
</If>
|
|
</Process>
|
|
</Function>
|
|
|
|
</Package>
|