Files
2021-01-12 22:04:24 +08:00

91 lines
4.2 KiB
XML

<?xml version='1.0' encoding='UTF-8'?>
<!-- 信息码: 999999 - 系统繁忙 -->
<Root>
<LibDeclare>
<Library name="IIF" value="hiiif.jar" />
<Library name="LOG" value="higeninf.jar" />
<Library name="WEB" value="hiwebatc.jar" />
<Library name="CMM" value="hicmm.jar" />
</LibDeclare>
<PackageDeclare></PackageDeclare>
<ConfigDeclare></ConfigDeclare>
<TableDeclare></TableDeclare>
<GlobalFunction>
<!--前处理 -->
<Function name="_before">
<Process>
<Set>GWA.SYS_CNL=UI</Set><!--系统渠道 -->
<Set>GWA.BUS_CNL=UI</Set><!--业务渠道 -->
<Set>GWA.MSG_CD=BUI00000</Set>
<Include file="app/cmm/etc/GW_PUB_BEFORE_INC.XML" />
<Exec func="Web:GetSession" error="IGNORE">
<Arg name="ObjNam" value="OPR_INF" />
<Arg name="CUR_OPR_ID" value="CUR_OPR_ID" /><!--操作员ID -->
<Arg name="OPR_PROV" value="OPR_PROV" /><!--操作员归属省 -->
<Arg name="OPR_CITY" value="OPR_CITY" /><!--操作员归属市 -->
<Arg name="OPR_DEPT" value="OPR_DEPT" /><!--操作员归属部门 -->
<Arg name="ORG_CD" value="ORG_CD" /><!--操作员机构号 -->
</Exec>
<If condition="$TXN_CD!=4806280">
<If condition="IS_NOEQUAL_STRING($TXN_CD,0040260,0040280,4716015)">
<!-- 登录交易不判断 -->
<If condition="ISNULL($CUR_OPR_ID)">
<Set>SESSION_TMOUT=1</Set>
<Exec func="PUB:GWASetMsg">
<!--@msg Session超时 -->
<Arg name="MsgCd" value="CMM00001" />
</Exec>
<Exit />
</If>
</If>
</If>
<Set>CURUID=$CUR_OPR_ID</Set>
<Set>BR_NO=999999</Set>
<Set>IP_ADDR=@MSG.SIP</Set>
<!-- 各个交易开始前加个时间戳 -->
<Set>LOG_START_TIME=GETDATETIME(yyyyMMddHHmmssS)</Set>
</Process>
</Function>
<!--后处理 -->
<Function name="_after">
<Process>
<!--Exec func="PUB:DumpETF"/ -->
<!--FLG_LOG值为0:代表此交易不用写入操作日志 ;其他情况则写入操作日志中 -->
<If condition="IS_NOEQUAL_STRING($FLG_LOG,0)">
<!-- 取出SESSION中相关的字段值 -->
<Exec func="Web:GetSession" error="IGNORE">
<Arg name="ObjNam" value="OPR_INF" />
<Arg name="CUR_OPR_ID" value="CUR_OPR_ID" /><!--操作员ID -->
<Arg name="OPR_PROV" value="OPR_PROV" /><!--操作员归属省 -->
<Arg name="OPR_CITY" value="OPR_CITY" /><!--操作员归属市 -->
<Arg name="OPR_DEPT" value="OPR_DEPT" /><!--操作员归属部门 -->
<Arg name="ORG_CD" value="ORG_CD" /><!--操作员机构号 -->
</Exec>
<!-- 登记操作员操作历史,登录操作员相关日志信息 -->
<Set>AREA1.OPR_PROV=$OPR_PROV</Set>
<Set>AREA1.OPR_CITY=$OPR_CITY</Set>
<Set>AREA1.OPR_DEPT=$OPR_DEPT</Set>
<Set>AREA1.OPR_ID=$CUR_OPR_ID</Set>
<Exec func="LOG:GenOperOprHisDetail" error="IGNORE">
<Arg name="DAT_AREA" value="AREA1" />
<!-- 数据区 -->
<Arg name="DAT_FMT" value="FMT" />
<!-- 数据格式码 选输 -->
</Exec>
</If>
<If condition="NOT(ISNULL($output))">
<Exec func="PUB:SetRetPage">
<Arg name="page" value="$output" />
</Exec>
</If>
<Include file="app/cmm/etc/UI_PUB_AFTER_INC.XML" />
</Process>
</Function>
</GlobalFunction>
</Root>