44 lines
1.6 KiB
XML
44 lines
1.6 KiB
XML
<?xml version="1.0" encoding='UTF-8'?>
|
|
<Root>
|
|
<!--科目对照关系浏览-->
|
|
<Transaction code="BUI0100280" log_switch="1">
|
|
<!--查询科目对照关系表-->
|
|
<DynSentence name="QRY_ACMTITMR_LIST">
|
|
<Sentence>
|
|
SELECT IAC_BAL_DRT,ITM_CCY,TM_SMP,RVS_TYP,CCY,BAL_RED_DRT,MNU_AC_FLG,IN_AC_FLG,ITM_NO,RVS_CLS,UPD_BAL_FLG,AC_TYP,CAP_TYP
|
|
FROM ACMTITMR
|
|
WHERE (AC_TYP=? OR ? IS NULL)
|
|
AND (CAP_TYP=? OR ? IS NULL)
|
|
AND (ITM_NO=? OR ? IS NULL)
|
|
ORDER BY AC_TYP,ITM_NO
|
|
</Sentence>
|
|
<Fields>AC_TYP|AC_TYP|CAP_TYP|CAP_TYP|ITM_NO|ITM_NO|</Fields>
|
|
</DynSentence>
|
|
|
|
|
|
<FlowCtrl>
|
|
<Set>FLG_LOG=0</Set> <!--值为0：代表此交易不用写入操作日志 -->
|
|
<Set>ITM_NO=DELBOTHSPACE($ITM_NO)</Set>
|
|
|
|
<Exec func="PUB:DBMultiQueryPage" >
|
|
<Arg name="PageNo" value="$PAG_NO" /> <!-- 查询第几页页码 -->
|
|
<Arg name="SqlCmd" value="QRY_ACMTITMR_LIST" /> <!-- SQL查询语句 -->
|
|
<Arg name="RecNumPerPage" value="$PAG_NUM" /> <!-- 每页记录数 -->
|
|
</Exec>
|
|
|
|
<If condition="~RetCod=2">
|
|
<Exec func="PUB:GWASetMsg" >
|
|
<!-- @msg 没有符合条件的记录 -->
|
|
<Arg name="MsgCd" value="ACM30001"/>
|
|
</Exec>
|
|
<Return/>
|
|
</If>
|
|
<Exec func="PUB:GWASetMsg" >
|
|
<!-- @msg 交易成功 -->
|
|
<Arg name="MsgCd" value="ACM00000"/>
|
|
</Exec>
|
|
<Set>GWA.MSG_INF=浏览科目对照关系成功</Set>
|
|
</FlowCtrl>
|
|
</Transaction>
|
|
</Root>
|