77 lines
2.8 KiB
XML
77 lines
2.8 KiB
XML
<?xml version='1.0' encoding='UTF-8'?>
|
|
<Package>
|
|
|
|
<!--查询商户宣传语接口组件(MerAdvQuery)-->
|
|
<Function name="MerAdvQuery">
|
|
<Input>INP_DAT|GWA|</Input>
|
|
<Output>OUT_DAT|MSG_CD|</Output>
|
|
<!--查询商户宣传语-->
|
|
<DynSentence name="QRY_MKMTMADV">
|
|
<Sentence>
|
|
SELECT ADV_DESC,EFF_DT,EXP_DT
|
|
FROM MKMTMADV
|
|
WHERE MERC_ID=?
|
|
</Sentence>
|
|
<Fields>MERC_ID|</Fields>
|
|
</DynSentence>
|
|
<Process>
|
|
<!--必输项检查-->
|
|
<Set>MERC_ID=DELBOTHSPACE($INP_DAT.MERC_ID)</Set>
|
|
<If condition="ISNULL($MERC_ID)">
|
|
<Exec func="PUB:CmpSetMsg">
|
|
<!-- @msg商户编号不能为空 -->
|
|
<Arg name="MsgCd" value="MKM20200"/>
|
|
<Arg name="MsgDat" value="商户编号不能为空"/>
|
|
</Exec>
|
|
<Return/>
|
|
</If>
|
|
<Set>CUR_DT=$GWA.TX_DT</Set>
|
|
<!--查询商户宣传语-->
|
|
<Exec func="PUB:ReadRecord" error="IGNORE">
|
|
<Arg name="SqlCmd" value="QRY_MKMTMADV"/>
|
|
</Exec>
|
|
<If condition="~RetCod=-1">
|
|
<Exec func="PUB:CmpSetMsg">
|
|
<!-- @msg查询商户宣传语失败 -->
|
|
<Arg name="MsgCd" value="MKM20215"/>
|
|
<Arg name="MsgDat" value="查询商户宣传语失败"/>
|
|
</Exec>
|
|
<Return/>
|
|
</If>
|
|
<If condition="~RetCod=2">
|
|
<Set>ADV_DESC=欢迎使用手机支付</Set>
|
|
</If>
|
|
<Else>
|
|
<If condition="STRCMP($EFF_DT,$CUR_DT) > 0">
|
|
<Set>MSG_CD=MKM20216</Set>
|
|
<Set>MSG_DAT=商户宣传语未生效</Set>
|
|
<Set>OUT_DAT.ADV_DESC=欢迎使用手机支付</Set>
|
|
<Exec func="PUB:CmpSetMsg">
|
|
<!-- @msg交易成功 -->
|
|
<Arg name="MsgCd" value="MKM00000"/>
|
|
<Arg name="MsgDat" value="交易成功"/>
|
|
</Exec>
|
|
<Return/>
|
|
</If>
|
|
<If condition="STRCMP($CUR_DT,$EXP_DT) > 0">
|
|
<Set>MSG_CD=MKM20217</Set>
|
|
<Set>MSG_DAT=商户宣传语已失效</Set>
|
|
<Set>OUT_DAT.ADV_DESC=欢迎使用手机支付</Set>
|
|
<Exec func="PUB:CmpSetMsg">
|
|
<!-- @msg交易成功 -->
|
|
<Arg name="MsgCd" value="MKM00000"/>
|
|
<Arg name="MsgDat" value="交易成功"/>
|
|
</Exec>
|
|
<Return/>
|
|
</If>
|
|
</Else>
|
|
<Set>OUT_DAT.ADV_DESC=$ADV_DESC</Set>
|
|
<Exec func="PUB:CmpSetMsg">
|
|
<!-- @msg交易成功 -->
|
|
<Arg name="MsgCd" value="MKM00000"/>
|
|
<Arg name="MsgDat" value="交易成功"/>
|
|
</Exec>
|
|
</Process>
|
|
</Function>
|
|
</Package>
|