78 lines
2.7 KiB
XML
78 lines
2.7 KiB
XML
<?xml version="1.0" encoding="UTF-8"?>
|
|
<Tran>
|
|
<!-- 账户白名单信息同步 -->
|
|
<Transaction code="ACCT_WHITELIST_SYNC" log_switch='1' desc="信息同步">
|
|
|
|
<DynSentence name="QRY_CAPRECEIPTACCT_INF"><!--查询账户信息是否存在 -->
|
|
<Sentence>
|
|
SELECT 'Y' YN FROM CAPRECEIPTACCT
|
|
WHERE ACCT_NO=?
|
|
</Sentence>
|
|
<Fields>ACCT_NO|</Fields>
|
|
</DynSentence>
|
|
|
|
<DynSentence name="UPD_CAPRECEIPTACCT_INF"> <!--更新支付地账户信息 -->
|
|
<Sentence>
|
|
UPDATE CAPRECEIPTACCT
|
|
SET HNULL(RPT_SYC_FLG{1}=?),
|
|
HNULL(BIL_SYC_FLG{2}=?),
|
|
BR_NO=?,
|
|
BANK_CODE=?,
|
|
ACCT_NAME=?,
|
|
ACCT_TYPE=?,
|
|
ENABLED=?,
|
|
UPD_DT=?,
|
|
UPD_TM=?,
|
|
TM_SMP=?
|
|
WHERE ACCT_NO=?
|
|
</Sentence>
|
|
<Fields>RPT_SYC_FLG|BIL_SYC_FLG|BR_NO|BANK_CODE|ACCT_NAME|ACCT_TYPE|ENABLED|UPD_DT|UPD_TM|TM_SMP|ACCT_NO|</Fields>
|
|
</DynSentence>
|
|
<FlowCtrl>
|
|
<!--清理数据 -->
|
|
<Delete>RSP_CD</Delete>
|
|
<Delete>RSP_MSG</Delete>
|
|
<Set>UPD_DT=GETDATE()</Set>
|
|
<Set>UPD_TM=GETDATETIME(HHMISS)</Set>
|
|
<Set>TM_SMP=GETDATETIME()</Set>
|
|
<!--检查支付地信息是否存在-->
|
|
<Exec func="PUB:ReadRecord" error="IGNORE">
|
|
<Arg name="SqlCmd" value="QRY_CAPRECEIPTACCT_INF"/>
|
|
</Exec>
|
|
<If condition="~RetCod=2"><!-- 信息不存在则插入新增数据-->
|
|
<Set>CRE_DT=$UPD_DT</Set>
|
|
<Set>CRE_TM=$UPD_TM</Set>
|
|
<Exec func="PUB:InsertRecord" error="IGNORE">
|
|
<Arg name="TblNam" value="CAPRECEIPTACCT" />
|
|
</Exec>
|
|
<If condition="~RetCod!=0">
|
|
<Set>Rsp_Cd=80</Set>
|
|
<Set>Rsp_Msg=数据库操作错误</Set>
|
|
<Return />
|
|
</If>
|
|
</If>
|
|
<ElseIf condition="~RetCod=0"><!--信息已存在则更新数据-->
|
|
|
|
<Exec func="PUB:ExecSql" error="IGNORE">
|
|
<Arg name="SqlCmd" value="UPD_CAPRECEIPTACCT_INF"/>
|
|
</Exec>
|
|
<If condition="~RetCod!=0">
|
|
<Set>Rsp_Cd=80</Set>
|
|
<Set>Rsp_Msg=数据库操作错误</Set>
|
|
<Return />
|
|
</If>
|
|
</ElseIf>
|
|
<Else><!--数据库查询错误-->
|
|
<Set>Rsp_Cd=80</Set>
|
|
<Set>Rsp_Msg=查询数据库失败</Set>
|
|
<Return/>
|
|
</Else>
|
|
|
|
<!-- 交易成功 -->
|
|
<Set>RSP_CD=00</Set>
|
|
<Set>RSP_MSG=交易成功</Set>
|
|
</FlowCtrl>
|
|
</Transaction>
|
|
|
|
</Tran>
|