53 lines
1.8 KiB
XML
53 lines
1.8 KiB
XML
<?xml version='1.0' encoding='UTF-8'?>
|
|
<Package>
|
|
|
|
<!--查询商户或省公司名称(QueryMerProvName)-->
|
|
<Function name="QueryMerProvName">
|
|
<Input>MP_ID_TYP|MP_ID|</Input>
|
|
<Output>MP_NM|MERC_PROV|MERC_CITY|MERC_CITY_NM|MSG_CD|MSG_DAT|</Output>
|
|
<!--查询出资方名称：移动-->
|
|
<DynSentence name="QRY_CMMTPCOP_NM">
|
|
<Sentence>
|
|
SELECT PROV_NM AS MP_NM FROM CMMTPCOP WHERE PROV_CD=?
|
|
</Sentence>
|
|
<Fields>MP_ID|</Fields>
|
|
</DynSentence>
|
|
<!--查询出资方名称: 商户-->
|
|
<DynSentence name="QRY_URMTMINF_NM">
|
|
<Sentence>
|
|
SELECT MERC_CNM AS MP_NM,MERC_PROV,MERC_CITY,MERC_CITY_NM
|
|
FROM URMTMINF
|
|
WHERE MERC_ID=?
|
|
</Sentence>
|
|
<Fields>MP_ID|</Fields>
|
|
</DynSentence>
|
|
<Process>
|
|
<!--必输项判断-->
|
|
<If condition="OR(ISNULL(DELBOTHSPACE($MP_ID_TYP)),ISNULL(DELBOTHSPACE($MP_ID)))">
|
|
<Exec func="PUB:CmpSetMsg">
|
|
<!-- @msg必输项不能为空 -->
|
|
<Arg name="MsgCd" value="MKM22002"/>
|
|
<Arg name="MsgDat" value="必输项不能为空"/>
|
|
</Exec>
|
|
</If>
|
|
<!--移动的情况-->
|
|
<If condition="$MP_ID_TYP=0">
|
|
<Exec func="PUB:ReadRecord">
|
|
<Arg name="SqlCmd" value="QRY_CMMTPCOP_NM"/>
|
|
</Exec>
|
|
</If>
|
|
<!--商户的情况-->
|
|
<ElseIf condition="$MP_ID_TYP=1">
|
|
<Exec func="PUB:ReadRecord">
|
|
<Arg name="SqlCmd" value="QRY_URMTMINF_NM"/>
|
|
</Exec>
|
|
</ElseIf>
|
|
<Exec func="PUB:CmpSetMsg">
|
|
<!-- @msg交易成功 -->
|
|
<Arg name="MsgCd" value="MKM00000"/>
|
|
<Arg name="MsgDat" value="交易成功"/>
|
|
</Exec>
|
|
</Process>
|
|
</Function>
|
|
</Package>
|