34 lines
911 B
XML
34 lines
911 B
XML
<?xml version='1.0' encoding='UTF-8'?>
|
|
<Package>
|
|
|
|
<!--STK错误处理-->
|
|
<Function name="_after_for_stkerror_process">
|
|
<Input>GWA|MBL_NO|MSG_CD|</Input>
|
|
<Output>|</Output>
|
|
<Process>
|
|
<Exec func="PUB:DumpMsg"/>
|
|
<!--交易设置-->
|
|
<Set>MSG_CD=$GWA.MSG_CD</Set>
|
|
|
|
<!--如果错位码为空，则交易结束-->
|
|
<If condition="ISNULL(DELBOTHSPACE($MSG_CD))">
|
|
<Return/>
|
|
</If>
|
|
|
|
<!--异步发送短信-->
|
|
<Exec func="PUB:InvokeService" error="IGNORE">
|
|
<Arg name="ServiceName" value="2130001"/>
|
|
<Arg name='Mode' value='NOTIFY'/>
|
|
<Arg name="LogID" value="OSMSPUB2"/>
|
|
</Exec>
|
|
|
|
<!--忽略短信发送错误-->
|
|
<Exec func="PUB:CmpSetMsg">
|
|
<Arg name="MsgCd" value="LPS00000"/>
|
|
</Exec>
|
|
|
|
</Process>
|
|
</Function>
|
|
|
|
</Package>
|