46 lines
2.0 KiB
XML
46 lines
2.0 KiB
XML
<?xml version="1.0" encoding='UTF-8'?>
|
|
<Root>
|
|
<!--浏览移动交易服务费待分润信息查询 modi-->
|
|
<Transaction code="BUI020100" log_switch="1">
|
|
<DynSentence name="QRY_PSMTPFSH_PFSHARING"> <!-- 基本信息查询语句 -->
|
|
<Sentence>
|
|
SELECT A.MERC_FEE_MOD,A.JRN_NO,A.MERC_TYP,A.MERC_ID,
|
|
A.ORD_CAP_TYP,A.FEE_DRT_FLG,A.TOT_ORD_NUM,
|
|
A.TOT_ORD_AMT,A.TOT_FEE_AMT,A.FEE_DT
|
|
FROM PSMTPFSH A
|
|
WHERE (? IS NULL OR A.MERC_ID=?)
|
|
AND (? IS NULL OR A.MERC_FEE_MOD=?)
|
|
AND (? IS NULL OR ? IS NULL OR A.FEE_DT BETWEEN ? AND ? )
|
|
ORDER BY A.FEE_DT DESC,A.MERC_ID,A.ROWID
|
|
</Sentence>
|
|
<Fields>QRY_MERC_ID|QRY_MERC_ID|QRY_MERC_FEE_MOD|QRY_MERC_FEE_MOD|BEG_DT|END_DT|BEG_DT|END_DT|</Fields>
|
|
</DynSentence>
|
|
<FlowCtrl>
|
|
<Set>FLG_LOG=0</Set> <!--值为0：代表此交易不用写入操作日志 -->
|
|
<!-- 去掉所要查询字段的前后端空格 -->
|
|
<Set>QRY_MERC_ID=DELBOTHSPACE($QRY_MERC_ID)</Set>
|
|
<Set>QRY_MERC_FEE_MOD=DELBOTHSPACE($QRY_MERC_FEE_MOD)</Set>
|
|
<Set>BEG_DT=DELBOTHSPACE($BEG_DT)</Set>
|
|
<Set>END_DT=DELBOTHSPACE($END_DT)</Set>
|
|
<Exec func="PUB:DBMultiQueryPage">
|
|
<Arg name="PageNo" value="$PAG_NO"/>
|
|
<Arg name="SqlCmd" value="QRY_PSMTPFSH_PFSHARING"/>
|
|
<Arg name="RecNumPerPage" value="$PAG_NUM"/>
|
|
</Exec>
|
|
<If condition="~RetCod=0">
|
|
<!--@msg 交易成功-->
|
|
<Exec func="PUB:GWASetMsg">
|
|
<Arg name="MsgCd" value="PSM00000" />
|
|
</Exec>
|
|
</If>
|
|
<ElseIf condition="~RetCod=2">
|
|
<!--@msg 没有符合条件的 移动交易服务费待分润信息-->
|
|
<Exec func="PUB:GWASetMsg">
|
|
<Arg name="MsgCd" value="PSM10001" />
|
|
</Exec>
|
|
</ElseIf>
|
|
</FlowCtrl>
|
|
</Transaction>
|
|
|
|
</Root>
|