89 lines
3.1 KiB
XML
89 lines
3.1 KiB
XML
<?xml version='1.0' encoding='UTF-8'?>
|
|
<Package>
|
|
<Function name="UPD_PPD_BNK">
|
|
<Input>INP_DAT</Input>
|
|
<Output>OUT_DAT|MSG_CD</Output>
|
|
|
|
<!-- 根据手机号查询用户操作员信息表 -->
|
|
<DynSentence name="QRY_URMTOPER_BY_MBLNO">
|
|
<Sentence>
|
|
SELECT USR_NO
|
|
FROM URMTOPER
|
|
WHERE USR_OPR_ID=? AND USR_OPR_TYP='0'
|
|
</Sentence>
|
|
<Fields>MBL_NO|</Fields>
|
|
</DynSentence>
|
|
|
|
<!-- 查询最后充值银行 -->
|
|
<DynSentence name="QRY_URMTPPD">
|
|
<Sentence>
|
|
SELECT PPD_BNK
|
|
FROM URMTPPD
|
|
WHERE USR_NO=?
|
|
</Sentence>
|
|
<Fields>PPD_BNK|USR_NO|</Fields>
|
|
</DynSentence>
|
|
|
|
<!-- 更新最后充值银行 -->
|
|
<DynSentence name="UPD_URMTPPD">
|
|
<Sentence>
|
|
UPDATE URMTPPD
|
|
SET PPD_BNK=?
|
|
WHERE USR_NO=?
|
|
</Sentence>
|
|
<Fields>PPD_BNK|USR_NO|</Fields>
|
|
</DynSentence>
|
|
|
|
<!-- 新增最后充值银行 -->
|
|
<DynSentence name="INS_URMTPPD">
|
|
<Sentence>
|
|
INSERT INTO URMTPPD
|
|
VALUES(?,?)
|
|
</Sentence>
|
|
<Fields>USR_NO|PPD_BNK|</Fields>
|
|
</DynSentence>
|
|
|
|
<Process>
|
|
<Exec func="PUB:CmpSetMsg">
|
|
<Arg name="MsgCd" value="URM00000"/>
|
|
</Exec>
|
|
<!-- 根据手机号查内部用户号 -->
|
|
<If condition="ISNULL($USR_NO)">
|
|
<Exec func="PUB:ReadRecord">
|
|
<Arg name="SqlCmd" value="QRY_URMTOPER_BY_MBLNO"/>
|
|
</Exec>
|
|
</If>
|
|
|
|
<!-- 修改或新增最后充值银行 -->
|
|
<Exec func="PUB:ExecSql">
|
|
<Arg name="SqlCmd" value="QRY_URMTPPD"/>
|
|
</Exec>
|
|
<If condition="~RetCod=0">
|
|
<Exec func="PUB:ExecSql">
|
|
<Arg name="SqlCmd" value="UPD_URMTPPD"/>
|
|
</Exec>
|
|
<If condition="~RetCod=2">
|
|
<Exec func="PUB:CmpSetMsg">
|
|
<Arg name="MsgCd" value="URM20003"/> <!-- 更新数据库时，数据不存在 -->
|
|
</Exec>
|
|
<Return/>
|
|
</If>
|
|
</If>
|
|
<If condition="~RetCod=2">
|
|
<Exec func="PUB:ExecSql">
|
|
<Arg name="SqlCmd" value="INS_URMTPPD"/>
|
|
</Exec>
|
|
<If condition="~RetCod=2">
|
|
<Exec func="PUB:CmpSetMsg">
|
|
<Arg name="MsgCd" value="URM20003"/> <!-- 更新数据库时，数据不存在 -->
|
|
</Exec>
|
|
<Return/>
|
|
</If>
|
|
</If>
|
|
|
|
<Exec func="PUB:DumpETF"/>
|
|
|
|
</Process>
|
|
|
|
</Function>
|
|
</Package> |