Files
ctg-app-ui/pwm/etc/chkpkg/PPD_BOS_GETFILE_PKG.XML
2021-01-12 22:04:24 +08:00

51 lines
3.2 KiB
XML

<?xml version="1.0" encoding='UTF-8'?>
<Package>
<!--上海银行卡通协议对账:获取对账文件-->
<Function name="BOS_GETFILE">
<Output>MSG_CD|</Output>
<Process>
<Set>CHK_FIL_NM=STRCAT(SCF_,$BOS.CHK_FIL_DT,_,$BOS.FIL_DT_SEQ,.txt)</Set> <!-- 对账文件名称 -->
<Set>CHK_FIL_NM_SRC=STRCAT(SCF_,$BOS.CHK_FIL_DT,_,$BOS.FIL_DT_SEQ,.zip)</Set> <!-- 源对账文件名称 -->
<Set>SrcDir=STRCAT(GETENV(HWORKDIR),/data/pwm/)</Set> <!-- 对账文件存放目录 -->
<Set>CHK_DT=GETDATE()</Set>
<Set>chkType=01</Set> <!-- 对帐类型 -->
<Set>instId=10001198</Set> <!-- 移动标识 -->
<Set>date=$BOS.CHK_FIL_DT</Set> <!-- 交易日期 -->
<Set>bnkFName=$CHK_FIL_NM_SRC</Set> <!-- 下载文件名称 -->
<Set>bankCert=STRCAT(GETENV(HWORKDIR),#BOS.SCK.CRT_NM)</Set> <!-- 银行公钥文件 -->
<Set>keyPath=STRCAT(GETENV(HWORKDIR),#BOS.SCK.PRV_KEY)</Set> <!-- 移动私钥文件 -->
<Set>keyPass=#BOS.SCK.CRT_PSW</Set> <!-- 移动私钥密码 -->
<Set>desKey=#BOS.SCK.OPP_CRT_NM</Set> <!-- DES解密密钥 -->
<Set>httpUrl=#BOS.SCK.DL_ROOT</Set> <!-- 下载地址 -->
<Set>FilePath=$SrcDir</Set> <!-- 对帐数据文件保存路径 -->
<!-- 获取上海银行卡通对账文件 -->
<Exec func="MDL:CallExtModule">
<Arg name="MODULE_ID" value="KT-BOS-CK-FIL" />
<Arg name="chkType" value="$chkType" /> <!--对帐类型-->
<Arg name="instId" value="$instId" /> <!--移动标识-->
<Arg name="date" value="$date" /> <!--交易日期和时间-->
<Arg name="bnkFName" value="$bnkFName" /> <!--银行下载文件-->
<Arg name="filePath" value="$FilePath" /> <!--下载保存路径-->
<Arg name="bankCert" value="$bankCert" /> <!--操作员号-->
<Arg name="keyPath" value="$keyPath" /> <!--移动私钥文件-->
<Arg name="keyPass" value="$keyPass" /> <!--移动私钥密码-->
<Arg name="desKey" value="$desKey" /> <!--DES解密密钥-->
<Arg name="httpUrl" value="$httpUrl" /> <!--下载地址-->
</Exec>
<If condition="IS_SUCC(@O.MSG_CD)=0">
<!-- @msg 获取上海银行卡通协议对账文件失败 -->
<Exec func="PUB:CmpSetMsg">
<Arg name="MsgCd" value="PWM25608" />
</Exec>
<Return />
</If>
<!-- 正常结束 -->
<Exec func="PUB:CmpSetMsg">
<Arg name="MsgCd" value="PWM00000" />
</Exec>
</Process>
</Function>
</Package>