521 lines
23 KiB
XML
521 lines
23 KiB
XML
<?xml version='1.0' encoding='UTF-8'?>
|
||
|
||
<Application name="SDM" code="199"
|
||
xmlns="http://www.hisuntech.com/ctltem" xmlns:xs="http://www.w3.org/2001/XMLSchema-instance"
|
||
xs:schemaLocation="http://www.hisuntech.com/ctltem http://10.8.2.225:8580/cts/CTLTEM.xsd">
|
||
|
||
<LibDeclare>
|
||
<Library name="MNG" value="himng.jar" />
|
||
<Library name="ATM" value="hiatmp.jar" />
|
||
</LibDeclare>
|
||
<!--
|
||
<BusDefDeclare> <Include file="etc/UIS_BUS.XML"/> </BusDefDeclare>
|
||
-->
|
||
<GlobalFunction>
|
||
<Function name="_before">
|
||
<Exec func="PUB:DumpETF" />
|
||
<Set>GWA.MSG_CD=CTS0000</Set>
|
||
<Set>GWA.MSG_INF1=''</Set>
|
||
<Set>BR_NO=999999</Set>
|
||
<!-- <Set>U_BR_NO=$SESSION.BR_NO</Set> -->
|
||
<!--<Set>CURUID=$SESSION.USR_ID</Set>-->
|
||
<Set>CURUID=usradm</Set>
|
||
<Set>SYS_CD=BFC</Set>
|
||
<Set>CNL_TYP=UI</Set>
|
||
<Set>MON_FLG=0</Set>
|
||
</Function>
|
||
<Function name="_after">
|
||
<If condition="NOT(ISNULL($output))">
|
||
<Exec func="PUB:SetRetPage">
|
||
<Arg name="page" value="$output" />
|
||
</Exec>
|
||
</If>
|
||
<Exec func="PUB:DumpETF" />
|
||
</Function>
|
||
</GlobalFunction>
|
||
|
||
<Transaction code="0014122" desc="qry user" log_switch="1">
|
||
<DynSentence name="QRY_CMMTOTMG_OPRINF">
|
||
<!-- 查询操作员相关信息 -->
|
||
<Sentence>
|
||
SELECT * FROM CMMTOTMG WHERE ('%s' IS NULL OR OPR_ID='%s' ) AND ('%s' IS
|
||
NULL OR OPR_NM LIKE '%%%s%%' ) AND ('%s' IS NULL OR OPR_STS='%s' )
|
||
ORDER BY OPR_ID
|
||
</Sentence>
|
||
<Fields>QRY_OPR_ID|QRY_OPR_ID|QRY_NAME|QRY_NAME|QRY_STS|QRY_STS|</Fields>
|
||
</DynSentence>
|
||
<FlowCtrl>
|
||
<Exec func="PUB:DBMultiQueryPage">
|
||
<Arg name="PageNo" value="$PAG_NO"/>
|
||
<Arg name="SqlCmd" value="QRY_CMMTOTMG_OPRINF"/>
|
||
<Arg name="RecNumPerPage" value="$PAG_NUM"/>
|
||
</Exec>
|
||
<If condition="~RetCod=0">
|
||
<Set>GWA.MSG_CD=CMM00000</Set>
|
||
<Set>GWA.MSG_INF=查询成功！</Set>
|
||
</If>
|
||
<ElseIf condition="~RetCod=2">
|
||
<Set>GWA.MSG_CD=CMM0001</Set>
|
||
<Set>GWA.MSG_INF=记录不存在</Set>
|
||
</ElseIf>
|
||
<Else>
|
||
<Set>GWA.MSG_CD=CMM0002</Set>
|
||
<Set>GWA.MSG_INF=系统错误,操作数据库失败！</Set>
|
||
<Return />
|
||
</Else>
|
||
</FlowCtrl>
|
||
</Transaction>
|
||
|
||
<!-- 浏览操作员详细信息 -->
|
||
<Transaction code="0014121" desc="Get User List" log_switch="1">
|
||
<DynSentence name="QRY_CMMTOTMG_OPRDETAILINF">
|
||
<Sentence>
|
||
SELECT * FROM CMMTOTMG WHERE OPR_ID='%s'
|
||
</Sentence>
|
||
<Fields>QRY_OPR_ID|</Fields>
|
||
</DynSentence>
|
||
<FlowCtrl>
|
||
<Exec func="PUB:ReadRecord" error="IGNORE">
|
||
<Arg name="SqlCmd" value="QRY_CMMTOTMG_OPRDETAILINF" />
|
||
</Exec>
|
||
<Exec func="PUB:DumpETF" />
|
||
<If condition="~RetCod=2">
|
||
<Set>GWA.MSG_CD=CMM9000</Set>
|
||
<Set>GWA.MSG_INF1=无此用户！</Set>
|
||
<Return />
|
||
</If>
|
||
<ElseIf condition="~RetCod=0">
|
||
<Set>GWA.MSG_CD=CMM00000</Set>
|
||
<Set>GWA.MSG_INF1=查询成功！</Set>
|
||
</ElseIf>
|
||
<Else>
|
||
<Set>GWA.MSG_CD=CMM0001</Set>
|
||
<Set>GWA.MSG_INF=系统错误,操作数据库失败！</Set>
|
||
<Return />
|
||
</Else>
|
||
</FlowCtrl>
|
||
</Transaction>
|
||
|
||
<!-- 新增操作员 -->
|
||
<Transaction code="0014125" desc="OPR add" log_switch="1">
|
||
<!-- 查询该操作员的编号是否已占用 -->
|
||
<DynSentence name="QRY_CMMTOTMG_OPRNO">
|
||
<Sentence>
|
||
SELECT 'Y' FROM CMMTOTMG WHERE OPR_ID='%s'
|
||
</Sentence>
|
||
<Fields>OPR_ID|</Fields>
|
||
</DynSentence>
|
||
<FlowCtrl>
|
||
<Exec func="ATM:PasswdCheck">
|
||
<Arg name="PassWd" value="$LOG_PSWD" />
|
||
</Exec>
|
||
<If condition="~RetCod!=1">
|
||
<Set>GWA.MSG_CD=CMM2001</Set>
|
||
<Set>GWA.MSG_INF=提示：抱歉，密码至少包含一个字母！</Set>
|
||
<Return />
|
||
</If>
|
||
<Exec func="PUB:ReadRecord" error="IGNORE">
|
||
<Arg name="SqlCmd" value="QRY_CMMTOTMG_OPRNO" />
|
||
</Exec>
|
||
<If condition="~RetCod=0">
|
||
<Set>GWA.MSG_CD=CMM00001</Set>
|
||
<Set>GWA.MSG_INF=提示：抱歉，操作员ID已经存在！</Set>
|
||
<Return />
|
||
</If>
|
||
<ElseIf condition="~RetCod=-1">
|
||
<Set>GWA.MSG_CD=CMM20000</Set>
|
||
<Set>GWA.MSG_INF=系统错误！</Set>
|
||
<Return />
|
||
</ElseIf>
|
||
<Exec func="PUB:InsertRecord" error="IGNORE">
|
||
<Arg name="TblNam" value="CMMTOTMG" />
|
||
</Exec>
|
||
<If condition="~RetCod=0">
|
||
<Set>GWA.MSG_CD=CMM00000</Set>
|
||
<Set>GWA.MSG_INF=提示：添加操作员成功</Set>
|
||
</If>
|
||
<Else>
|
||
<Set>GWA.MSG_CD=CMM00001</Set>
|
||
<Set>GWA.MSG_INF=提示：添加操作员失败:操作数据库出错</Set>
|
||
<Return />
|
||
</Else>
|
||
</FlowCtrl>
|
||
</Transaction>
|
||
|
||
<!-- 修改操作员信息 -->
|
||
<Transaction code="0014123" log_switch="1">
|
||
<DynSentence name="UPD_CMMTOTMG_OPRINF">
|
||
<Sentence>
|
||
OPR_ID='%s'
|
||
</Sentence>
|
||
<Fields>OPR_ID_QRY|</Fields>
|
||
</DynSentence>
|
||
<FlowCtrl>
|
||
<Exec func="PUB:UpdateRecord">
|
||
<Arg name="TblNam" value="CMMTOTMG" />
|
||
<Arg name="CndSts" value="UPD_CMMTOTMG_OPRINF" />
|
||
</Exec>
|
||
<If condition="~RetCod=0">
|
||
<Set>GWA.MSG_CD=CMM00000</Set>
|
||
<Set>GWA.MSG_INF="提示：恭喜，修改成功！"</Set>
|
||
</If>
|
||
<ElseIf condition="~RetCod=-1">
|
||
<Set>GWA.MSG_CD=CMM0001</Set>
|
||
<Set>GWA.MSG_INF="提示：抱歉，修改失败！"</Set>
|
||
<Return />
|
||
</ElseIf>
|
||
</FlowCtrl>
|
||
</Transaction>
|
||
|
||
<!-- 重置操作员的密码-->
|
||
<Transaction code="0014126" log_switch="1">
|
||
<DynSentence name="UPD_CMMTOTMG_OPRPWD">
|
||
<Sentence>
|
||
OPR_ID='%s'
|
||
</Sentence>
|
||
<Fields>OPR_ID_QRY|</Fields>
|
||
</DynSentence>
|
||
<FlowCtrl>
|
||
<Exec func="PUB:UpdateRecord">
|
||
<Arg name="TblNam" value="CMMTOTMG" />
|
||
<Arg name="CndSts" value="UPD_CMMTOTMG_OPRPWD" />
|
||
</Exec>
|
||
<If condition="~RetCod=0">
|
||
<Set>GWA.MSG_CD=CMM00000</Set>
|
||
<Set>GWA.MSG_INF="提示：恭喜，密码修改成功！"</Set>
|
||
</If>
|
||
<ElseIf condition="~RetCod=-1">
|
||
<Set>GWA.MSG_CD=CMM0001</Set>
|
||
<Set>GWA.MSG_INF="提示：抱歉，密码修改失败！"</Set>
|
||
<Return />
|
||
</ElseIf>
|
||
</FlowCtrl>
|
||
</Transaction>
|
||
|
||
<!-- 删除该操作员 -->
|
||
<Transaction code="0014124" log_switch="1">
|
||
<!-- 删除操作员 -->
|
||
<DynSentence name="DEL_CMMTOTMG_OPRINF">
|
||
<Sentence>
|
||
DELETE FROM CMMTOTMG WHERE OPR_ID='%s'
|
||
</Sentence>
|
||
<Fields>OPR_ID_QRY|</Fields>
|
||
</DynSentence>
|
||
<FlowCtrl>
|
||
<Exec func="PUB:ExecSql" > <!-- 执行删除记录操作 -->
|
||
<Arg name="SqlCmd" value="DEL_CMMTOTMG_OPRINF"/>
|
||
</Exec>
|
||
<If condition="~RetCod=0">
|
||
<Set>GWA.MSG_CD=CMM00000</Set>
|
||
<Set>GWA.MSG_INF="提示：删除成功！"</Set>
|
||
</If>
|
||
<ElseIf condition="~RetCod=-1">
|
||
<Set>GWA.MSG_CD=CMM0001</Set>
|
||
<Set>GWA.MSG_INF="提示: 删除失败！"</Set>
|
||
<Return />
|
||
</ElseIf>
|
||
</FlowCtrl>
|
||
</Transaction>
|
||
|
||
<!-- 删除操作员(可批量删除) -->
|
||
<Transaction code="0014127" log_switch="1">
|
||
<!-- 删除操作员 -->
|
||
<DynSentence name="DEL_CMMTOTMG_OPRINF">
|
||
<Sentence>
|
||
DELETE FROM CMMTOTMG WHERE OPR_ID='%s'
|
||
</Sentence>
|
||
<Fields>OPR_ID_QRY|</Fields>
|
||
</DynSentence>
|
||
<FlowCtrl>
|
||
<If condition="ISNULL($DEL_OPR_LST)">
|
||
<Set>GWA.MSG_CD=02042301</Set>
|
||
<Set>GWA.MSG_INF=选择列表不可为空</Set>
|
||
<Return/>
|
||
</If>
|
||
<Exec func="PUB:SplitString" error="IGNORE">
|
||
<Arg name="list" value="$DEL_OPR_LST" />
|
||
<Arg name="group" value="GRP" />
|
||
</Exec>
|
||
<Set>NUM=1</Set>
|
||
<While>
|
||
<If condition="$NUM > $GRP_NUM">
|
||
<Break/>
|
||
</If>
|
||
<Set>OPR_ID_QRY=$GRP[$NUM].DATA</Set>
|
||
<Exec func="PUB:ExecSql">
|
||
<Arg name="SqlCmd" value="DEL_CMMTOTMG_OPRINF"/>
|
||
</Exec>
|
||
<If condition="~RetCod!=0">
|
||
<Set>GWA.MSG_CD=CMM0001</Set>
|
||
<Set>GWA.MSG_INF="提示: 删除失败！"</Set>
|
||
<Return/>
|
||
</If>
|
||
<Set>NUM=ADD($NUM,1)</Set>
|
||
</While>
|
||
</FlowCtrl>
|
||
</Transaction>
|
||
<!--交易码0014200-0014202为权限管理 -->
|
||
|
||
<!--用户权限设置列表 0014200-->
|
||
<Transaction code="0014200" log_switch="1">
|
||
<!--查出权限树上所有的组信息-->
|
||
<DynSentence name="QRY_CMMTPGBN_GRP">
|
||
<Sentence>
|
||
SELECT DISTINCT CMMTPGBN.GRP_ID,CMMTPGBN.GRP_NM
|
||
FROM CMMTPGBN,CMMTATHM
|
||
WHERE CMMTATHM.ACT_ID = CMMTPGBN.ACT_ID AND CMMTATHM.ATH_FLG = '1'
|
||
</Sentence>
|
||
</DynSentence>
|
||
<!--查出权限树上所有的页信息-->
|
||
<DynSentence name="QRY_CMMTPGBN_PAG">
|
||
<Sentence>
|
||
SELECT DISTINCT CMMTPGBN.PAG_ID,CMMTPGBN.PAG_NM,CMMTPGBN.GRP_ID
|
||
FROM CMMTPGBN,CMMTATHM
|
||
WHERE CMMTATHM.ACT_ID = CMMTPGBN.ACT_ID AND CMMTATHM.ATH_FLG = '1'
|
||
</Sentence>
|
||
</DynSentence>
|
||
<!--查出权限树上所有的交易相关信息-->
|
||
<DynSentence name="QRY_CMMTPGBN_TXN">
|
||
<Sentence>
|
||
SELECT DISTINCT CMMTPGBN.ACT_ID,CMMTPGBN.ACT_NM,CMMTPGBN.PAG_ID,CMMTATHM.TX_CD
|
||
FROM CMMTPGBN,CMMTATHM
|
||
WHERE CMMTATHM.ACT_ID = CMMTPGBN.ACT_ID AND CMMTATHM.ATH_FLG = '1'
|
||
</Sentence>
|
||
</DynSentence>
|
||
<!--查出权限树上所有的动作信息-->
|
||
<DynSentence name="QRY_CMMTPGBN_OPRID">
|
||
<Sentence>
|
||
SELECT DISTINCT ACT_ID,PAG_ID
|
||
FROM CMMTATHM
|
||
WHERE OPR_ID = '%s'
|
||
</Sentence>
|
||
<Fields>OPR_ID_QRY|</Fields>
|
||
</DynSentence>
|
||
<FlowCtrl>
|
||
<Exec func="PUB:QueryInGroup">
|
||
<Arg name="SqlCmd" value="QRY_CMMTPGBN_GRP"/>
|
||
<Arg name="RecordName" value="GRP" />
|
||
</Exec>
|
||
<If condition="~RetCod=2">
|
||
<Set>GWA.MSG_CD=CMM9000</Set>
|
||
<Set>GWA.MSG_INF=没有符合条件的组</Set>
|
||
<Return />
|
||
</If>
|
||
<ElseIf condition="~RetCod=0">
|
||
<Set>GWA.MSG_CD=CMM00000</Set>
|
||
<Set>GWA.MSG_INF=查询成功！</Set>
|
||
</ElseIf>
|
||
<Exec func="PUB:QueryInGroup">
|
||
<Arg name="SqlCmd" value="QRY_CMMTPGBN_PAG"/>
|
||
<Arg name="RecordName" value="PAG" />
|
||
</Exec>
|
||
<If condition="~RetCod=2">
|
||
<Set>GWA.MSG_CD=CMM9000</Set>
|
||
<Set>GWA.MSG_INF=没有符合条件的页</Set>
|
||
<Return />
|
||
</If>
|
||
<ElseIf condition="~RetCod=0">
|
||
<Set>GWA.MSG_CD=CMM00000</Set>
|
||
<Set>GWA.MSG_INF=查询成功！</Set>
|
||
</ElseIf>
|
||
<Exec func="PUB:QueryInGroup">
|
||
<Arg name="SqlCmd" value="QRY_CMMTPGBN_TXN"/>
|
||
<Arg name="RecordName" value="TXN" />
|
||
</Exec>
|
||
<If condition="~RetCod=2">
|
||
<Set>GWA.MSG_CD=CMM9000</Set>
|
||
<Set>GWA.MSG_INF=没有符合条件的交易信息</Set>
|
||
<Return />
|
||
</If>
|
||
<ElseIf condition="~RetCod=0">
|
||
<Set>GWA.MSG_CD=CMM00000</Set>
|
||
<Set>GWA.MSG_INF=查询成功！</Set>
|
||
</ElseIf>
|
||
<Exec func="PUB:QueryInGroup">
|
||
<Arg name="SqlCmd" value="QRY_CMMTPGBN_OPRID"/>
|
||
<Arg name="RecordName" value="SELECTED" />
|
||
</Exec>
|
||
<If condition="~RetCod=2">
|
||
<Set>GWA.MSG_CD=CMM9000</Set>
|
||
<Set>GWA.MSG_INF=没有符合条件的记录</Set>
|
||
<Return />
|
||
</If>
|
||
<ElseIf condition="~RetCod=0">
|
||
<Set>GWA.MSG_CD=CMM00000</Set>
|
||
<Set>GWA.MSG_INF=查询成功！</Set>
|
||
</ElseIf>
|
||
</FlowCtrl>
|
||
</Transaction>
|
||
|
||
<!--修改用户权限 0014201-->
|
||
<Transaction code="0014201" log_switch="1">
|
||
<DynSentence name="QRY_CMMTATHM_ACTINF">
|
||
<Sentence>
|
||
SELECT ACT_ID,PAG_ID,TX_CD FROM CMMTATHM WHERE ACT_ID='%s'
|
||
</Sentence>
|
||
<Fields>ACT_ID</Fields>
|
||
</DynSentence>
|
||
<DynSentence name="DEL_CMMTATHM_OPRPRV">
|
||
<Sentence>
|
||
DELETE FROM CMMTATHM WHERE OPR_ID='%s'
|
||
</Sentence>
|
||
<Fields>OPR_ID_QRY|</Fields>
|
||
</DynSentence>
|
||
<FlowCtrl>
|
||
<Set>OPR_ID=$OPR_ID_QRY</Set>
|
||
<Exec func="PUB:SplitString" error="IGNORE">
|
||
<Arg name="list" value="$ACT_LIST" />
|
||
<Arg name="group" value="ACT" />
|
||
</Exec>
|
||
<Exec func="PUB:ExecSql" > <!--删除 该操作员的 CMMTATHM 记录 （PAG_ID,ACT_ID,TX_CD）-->
|
||
<Arg name="SqlCmd" value="DEL_CMMTATHM_OPRPRV"/>
|
||
</Exec>
|
||
<!--插入记录-->
|
||
<Set>NUM=1</Set>
|
||
<While condition="INTCMP($NUM,2,$ACT_NUM)">
|
||
<Set>ACT_ID=$ACT[$NUM].DATA</Set>
|
||
<Exec func="PUB:ReadRecord"><!--取出ACT的信息（ACT_ID,PAG_ID,TXN_CD）-->
|
||
<Arg name="SqlCmd" value="QRY_CMMTATHM_ACTINF"/>
|
||
</Exec>
|
||
<Exec func="PUB:InsertRecord">
|
||
<Arg name="TblNam" value="CMMTATHM"/>
|
||
</Exec>
|
||
<Exec func="PUB:InsertRecord">
|
||
<Arg name="TblNam" value="CMMTATHM"/>
|
||
</Exec>
|
||
<Set>NUM=ADD($NUM,1)</Set>
|
||
</While>
|
||
<Set>GWA.MSG_INF=修改成功</Set>
|
||
</FlowCtrl>
|
||
</Transaction>
|
||
|
||
<!--复制权限-->
|
||
<Transaction code="0014202" log_switch="1">
|
||
<!--获得被复制操作员的权限-->
|
||
<DynSentence name="QRY_CMMTATHM_OPRPRV">
|
||
<Sentence>
|
||
SELECT PAG_ID,ACT_ID,TX_CD FROM CMMTATHM WHERE OPR_ID = '%s'
|
||
</Sentence>
|
||
<Fields>OPR_ID</Fields>
|
||
</DynSentence>
|
||
<!--删除原用户的权限-->
|
||
<DynSentence name="DEL_CMMTATHM_OPRPRV">
|
||
<Sentence>
|
||
DELETE FROM CMMTATHM WHERE OPR_ID='%s'
|
||
</Sentence>
|
||
<Fields>OLD_ID</Fields>
|
||
</DynSentence>
|
||
|
||
<FlowCtrl>
|
||
<Set>OPR_ID=$NEW_ID</Set><!--new_ID是被复制用户-->
|
||
<Exec func="PUB:QueryInGroup">
|
||
<Arg name="SqlCmd" value="QRY_CMMTATHM_OPRPRV"/>
|
||
<Arg name="RecordName" value="ACT"/>
|
||
</Exec>
|
||
<Set>ACT_NUM = $REC_NUM</Set>
|
||
<Exec func="PUB:ExecSql" > <!--删除 该用户的 CMMTATHM 记录 ）-->
|
||
<Arg name="SqlCmd" value="DEL_CMMTATHM_OPRPRV"/>
|
||
</Exec>
|
||
<Set>NUM=1</Set>
|
||
<If condition="INTCMP(ISNULL($ACT_NUM),3,0)">
|
||
<Set>FLAG=$ACT_NUM</Set>
|
||
<While condition="INTCMP($NUM,2,$FLAG)">
|
||
<Set>OPR_ID=$OLD_ID</Set><!--NEW_ID是目标用户1111-->
|
||
<Set>PAG_ID=$ACT[$NUM].PAG_ID</Set>
|
||
<Set>ACT_ID=$ACT[$NUM].ACT_ID</Set>
|
||
<Set>TX_CD=$ACT[$NUM].TX_CD</Set>
|
||
<Exec func="PUB:insertRecord">
|
||
<Arg name="TblNam" value="CMMTATHM"/>
|
||
</Exec>
|
||
<If condition="~RetCod=0">
|
||
<Exec func="PUB:insertRecord">
|
||
<Arg name="TblNam" value="MNGTTXNCTL"/>
|
||
</Exec>
|
||
</If>
|
||
<Set>NUM=ADD($NUM,1)</Set>
|
||
</While>
|
||
<Set>GWA.MSG_INF=复制权限成功</Set>
|
||
</If>
|
||
<Set>OPR_ID=$OLD_ID</Set>
|
||
<Exec func="PUB:QueryInGroup">
|
||
<Arg name="SqlCmd" value="QRY_CMMTATHM_OPRPRV"/>
|
||
<Arg name="RecordName" value="ACTS"/>
|
||
</Exec>
|
||
</FlowCtrl>
|
||
</Transaction>
|
||
<!--交易码0014121-0014127为操作员管理 new -->
|
||
<!-- 查询操作员 -->
|
||
<Transaction code="T0014122" desc="qry user" log_switch="1">
|
||
<DynSentence name="QRY_CMMTOTMG_OPRINF">
|
||
<!-- 查询操作员相关信息 -->
|
||
<Sentence>
|
||
SELECT * FROM CMMTOTMG WHERE ('%s' IS NULL OR OPR_ID='%s' ) AND ('%s' IS
|
||
NULL OR OPR_NM LIKE '%%%s%%' ) AND ('%s' IS NULL OR OPR_STS='%s' )
|
||
ORDER BY OPR_ID
|
||
</Sentence>
|
||
<Fields>OPR_ID_QRY|OPR_ID_QRY|QRY_NAME|QRY_NAME|QRY_STS|QRY_STS|</Fields>
|
||
</DynSentence>
|
||
<FlowCtrl>
|
||
<If condition="ISNULL($PAG_NO)">
|
||
<Set>PAG_NO=$PAGENUM</Set>
|
||
</If>
|
||
<If condition="ISNULL($PAG_NUM)">
|
||
<Set>PAG_NUM=$NUMPERPAGE</Set>
|
||
</If>
|
||
<Exec func="PUB:DBMultiQueryPage" error="IGNORE">
|
||
<Arg name="SqlCmd" value="QRY_CMMTOTMG_OPRINF" />
|
||
<Arg name="PageNo" value="$PAG_NO" />
|
||
<Arg name="RecNumPerPage" value="$PAG_NUM" />
|
||
</Exec>
|
||
</FlowCtrl>
|
||
</Transaction>
|
||
<Transaction code="T0014123" desc="qry user" log_switch="1">
|
||
<FlowCtrl>
|
||
<Exec func="PUB:InsertRecord" error="IGNORE">
|
||
<Arg name="TblNam" value="CMMTOTMG" />
|
||
</Exec>
|
||
<Set>GWA.MSG_CD=CMM00000</Set>
|
||
<Set>GWA.MSG_INF=操作成功</Set>
|
||
</FlowCtrl>
|
||
</Transaction>
|
||
<Transaction code="T0014124" desc="qry user" log_switch="1">
|
||
<DynSentence name="QRY_CMMTOTMG_OPRINF">
|
||
<!-- 查询操作员相关信息 -->
|
||
<Sentence>
|
||
SELECT * FROM CMMTOTMG WHERE ('%s' IS NULL OR OPR_ID='%s' ) AND ('%s' IS
|
||
NULL OR OPR_NM LIKE '%%%s%%' ) AND ('%s' IS NULL OR OPR_STS='%s' )
|
||
ORDER BY OPR_ID
|
||
</Sentence>
|
||
<Fields>OPR_ID_QRY|OPR_ID_QRY|QRY_NAME|QRY_NAME|QRY_STS|QRY_STS|</Fields>
|
||
</DynSentence>
|
||
<FlowCtrl>
|
||
<If condition="ISNULL($PAG_NO)">
|
||
<Set>PAG_NO=$PAGENUM</Set>
|
||
</If>
|
||
<If condition="ISNULL($PAG_NUM)">
|
||
<Set>PAG_NUM=$NUMPERPAGE</Set>
|
||
</If>
|
||
<Exec func="PUB:DBMultiQueryPage" error="IGNORE">
|
||
<Arg name="SqlCmd" value="QRY_CMMTOTMG_OPRINF" />
|
||
<Arg name="PageNo" value="$PAG_NO" />
|
||
<Arg name="RecNumPerPage" value="$PAG_NUM" />
|
||
</Exec>
|
||
<Set>GWA.MSG_CD=CMM00000</Set>
|
||
<Set>GWA.MSG_INF=操作成功</Set>
|
||
</FlowCtrl>
|
||
</Transaction>
|
||
<Transaction code="T0014125" desc="qry user" log_switch="1">
|
||
<DynSentence name="QRY_CMMTOTMG_OPRINF">
|
||
<!-- 查询操作员相关信息 -->
|
||
<Sentence> SELECT * FROM CMMTOTMG WHERE OPR_ID='%s' </Sentence>
|
||
<Fields>OPR_ID_QRY|</Fields>
|
||
</DynSentence>
|
||
<FlowCtrl>
|
||
<Set>T=GETDATETIME(yyyyMMddHHmmssS)</Set>
|
||
<Exec func="PUB:ReadRecord" error="IGNORE">
|
||
<Arg name="SqlCmd" value="QRY_CMMTOTMG_OPRINF" />
|
||
</Exec>
|
||
</FlowCtrl>
|
||
</Transaction>
|
||
</Application>
|