74 lines
2.8 KiB
XML
74 lines
2.8 KiB
XML
<?xml version='1.0' encoding='UTF-8'?>
|
|
<Application name="lps" trace="yes">
|
|
<!-- 交易管理-账户明细 -->
|
|
<Transaction code="2151010" log_switch="1" trace="yes" desc="手机钱包明细">
|
|
<!-- 查询手机钱包账户明细 -->
|
|
<DynSentence name="QRY_ACNT_DETAIL">
|
|
<Sentence>
|
|
<!-- 如果 BUS_CNL为POS或STK 则交易类别为圈存 否则为消费-->
|
|
(SELECT TX_DT as SYS_DT, TX_TM as SYS_TM, OFP_TX_TYP as ORD_TYP,'' as BUS_CNL, TX_AMT as DR_AMT,0 as CR_AMT
|
|
FROM LPSTOFP
|
|
WHERE USR_NO=? AND (? IS NULL OR TX_DT >= ? )AND (? IS NULL OR TX_DT <= ? )
|
|
UNION
|
|
SELECT TX_DT as SYS_DT, TX_TM as SYS_TM,'' as ORD_TYP, BUS_CNL,0 as DR_AMT, TX_AMT as CR_AMT
|
|
FROM LPSTEMK
|
|
WHERE USR_NO=? AND (? IS NULL OR TX_DT >= ?) AND (? IS NULL OR TX_DT <= ?))
|
|
ORDER BY SYS_DT,SYS_TM DESC
|
|
</Sentence>
|
|
<Fields>USR_NO|STRT_DT|STRT_DT|END_DT|END_DT|USR_NO|STRT_DT|STRT_DT|END_DT|END_DT|</Fields>
|
|
</DynSentence>
|
|
|
|
<DynSentence name="QRY_USRNO">
|
|
<Sentence>
|
|
select USR_NO FROM LPSTCRD where MBL_NO=?
|
|
</Sentence>
|
|
<Fields>MBL_NO|</Fields>
|
|
</DynSentence>
|
|
|
|
<FlowCtrl>
|
|
|
|
<Exec func="PUB:GWASetMsg">
|
|
<Arg name="MsgCd" value="LPS00000"/>
|
|
</Exec>
|
|
|
|
<!-- <Set>STRT_DT=20000101</Set> test -->
|
|
<!-- <Set>END_DT=20100809</Set> test -->
|
|
<!--<Set>MBL_NO=13467500046</Set> test -->
|
|
|
|
<Exec func="PUB:ReadRecord" error="IGNORE">
|
|
<Arg name="SqlCmd" value="QRY_USRNO" />
|
|
</Exec>
|
|
<If condition="~RetCod!=0">
|
|
<Exec func="PUB:GWASetMsg">
|
|
<Arg name="MsgCd" value="LPS00001"/>
|
|
<Arg name="MsgDat" value="查询用户号失败"/>
|
|
</Exec>
|
|
<Return/>
|
|
</If>
|
|
|
|
<!-- 查询主帐户资金收支明细表 -->
|
|
<Exec func="PUB:DBMultiQueryPage" error="IGNORE">
|
|
<Arg name="PageNo" value="$PAG_NO"/> <!-- 查询第几页页码 -->
|
|
<Arg name="SqlCmd" value="QRY_ACNT_DETAIL"/>
|
|
<Arg name="RecNumPerPage" value="$PAG_NUM"/> <!--每页记录数-->
|
|
</Exec>
|
|
<If condition="~RetCod=-1">
|
|
<Exec func="PUB:GWASetMsg">
|
|
<Arg name="MsgCd" value="LPS00001"/>
|
|
<Arg name="MsgDat" value="数据库操作失败"/>
|
|
</Exec>
|
|
<Return/>
|
|
</If>
|
|
<ElseIf condition="~RetCod=2">
|
|
<Set>PAG_NO=0</Set>
|
|
<Set>PAG_CNT=0</Set>
|
|
</ElseIf>
|
|
|
|
<Exec func="PUB:GWASetMsg">
|
|
<Arg name="MsgCd" value="LPS00000" />
|
|
</Exec>
|
|
</FlowCtrl>
|
|
</Transaction>
|
|
|
|
</Application>
|