185 lines
5.9 KiB
XML
185 lines
5.9 KiB
XML
<?xml version='1.0' encoding='UTF-8'?>
|
|
<Application name="CMM" code="003"
|
|
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">
|
|
|
|
<GlobalFunction>
|
|
<Function name="_before">
|
|
<Exec func="PUB:DumpETF" />
|
|
<Set>RSP_CD=9999999</Set>
|
|
<Set>RSP_MSG=异常错误</Set>
|
|
<Set>BR_NO=331999</Set>
|
|
<Set>U_BR_NO=331999</Set>
|
|
<Set>CURUID=$SESSION.USR_ID</Set>
|
|
|
|
<Set>SYS_CD=BFC</Set>
|
|
<Set>CNL_TYP=UI</Set>
|
|
<Set>MON_FLG=1</Set>
|
|
</Function>
|
|
<Function name="_after">
|
|
<If condition="NOT(ISNULL($output))">
|
|
<Exec func="PUB:SetRetPage">
|
|
<Arg name="page" value="$output" />
|
|
</Exec>
|
|
</If>
|
|
|
|
<If condition="NOT(ISNULL($RSP_CD))">
|
|
<Set>RSP_CODY=SUBSTR($RSP_CD,4,4)</Set>
|
|
<If condition="$RSP_CODY=0000">
|
|
<Set>MSG_TYP=N</Set>
|
|
<Set>MON_STS=S</Set>
|
|
</If>
|
|
<Else>
|
|
<If condition="$MSG_TYP!=N">
|
|
<Exec func="PUB:RollbackWork" />
|
|
<Set>MSG_TYP=E</Set>
|
|
<Set>RSP_MSG=STRCAT( ,$RSP_MSG, )</Set>
|
|
<Set>RSP_CD=1052999</Set>
|
|
<Set>MON_STS=F</Set>
|
|
</If>
|
|
</Else>
|
|
</If>
|
|
<Exec func="PUB:DumpETF" />
|
|
</Function>
|
|
</GlobalFunction>
|
|
|
|
<Transaction code="U021324" log_switch="1" desc="功能收藏增加">
|
|
<DynSentence name="ADD_USR_FUNC">
|
|
<Sentence>
|
|
INSERT INTO BUIUSRFUNC VALUES('%s','%s','%s','%s','%s')
|
|
</Sentence>
|
|
<Fields>USR_ID|PAG_ID|PAG_NM|PAG_URL|TM_SMP</Fields>
|
|
</DynSentence>
|
|
<DynSentence name="QRY_FUNC_NUM">
|
|
<Sentence>
|
|
SELECT COUNT(USR_ID) AS USR_FUNC_NUM
|
|
FROM BUIUSRFUNC
|
|
WHERE USR_ID='%s' AND
|
|
PAG_ID='%s'
|
|
</Sentence>
|
|
<Fields>USR_ID|PAG_ID</Fields>
|
|
</DynSentence>
|
|
<FlowCtrl>
|
|
<Set>USR_ID=$SESSION.USR_ID</Set>
|
|
<Set>TM_SMP=GETDATETIME()</Set>
|
|
<If condition="ISNULL($USR_ID)=1">
|
|
<Set>MSG_CD=210009</Set>
|
|
<Set>RSP_MSG=用户ID为空</Set>
|
|
<Return/>
|
|
</If>
|
|
<If condition="ISNULL($PAG_ID)=1">
|
|
<Set>MSG_CD=210009</Set>
|
|
<Set>RSP_MSG=页面ID为空</Set>
|
|
<Return/>
|
|
</If>
|
|
<Exec func="pub:ReadRecord">
|
|
<Arg name="SqlCmd" value="QRY_FUNC_NUM"/>
|
|
</Exec>
|
|
<If condition="~RetCod=0">
|
|
<If condition="STRCMP($USR_FUNC_NUM,0)=0">
|
|
<Exec func="pub:ExecSql">
|
|
<Arg name="SqlCmd" value="ADD_USR_FUNC"/>
|
|
</Exec>
|
|
<If condition="~RetCod=0">
|
|
<Set>MSG_CD=000000</Set>
|
|
<Set>MSG_TYP=N</Set>
|
|
<Set>RSP_MSG=功能收藏成功</Set>
|
|
</If>
|
|
<Else>
|
|
<Set>MSG_CD=210009</Set>
|
|
<Set>MSG_TYP=Y</Set>
|
|
<Set>RSP_MSG=功能收藏失败，数据库错误</Set>
|
|
</Else>
|
|
</If>
|
|
<Else>
|
|
<Set>MSG_CD=000000</Set>
|
|
<Set>RSP_MSG=功能已存在于收藏中</Set>
|
|
</Else>
|
|
</If>
|
|
<Else>
|
|
<Set>MSG_CD=210009</Set>
|
|
<Set>RSP_MSG=功能收藏失败，数据库错误</Set>
|
|
</Else>
|
|
</FlowCtrl>
|
|
</Transaction>
|
|
|
|
<Transaction code="U021325" log_switch="1" desc="用户操作记录">
|
|
<DynSentence name="ADD_USR_ACT">
|
|
<Sentence>
|
|
INSERT INTO BUIUSRACT VALUES('%s','%s','%s','%s','%s')
|
|
</Sentence>
|
|
<Fields>USR_ID|PAG_ID|PAG_NM|TM_SMP|PAG_URL</Fields>
|
|
</DynSentence>
|
|
<FlowCtrl>
|
|
<Set>USR_ID=$SESSION.USR_ID</Set>
|
|
<Set>TM_SMP=GETDATETIME()</Set> <!-- 设置时间戳 -->
|
|
<Exec func="pub:ExecSql">
|
|
<Arg name="SqlCmd" value="ADD_USR_ACT"/>
|
|
</Exec>
|
|
<If condition="~RetCod=0">
|
|
<Set>MSG_TYP=N</Set>
|
|
</If>
|
|
<Else>
|
|
<Set>MSG_TYP=Y</Set>
|
|
</Else>
|
|
</FlowCtrl>
|
|
</Transaction>
|
|
|
|
<Transaction code="U021326" log_switch="1" desc="收藏夹">
|
|
<DynSentence name="QRY_USR_FUNC">
|
|
<Sentence>
|
|
SELECT PAG_ID,PAG_NM,PAG_URL,TM_SMP
|
|
FROM BUIUSRFUNC
|
|
WHERE USR_ID = '%s'
|
|
</Sentence>
|
|
<Fields>USR_ID</Fields>
|
|
</DynSentence>
|
|
<DynSentence name="QRY_TOP5_FUNC">
|
|
<Sentence>
|
|
SELECT USR_COUNT,PAG_ID,PAG_NM,PAG_URL
|
|
FROM ( SELECT COUNT(USR_ID) AS USR_COUNT,PAG_ID,PAG_NM,PAG_URL FROM BUIUSRACT WHERE USR_ID = '%s' GROUP BY PAG_ID,PAG_NM,PAG_URL ORDER BY USR_COUNT DESC )
|
|
WHERE ROWNUM < 6
|
|
</Sentence>
|
|
<Fields>USR_ID</Fields>
|
|
</DynSentence>
|
|
<FlowCtrl>
|
|
<Set>USR_ID=$SESSION.USR_ID</Set>
|
|
<Exec func="PUB:QueryInGroup" error="IGNORE">
|
|
<Arg name="SqlCmd" value="QRY_USR_FUNC" />
|
|
<Arg name="RecordName" value="FUNC_GRP" />
|
|
</Exec>
|
|
<Exec func="PUB:QueryInGroup" error="IGNORE">
|
|
<Arg name="SqlCmd" value="QRY_TOP5_FUNC" />
|
|
<Arg name="RecordName" value="TOP5_GRP" />
|
|
</Exec>
|
|
<Set>MSG_TYP=N</Set>
|
|
</FlowCtrl>
|
|
</Transaction>
|
|
|
|
<Transaction code="U021327" log_switch="1" desc="delete func">
|
|
<DynSentence name="DEL_USR_FUNC">
|
|
<Sentence>
|
|
DELETE FROM BUIUSRFUNC
|
|
WHERE USR_ID = '%s' AND
|
|
PAG_ID = '%s'
|
|
</Sentence>
|
|
<Fields>USR_ID|PAG_ID</Fields>
|
|
</DynSentence>
|
|
<FlowCtrl>
|
|
<Set>USR_ID=$SESSION.USR_ID</Set>
|
|
<Exec func="PUB:ExecSql">
|
|
<Arg name="SqlCmd" value="DEL_USR_FUNC" />
|
|
</Exec>
|
|
<If condition="~RetCod=0">
|
|
<Set>MSG_TYP=N</Set>
|
|
</If>
|
|
<Else>
|
|
<Set>MSG_TYP=Y</Set>
|
|
<Set>RSP_MSG=删除功能失败，数据库错误</Set>
|
|
</Else>
|
|
</FlowCtrl>
|
|
</Transaction>
|
|
|
|
|
|
|