50 lines
1.9 KiB
XML
50 lines
1.9 KiB
XML
<?xml version="1.0" encoding="UTF-8"?>
|
|
<Tran>
|
|
<!--退票信息查询 -->
|
|
<Transaction code="REFUND_QUERY" log_switch='1' desc="多页查询退票信息">
|
|
|
|
<DynSentence name="QRY_CAPCMBRFD_INF"><!--查询该支付地账户信息是否存在 -->
|
|
<Sentence>
|
|
SELECT DSK_NAM AS DISK_NO,CAP_ORD_NO AS TRANS_ID,MERC_ORD_NO REF_ID,BTH_DTL BANK_REFID,EAC_NBR ACCT_NO,EAC_NAM ACCT_NAME,
|
|
TRS_DAT TRANS_DATE,STS_COD TRANS_STS,TRS_AMT * 100 AMOUNT,RTN_COD REFUND_CODE,RTN_TXT REFUND_PS,
|
|
TAC_NO PAYER_ACCT_NO,TAC_NAM PAYER_ACCT_NAME,TXT_CLT REMARK,
|
|
decode(STS_COD,'A','待处理','C','取消','E','失败','I','待复核','S','成功','其他') AS transStsMsg,SUBSTR(TM_SMP,1,8) REFUND_DATE
|
|
FROM CAPCMBRFD
|
|
WHERE trs_dat between ? and ?
|
|
</Sentence>
|
|
<Fields>START_DATE|END_DATE|</Fields>
|
|
</DynSentence>
|
|
|
|
<FlowCtrl>
|
|
<!--清理数据 -->
|
|
<Delete>RSP_CD</Delete>
|
|
<Delete>RSP_MSG</Delete>
|
|
<Exec func="PUB:DumpETF" />
|
|
<Exec func="PUB:DBMultiQueryPage" error="IGNORE">
|
|
<Arg name="PageNo" value="$PAG_NO" />
|
|
<Arg name="SqlCmd" value="QRY_CAPCMBRFD_INF" />
|
|
<Arg name="RecNumPerPage" value="$PAG_NUM" />
|
|
</Exec>
|
|
<If condition="~RetCod=0">
|
|
<Set>RSP_CD=00</Set>
|
|
<Set>RSP_MSG=交易成功</Set>
|
|
<Return/>
|
|
</If>
|
|
<ElseIf condition="~RetCod=2">
|
|
<Set>RSP_CD=80</Set>
|
|
<Set>RSP_MSG=无查询结果</Set>
|
|
<Set>PAG_CNT=0</Set>
|
|
<Return />
|
|
</ElseIf>
|
|
<Else>
|
|
<Set>RSP_CD=80</Set>
|
|
<Set>RSP_MSG=查询出错</Set>
|
|
<Set>PAG_CNT=0</Set>
|
|
<Return />
|
|
</Else>
|
|
|
|
</FlowCtrl>
|
|
</Transaction>
|
|
|
|
</Tran>
|