ctg-app-ui/pts/etc/common/PTS_INC.XML

<?xml version='1.0' encoding='UTF-8'?>
<!-- 信息码: 999999 - 系统繁忙 -->
<Root>
	<LibDeclare>
		<Library name="HSM" value="hiematc.jar" />
		<Library name="WEB" value="hiwebatc.jar" />
		<Library name="PRT" value="hiprt.jar" />
		<Library name="IPS" value="hiips.jar" />
		<Library name="DES" value="himod.jar" />
		<Library name="ACM" value="hiacm.jar" />         <!-- 帐户组件,金融类 -->
		<Library name="ACMPUB" value="hiacmpub.jar" />   <!-- 帐户组件,非金融类 -->
		<Library name="URM" value="hiurm.jar" />
		<Library name="RRC" value="hirrc.jar" />
		<Library name="IIF" value="hiiif.jar" />
		<Library name="SSO" value="hisso.jar" />        <!-- 单点登陆 -->
		<Library name="MAIL" value="hisunmail.jar" />    <!--邮件 -->
		<Library name="AES" value="himodatc.jar" />
		<Library name="FEE" value="hifee.jar" />        <!-- 计算手续费 -->
		<Library name="RPM" value="hireport.jar" />  
	</LibDeclare>

	<PackageDeclare>
		<Package name="PRT" value="app/pts/etc/common/PTS_BAS_PKG.XML" />
		<Package name="URM" value="app/urm/etc/URM_PKG.XML" />
		<Package name="MKM" value="app/mkm/etc/MKM_PKG.XML" />
	</PackageDeclare>

	<ConfigDeclare>
		<Config name="PARAFILE" value="app/pts/etc/common/PTS_PRA_LST.XML" />
		<Config name="PRTCSW" value="app/pts/etc/common/PTS_CSW.XML" />
	</ConfigDeclare>

	<TableDeclare>
	</TableDeclare>
	<GlobalFunction>
		<!--前处理 -->
		<Function name="_before">
			<Process>
				<Set>SYS_CNL=WWW</Set>
				<Set>BUS_CNL=WWW</Set>
				<!--ren_zhl -->
				<Set>@MSG.SIP=119.161.156.246</Set>
				<!--ren_zhl -->
				<Include file="app/cmm/etc/GW_PUB_BEFORE_INC.XML" />
				<!-- 各个交易开始前加个时间戳 -->
				<Set>LOG_START_TIME=GETDATETIME(yyyyMMddHHmmssS)</Set>
				<If condition="IS_NOEQUAL_STRING($GWA.TX_CD,PTS0011111)">
					<Exec func="Web:GetSession" error="IGNORE">
						<Arg name="ObjNam" value="USR_INF" />
						<Arg name="MBL_NO" value="MBL_NO" />                   <!--手机号 -->
						<Arg name="USR_OPR_LOG_ID" value="USR_OPR_LOG_ID" />   <!--别名 -->
						<Arg name="CUS_NM" value="CUS_NM" />                   <!--用户名 -->
					</Exec>
					<Set>USR_INF.MBL_NO=$MBL_NO</Set>
					<Set>USR_INF.USR_OPR_LOG_ID=$USR_OPR_LOG_ID</Set>
					<Set>USR_INF.CUS_NM=$CUS_NM</Set>
				</If>

				<If condition="ISNULL($ID_NO)=0">
					<Set>ID_NO=DESENCODE($ID_NO)</Set>
				</If>
				<If condition="ISNULL($CAP_CRD_NO)=0">
					<If condition="INTCMP(STRLEN($CAP_CRD_NO),1,25)">
						<Set>CAP_CRD_NO=DESENCODE($CAP_CRD_NO)</Set>
					</If>
				</If>

                <Exec func="Web:GetSession" error="IGNORE">
					<Arg name="ObjNam" value="RAND_INF" />
					<Arg name="CPU_KEY" value="CPU_KEY" />                   <!--密码控件随机因子 -->
				</Exec>
				<Set>OCX_KEY=$CPU_KEY</Set>
			</Process>
		</Function>

		<!--后处理 -->
		<Function name="_after">
			<Process>

				<Include file="app/cmm/etc/GW_PUB_AFTER_INC.XML" />
				<Exec func="PUB:LogData" error="IGNORE">
					<Arg name="objSvr" value="S.LOGSVR" />
					<Arg name="txnCd" value="LOG001" />
				</Exec>
				<!-- 成功 -->
				<If
					condition="OR(IS_EQUAL_STRING($GWA.MSG_TYP,N),IS_EQUAL_STRING($GWA.MSG_TYP,W))">
					<!-- Ajax请求时返回判断 -->
					<If
						condition="AND(NOT(ISNULL($RSP_AJX)),IS_EQUAL_STRING(TOLOWER($RSP_AJX),true),ISNULL($RSP_PAG))">
						<Exec func="WEB:OuputWEBDataFilter" error='IGNORE'>
							<Arg name="include" value="RSP_*" />
							<Arg name="include" value="JSONCALLBACK " />
						</Exec>
					</If>
					<Else>
						<If condition="ISNULL($RSP_PAG)">
							<Set>LOG_DET=没有设定RSP_PAG</Set>
							<Set>RSP_PAG=/pmodule/common/jsp/success.jsp</Set>
						</If>
						<!-- 用redirect -->
						<If condition="NOT(ISNULL($OPER_REDIR))">
							<!-- 将内部URL转换为外部URL -->
							<Exec func="PRT:URLReWriter" error="IGNORE">
								<Arg name="RSP_PAG" value="$RSP_PAG" />
							</Exec>
							<Exec func="PUB:SetRedirectPage">
								<Arg name="PAGE" value="$RSP_PAG" />
							</Exec>
						</If>
						<Else>
							<Exec func="PUB:SetRetPage">
								<Arg name="PAGE" value="$RSP_PAG" />
							</Exec>
						</Else>
					</Else>
				</If>
				<Else>
					<!-- Ajax返回判断 -->
					<If
						condition="AND(NOT(ISNULL($RSP_AJX)),IS_EQUAL_STRING(TOLOWER($RSP_AJX),true),ISNULL($RSP_PAG))">
						<Exec func="WEB:OuputWEBDataFilter" error='IGNORE'>
							<Arg name="include" value="RSP_*" />
							<Arg name="include" value="JSONCALLBACK " />
						</Exec>
					</If>
					<Else>
						<!-- 取得错误信息页面 -->
						<If condition="ISNULL($RSP_PAG)">
							<Set>RSP_PAG=/pmodule/common/jsp/failure.jsp</Set>
						</If>
						<Exec func="PUB:SetRetPage">
							<Arg name="PAGE" value="$RSP_PAG" />
						</Exec>
					</Else>
				</Else>
			</Process>
		</Function>
	</GlobalFunction>
</Root>