Merge pull request 'sit' (#24) from sit into uat
Reviewed-on: #24
This commit was merged in pull request #24.
This commit is contained in:
+457
-446
File diff suppressed because it is too large
Load Diff
@@ -10,7 +10,7 @@
|
||||
select listagg(dsk) WITHIN GROUP(ORDER BY dsk) dsk from
|
||||
(select '['||DSK_NAM||','||CORG_DSK_NO||','||BAT_STS||','||CORG_NO||']' dsk from CAPBATINF
|
||||
where BAT_STS <> '4' and BAT_STS <> '2' and
|
||||
TO_CHAR(TO_DATE(snd_dt||snd_tm, 'yyyymmddHH24MISS')+'%s'/24/60, 'yyyymmddHH24MISS') <= TO_CHAR(sysdate,'yyyymmddHH24MISS'))
|
||||
TO_CHAR(TO_DATE(decode(SND_DT||SND_TM,' ',null,SND_DT||SND_TM), 'yyyymmddHH24MISS')+'%s'/24/60, 'yyyymmddHH24MISS') <= TO_CHAR(sysdate,'yyyymmddHH24MISS'))
|
||||
</Sentence>
|
||||
<Fields>MINUTE</Fields>
|
||||
</DynSentence>
|
||||
|
||||
@@ -9,7 +9,7 @@
|
||||
<Sentence>
|
||||
select listagg(DSK) WITHIN GROUP(ORDER BY DSK) DSK from
|
||||
(select '['||DSK_NO||','||DSK_STS||']' DSK from CAPDSKINF where dsk_sts <> '4' and
|
||||
TO_CHAR(TO_DATE(rcv_dt||rcv_tm, 'yyyymmddHH24MISS')+'%s'/24/60, 'yyyymmddHH24MISS') <= TO_CHAR(sysdate,'yyyymmddHH24MISS'))
|
||||
TO_CHAR(TO_DATE(decode(RCV_DT||RCV_TM,' ',null,RCV_DT||RCV_TM), 'yyyymmddHH24MISS')+'%s'/24/60, 'yyyymmddHH24MISS') <= TO_CHAR(sysdate,'yyyymmddHH24MISS'))
|
||||
</Sentence>
|
||||
<Fields>MINUTE</Fields>
|
||||
</DynSentence>
|
||||
|
||||
@@ -1,81 +1,79 @@
|
||||
<?xml version='1.0' encoding='UTF-8'?>
|
||||
<Tran>
|
||||
<Transaction code="BAT_GET_TIMER" log_switch='1' desc="获取批量回盘">
|
||||
<Attributes>
|
||||
<Attribute name="nodatabase" value="2"/> <!--数据库长连接-->
|
||||
</Attributes>
|
||||
<DynSentence name="QryBatLst"> <!--查询该文件批次是否处理完成-->
|
||||
<Sentence>
|
||||
SELECT TXN_CNL,DSK_NAM ODSK_NAM,ORD_DT OORD_DT,CORG_MERC_ID OCORG_MERC_ID,CORG_NO OCORG_NO,CORG_DSK_NO OCORG_DSK_NO
|
||||
,AC_DT OAC_DT,SND_DT OSND_DT,SND_TM OSND_TM,BAT_STS OBAT_STS,BAT_ORN_AMT OBAT_ORN_AMT,BAT_ORN_CNT OBAT_ORN_CNT,
|
||||
BAT_TYP OBAT_TYP,CORG_FIL_NAM OCORG_FIL_NAM,SND_DT,SND_TM,MERC_ID OMERC_ID,TCORG_DSK_NO,'批量代发' RMK ,GET_TIME,CORG_JRN_NO,SND_TIME OSND_TIME
|
||||
FROM CAPBATINF
|
||||
where Corg_Dsk_No in (select Corg_Dsk_No from ( SELECT A.Corg_Dsk_No
|
||||
FROM CAPBATINF A,CAPDSKINF B,CAPCUSINF C
|
||||
WHERE (A.BAT_STS='1' OR A.BAT_STS='3')
|
||||
AND A.ORD_DT > ?
|
||||
AND A.CORG_NO =?
|
||||
AND A.REG_ID = ?
|
||||
AND A.NOD_ID = ?
|
||||
AND A.PRO_JRL = '0'
|
||||
AND (SND_TIME<=?)
|
||||
AND (A.GET_TIME <=? OR A.GET_TIME IS NULL)
|
||||
AND A.DSK_NAM = B.DSK_NAM AND B.Customer_Id = C.Customer_Id
|
||||
order by rank)
|
||||
where ROWNUM = '1' )
|
||||
FOR UPDATE skip locked
|
||||
</Sentence>
|
||||
<Fields>TOD_DT|CORG_NO|REG_ID|NOD_ID|C_SND_TIME|C_GET_TIME|</Fields>
|
||||
</DynSentence>
|
||||
<DynSentence name="UpdPRO_JRL">
|
||||
<Sentence>
|
||||
UPDATE CAPBATINF SET PRO_JRL = '1' , GET_TIME = ? WHERE CORG_NO = ? AND CORG_DSK_NO = ? AND AC_DT = ?
|
||||
</Sentence>
|
||||
<Fields>N_GET_TIME|OCORG_NO|OCORG_DSK_NO|OAC_DT|</Fields>
|
||||
</DynSentence>
|
||||
<FlowCtrl>
|
||||
|
||||
<Set>REG_ID=@SYS.ics.sys.regionid</Set>
|
||||
<Set>NOD_ID=@SYS.ics.sys.nodeid</Set>
|
||||
<!---test开始-->
|
||||
<Set>@MSG.WSO=/do_success.jsp</Set>
|
||||
<Set>IS_TEST=FALSE</Set>
|
||||
<Transaction code="BAT_GET_TIMER" log_switch='1' desc="获取批量回盘">
|
||||
<Attributes>
|
||||
<Attribute name="nodatabase" value="2"/> <!--数据库长连接-->
|
||||
</Attributes>
|
||||
<DynSentence name="QryBatLst"> <!--查询该文件批次是否处理完成-->
|
||||
<Sentence>
|
||||
SELECT TXN_CNL,DSK_NAM ODSK_NAM,ORD_DT OORD_DT,CORG_MERC_ID OCORG_MERC_ID,CORG_NO OCORG_NO,CORG_DSK_NO OCORG_DSK_NO
|
||||
,AC_DT OAC_DT,SND_DT OSND_DT,SND_TM OSND_TM,BAT_STS OBAT_STS,BAT_ORN_AMT OBAT_ORN_AMT,BAT_ORN_CNT OBAT_ORN_CNT,
|
||||
BAT_TYP OBAT_TYP,CORG_FIL_NAM OCORG_FIL_NAM,SND_DT,SND_TM,MERC_ID OMERC_ID,TCORG_DSK_NO,'批量代发' RMK ,GET_TIME,CORG_JRN_NO,SND_TIME OSND_TIME
|
||||
FROM CAPBATINF
|
||||
where Corg_Dsk_No in (select Corg_Dsk_No from ( SELECT A.Corg_Dsk_No
|
||||
FROM CAPBATINF A,CAPDSKINF B,CAPCUSINF C
|
||||
WHERE (A.BAT_STS='1' OR A.BAT_STS='3')
|
||||
AND A.ORD_DT > ?
|
||||
AND A.CORG_NO =?
|
||||
AND A.PRO_JRL = '0'
|
||||
AND (SND_TIME<=?)
|
||||
AND (A.GET_TIME <=? OR A.GET_TIME IS NULL)
|
||||
AND A.DSK_NAM = B.DSK_NAM AND B.Customer_Id = C.Customer_Id
|
||||
order by rank)
|
||||
where ROWNUM = '1' )
|
||||
FOR UPDATE skip locked
|
||||
</Sentence>
|
||||
<Fields>TOD_DT|CORG_NO|C_SND_TIME|C_GET_TIME|</Fields>
|
||||
</DynSentence>
|
||||
<DynSentence name="UpdPRO_JRL">
|
||||
<Sentence>
|
||||
UPDATE CAPBATINF SET PRO_JRL = '1' , GET_TIME = ?, REG_ID = ?, NOD_ID = ? WHERE CORG_NO = ? AND CORG_DSK_NO = ? AND ORD_DT = ?
|
||||
</Sentence>
|
||||
<Fields>N_GET_TIME|REG_ID|NOD_ID|OCORG_NO|OCORG_DSK_NO|OORD_DT|</Fields>
|
||||
</DynSentence>
|
||||
<FlowCtrl>
|
||||
|
||||
<!---test结束-->
|
||||
<Set>REG_ID=@SYS.ics.sys.regionid</Set>
|
||||
<Set>NOD_ID=@SYS.ics.sys.nodeid</Set>
|
||||
<!---test开始-->
|
||||
<Set>@MSG.WSO=/do_success.jsp</Set>
|
||||
<Set>IS_TEST=FALSE</Set>
|
||||
|
||||
<!---test结束-->
|
||||
|
||||
<Quote name="Init_CAP01"/> <!--交易初始化-->
|
||||
<!--此处需要增加代付批次发送第三方的处理-->
|
||||
<Set>SND_TIME_INTERVAL=$SND_TIME_INTERVAL</Set>
|
||||
<!-- 组合一些关键信息 -->
|
||||
<Set>END_DT=$CRE_DT</Set>
|
||||
<Set>END_TM=$CRE_TM</Set>
|
||||
<Set>TOD_DT=CALCDATE(GETDATE(),-,d,3)</Set>
|
||||
<!--Set>TOD_DT=GETDATE()</Set-->
|
||||
|
||||
<Quote name="Init_CAP01"/> <!--交易初始化-->
|
||||
<!--此处需要增加代付批次发送第三方的处理-->
|
||||
<Set>SND_TIME_INTERVAL=$SND_TIME_INTERVAL</Set>
|
||||
<!-- 组合一些关键信息 -->
|
||||
<Set>END_DT=$CRE_DT</Set>
|
||||
<Set>END_TM=$CRE_TM</Set>
|
||||
<Set>TOD_DT=CALCDATE(GETDATE(),-,d,3)</Set>
|
||||
<!--Set>TOD_DT=GETDATE()</Set-->
|
||||
|
||||
<While>
|
||||
<Set>C_SND_TIME=SUBSTR(CALCTIME(GETDATETIME(MMDDHHMISS),-,m,$SND_TIME_INTERVAL),3,8)</Set>
|
||||
<Set>C_GET_TIME=SUBSTR(CALCTIME(GETDATETIME(MMDDHHMISS),-,m,5),3,8)</Set>
|
||||
<Exec func="PUB:ReadRecord" error="IGNORE">
|
||||
<Arg name="SqlCmd" value="QryBatLst"/>
|
||||
</Exec>
|
||||
<Set>C_GET_TIME=SUBSTR(CALCTIME(GETDATETIME(MMDDHHMISS),-,m,$GET_TIME_INTERVAL),3,8)</Set>
|
||||
<Exec func="PUB:ReadRecord" error="IGNORE">
|
||||
<Arg name="SqlCmd" value="QryBatLst"/>
|
||||
</Exec>
|
||||
<If condition="~RetCod=2">
|
||||
<Break/>
|
||||
<Return/>
|
||||
</If>
|
||||
<ElseIf condition="~RetCod<0">
|
||||
<Set>Rsp_Cd=80</Set>
|
||||
<Set>Rsp_Msg=查询数据库错误</Set>
|
||||
<Return/>
|
||||
<Set>Rsp_Cd=80</Set>
|
||||
<Set>Rsp_Msg=查询数据库错误</Set>
|
||||
<Return/>
|
||||
</ElseIf>
|
||||
<Set>N_GET_TIME=GETDATETIME(DDHHMISS)</Set>
|
||||
<!--Set>REG_ID=@SYS.ics.sys.regionid</Set>
|
||||
<Set>NOD_ID=@SYS.ics.sys.nodeid</Set-->
|
||||
<Exec func="PUB:ExecSql" error="IGNORE">
|
||||
<Arg name="SqlCmd" value="UpdPRO_JRL"/>
|
||||
|
||||
|
||||
<Exec func="PUB:ExecSql" error="IGNORE">
|
||||
<Arg name="SqlCmd" value="UpdPRO_JRL"/>
|
||||
</Exec>
|
||||
<If condition="~RetCod<0">
|
||||
<Set>Rsp_Cd=80</Set>
|
||||
<Set>Rsp_Msg="数据库错误"</Set>
|
||||
<Break/>
|
||||
<Set>Rsp_Cd=80</Set>
|
||||
<Set>Rsp_Msg="数据库错误"</Set>
|
||||
<Return/>
|
||||
</If>
|
||||
<Exec func="PUB:CommitWork"/>
|
||||
<Set>Rsp_Cd=STRCAT( , )</Set>
|
||||
@@ -88,8 +86,8 @@
|
||||
<Set>HTxnCd=STRCAT(getBatch_,$OCORG_NO)</Set>
|
||||
|
||||
<Exec func="PUB:CallThirdService" error="IGNORE">
|
||||
<Arg name="HTxnCd" value="$HTxnCd" />
|
||||
<Arg name="ObjSvr" value="OFRTCAP1" />
|
||||
<Arg name="HTxnCd" value="$HTxnCd" />
|
||||
<Arg name="ObjSvr" value="OFRTCAP1" />
|
||||
</Exec>
|
||||
|
||||
<!--获取银联批量回盘文件-->
|
||||
@@ -101,7 +99,7 @@
|
||||
-->
|
||||
<Set>RSP_CD=$RSP_CD</Set>
|
||||
<Set>RSP_MSG=$RSP_MSG</Set>
|
||||
|
||||
|
||||
<!--实时代付记账组件-->
|
||||
<!--<If condition="IS_EQUAL_STRING($Rsp_Cd,00)">
|
||||
<Set>TXN_MOD_FLG=$OBAT_TYP</Set>
|
||||
@@ -113,7 +111,7 @@
|
||||
<Set>CAP_TYP=CAP_PAY_BAT</Set>
|
||||
<Set>RMK=批量代付</Set>
|
||||
</ElseIf>
|
||||
|
||||
|
||||
<Set>TX_AMT=$BAT_SUC_AMT</Set>
|
||||
<Set>TX_JRN_NO=$OCORG_DSK_NO</Set>
|
||||
<Set>CORG_NO=$OCORG_NO</Set>
|
||||
@@ -123,12 +121,12 @@
|
||||
<Output>MSG_CD|</Output>
|
||||
</Call>
|
||||
</If>
|
||||
|
||||
|
||||
<If condition="AND(IS_NOEQUAL_STRING($Rsp_Cd,00),IS_NOEQUAL_STRING($OBAT_TYP,02))">
|
||||
<Set>TXN_MOD_FLG=$OBAT_TYP</Set>
|
||||
<Set>CAP_TYP=CAP_PAY_BAT</Set>
|
||||
<Set>RMK=批量代付</Set>
|
||||
|
||||
|
||||
<Set>TX_AMT=0</Set>
|
||||
<Set>TX_JRN_NO=$OCORG_DSK_NO</Set>
|
||||
<Set>CORG_NO=$OCORG_NO</Set>
|
||||
@@ -138,11 +136,11 @@
|
||||
<Output>MSG_CD|</Output>
|
||||
</Call>
|
||||
</If>-->
|
||||
|
||||
</While>
|
||||
|
||||
|
||||
<Exec func="PUB:CommitWork"/>
|
||||
<Set>Rsp_Cd=00</Set>
|
||||
<Set>Rsp_Msg=交易成功</Set>
|
||||
</FlowCtrl>
|
||||
</FlowCtrl>
|
||||
</Transaction>
|
||||
</Tran>
|
||||
|
||||
@@ -1,107 +1,105 @@
|
||||
<?xml version='1.0' encoding='UTF-8'?>
|
||||
<Tran>
|
||||
<Transaction code="BAT_SEND_TIMER" log_switch='1' desc="发送批量文件">
|
||||
<Attributes>
|
||||
<Attribute name="nodatabase" value="2"/> <!--数据库长连接-->
|
||||
</Attributes>
|
||||
<DynSentence name="QryBatInf">
|
||||
<Sentence>
|
||||
select * from CAPBATINF
|
||||
where Corg_Dsk_No in (select Corg_Dsk_No from ( SELECT A.Corg_Dsk_No
|
||||
FROM CAPBATINF A,CAPDSKINF B,CAPCUSINF C
|
||||
WHERE A.BAT_STS = '0'
|
||||
AND A.ORD_DT > ?
|
||||
AND A.PRO_JRL = '0'
|
||||
AND A.REG_ID = ?
|
||||
AND A.NOD_ID = ?
|
||||
AND (A.SND_TIME<=? OR A.SND_TIME IS NULL)
|
||||
AND A.CORG_NO = ?
|
||||
AND A.DSK_NAM = B.DSK_NAM AND B.Customer_Id = C.Customer_Id
|
||||
order by rank)
|
||||
where ROWNUM = '1' )
|
||||
FOR UPDATE skip locked
|
||||
</Sentence>
|
||||
<Fields>TOD_DT|REG_ID|NOD_ID|C_SND_TIME|CORG_NO|</Fields>
|
||||
</DynSentence>
|
||||
<DynSentence name="UpdPRO_JRL">
|
||||
<Sentence>
|
||||
UPDATE CAPBATINF SET PRO_JRL = '1' , SND_TIME = ?, CORG_SND_DT=? WHERE CORG_NO = ? AND CORG_DSK_NO = ? AND AC_DT = ?
|
||||
</Sentence>
|
||||
<Fields>N_SND_TIME|CORG_SND_DT|CORG_NO|CORG_DSK_NO|AC_DT|</Fields>
|
||||
</DynSentence>
|
||||
<DynSentence name="UPD_CAPBATINF_Rsp_Msg">
|
||||
<Sentence>
|
||||
UPDATE CAPBATINF SET RSP_CD=? , RSP_MSG=? ,PRO_JRL = '0'
|
||||
WHERE CORG_NO=? AND CORG_DSK_NO=?
|
||||
</Sentence>
|
||||
<Fields>Rsp_Cd|Rsp_Msg|CORG_NO|CORG_DSK_NO|</Fields>
|
||||
</DynSentence>
|
||||
<FlowCtrl>
|
||||
<Transaction code="BAT_SEND_TIMER" log_switch='1' desc="发送批量文件">
|
||||
<Attributes>
|
||||
<Attribute name="nodatabase" value="2"/> <!--数据库长连接-->
|
||||
</Attributes>
|
||||
<DynSentence name="QryBatInf">
|
||||
<Sentence>
|
||||
select * from CAPBATINF
|
||||
where Corg_Dsk_No in (select Corg_Dsk_No from ( SELECT A.Corg_Dsk_No
|
||||
FROM CAPBATINF A,CAPDSKINF B,CAPCUSINF C
|
||||
WHERE A.BAT_STS = '0'
|
||||
AND A.ORD_DT > ?
|
||||
AND A.PRO_JRL = '0'
|
||||
AND (A.SND_TIME<=? OR A.SND_TIME IS NULL)
|
||||
AND A.CORG_NO = ?
|
||||
AND A.DSK_NAM = B.DSK_NAM AND B.Customer_Id = C.Customer_Id
|
||||
order by rank)
|
||||
where ROWNUM = '1' )
|
||||
FOR UPDATE skip locked
|
||||
</Sentence>
|
||||
<Fields>TOD_DT|C_SND_TIME|CORG_NO|</Fields>
|
||||
</DynSentence>
|
||||
<DynSentence name="UpdPRO_JRL">
|
||||
<Sentence>
|
||||
UPDATE CAPBATINF SET PRO_JRL = '1' , SND_TIME = ?, CORG_SND_DT=?, REG_ID = ?, NOD_ID = ? WHERE CORG_NO = ? AND CORG_DSK_NO = ? AND ORD_DT = ?
|
||||
</Sentence>
|
||||
<Fields>N_SND_TIME|CORG_SND_DT|REG_ID|NOD_ID|CORG_NO|CORG_DSK_NO|ORD_DT|</Fields>
|
||||
</DynSentence>
|
||||
<DynSentence name="UPD_CAPBATINF_Rsp_Msg">
|
||||
<Sentence>
|
||||
UPDATE CAPBATINF SET RSP_CD=? , RSP_MSG=? ,PRO_JRL = '0'
|
||||
WHERE CORG_NO=? AND CORG_DSK_NO=?
|
||||
</Sentence>
|
||||
<Fields>Rsp_Cd|Rsp_Msg|CORG_NO|CORG_DSK_NO|</Fields>
|
||||
</DynSentence>
|
||||
<FlowCtrl>
|
||||
|
||||
<Quote name="Init_CAP01"/> <!--交易初始化-->
|
||||
<!--此处需要增加代付批次发送第三方的处理-->
|
||||
<Quote name="Init_CAP01"/> <!--交易初始化-->
|
||||
<!--此处需要增加代付批次发送第三方的处理-->
|
||||
|
||||
<!-- 组合一些关键信息 -->
|
||||
<Set>END_DT=$CRE_DT</Set>
|
||||
<Set>END_TM=$CRE_TM</Set>
|
||||
<Set>TOD_DT=CALCDATE(GETDATE(),-,d,3)</Set>
|
||||
<!--Set>TOD_DT=GETDATE()</Set-->
|
||||
<Set>REG_ID=@SYS.ics.sys.regionid</Set>
|
||||
<Set>NOD_ID=@SYS.ics.sys.nodeid</Set>
|
||||
<!-- 组合一些关键信息 -->
|
||||
<Set>END_DT=$CRE_DT</Set>
|
||||
<Set>END_TM=$CRE_TM</Set>
|
||||
<Set>TOD_DT=CALCDATE(GETDATE(),-,d,3)</Set>
|
||||
<!--Set>TOD_DT=GETDATE()</Set-->
|
||||
<Set>REG_ID=@SYS.ics.sys.regionid</Set>
|
||||
<Set>NOD_ID=@SYS.ics.sys.nodeid</Set>
|
||||
|
||||
<While>
|
||||
<Set>C_SND_TIME=SUBSTR(CALCTIME(GETDATETIME(MMDDHHMISS),-,m,10),3,8)</Set>
|
||||
<Exec func="PUB:ReadRecord" error="IGNORE">
|
||||
<Arg name="SqlCmd" value="QryBatInf"/>
|
||||
</Exec>
|
||||
<If condition="~RetCod=2">
|
||||
<Break/>
|
||||
</If>
|
||||
<ElseIf condition="~RetCod<0">
|
||||
<Set>Rsp_Cd=80</Set>
|
||||
<Set>Rsp_Msg="查询数据库错误"</Set>
|
||||
<Break/>
|
||||
</ElseIf>
|
||||
<Set>TMP_SND_TIME=GETDATETIME()</Set>
|
||||
<Set>N_SND_TIME=SUBSTR($TMP_SND_TIME,7,8)</Set>
|
||||
<Set>CORG_SND_DT=SUBSTR($TMP_SND_TIME,1,8)</Set>
|
||||
<!--Set>REG_ID=@SYS.ics.sys.regionid</Set>
|
||||
|
||||
<Set>C_SND_TIME=SUBSTR(CALCTIME(GETDATETIME(MMDDHHMISS),-,m,2),3,8)</Set>
|
||||
<Exec func="PUB:ReadRecord" error="IGNORE">
|
||||
<Arg name="SqlCmd" value="QryBatInf"/>
|
||||
</Exec>
|
||||
<If condition="~RetCod=2">
|
||||
<Return/>
|
||||
</If>
|
||||
<ElseIf condition="~RetCod<0">
|
||||
<Set>Rsp_Cd=80</Set>
|
||||
<Set>Rsp_Msg="查询数据库错误"</Set>
|
||||
<Return/>
|
||||
</ElseIf>
|
||||
<Set>TMP_SND_TIME=GETDATETIME()</Set>
|
||||
<Set>N_SND_TIME=SUBSTR($TMP_SND_TIME,7,8)</Set>
|
||||
<Set>CORG_SND_DT=SUBSTR($TMP_SND_TIME,1,8)</Set>
|
||||
<!--Set>REG_ID=@SYS.ics.sys.regionid</Set>
|
||||
<Set>NOD_ID=@SYS.ics.sys.nodeid</Set-->
|
||||
<Exec func="PUB:ExecSql" error="IGNORE">
|
||||
<Arg name="SqlCmd" value="UpdPRO_JRL"/>
|
||||
<Arg name="SqlCmd" value="UpdPRO_JRL"/>
|
||||
</Exec>
|
||||
<If condition="~RetCod<0">
|
||||
<Set>Rsp_Cd=80</Set>
|
||||
<Set>Rsp_Msg="数据库错误"</Set>
|
||||
<Break/>
|
||||
<Set>Rsp_Cd=80</Set>
|
||||
<Set>Rsp_Msg="数据库错误"</Set>
|
||||
<Return/>
|
||||
</If>
|
||||
<Exec func="PUB:CommitWork"/>
|
||||
<Exec func="PUB:BeginWork"/>
|
||||
|
||||
|
||||
<Set>TACC_TM=GETDATETIME()</Set>
|
||||
<Set>BAT_SUM=$BAT_ORN_AMT</Set>
|
||||
<Set>BAT_CNT=$BAT_ORN_CNT</Set>
|
||||
|
||||
<If condition="IS_EQUAL_STRING($BAT_TYP,02)">
|
||||
<Set>TXN_MOD=02</Set>
|
||||
<Set>ORD_TYP=12</Set> <!--代付-->
|
||||
<Set>TXN_MOD=02</Set>
|
||||
<Set>ORD_TYP=12</Set> <!--代付-->
|
||||
</If>
|
||||
<ElseIf condition="IS_EQUAL_STRING($BAT_TYP,01)">
|
||||
<Set>TXN_MOD=01</Set>
|
||||
<Set>ORD_TYP=11</Set> <!--代收-->
|
||||
<Set>TXN_MOD=01</Set>
|
||||
<Set>ORD_TYP=11</Set> <!--代收-->
|
||||
</ElseIf>
|
||||
|
||||
<Set>HTxnCd=STRCAT(sendBatch_,$CORG_NO)</Set>
|
||||
|
||||
<Exec func="PUB:CallThirdService" error="IGNORE">
|
||||
<Arg name="HTxnCd" value="$HTxnCd" />
|
||||
<Arg name="ObjSvr" value="OFRTCAP1" />
|
||||
<Arg name="In" value="CORG_DSK_NO|ORD_DT|TXN_MOD|ORD_TYP|TACC_TM|BAT_SUM|BAT_CNT|" />
|
||||
<Arg name="HTxnCd" value="$HTxnCd" />
|
||||
<Arg name="ObjSvr" value="OFRTCAP1" />
|
||||
<Arg name="In" value="CORG_DSK_NO|ORD_DT|TXN_MOD|ORD_TYP|TACC_TM|BAT_SUM|BAT_CNT|" />
|
||||
</Exec>
|
||||
<If condition="~RetCod!=0">
|
||||
<Set>Rsp_Cd=80</Set>
|
||||
<Set>Rsp_Msg=发送批次失败</Set>
|
||||
<Return/>
|
||||
<Set>Rsp_Cd=80</Set>
|
||||
<Set>Rsp_Msg=发送批次失败</Set>
|
||||
<Return/>
|
||||
</If>
|
||||
<!--调用发送银联交易-->
|
||||
<!--
|
||||
@@ -112,10 +110,10 @@
|
||||
-->
|
||||
<Set>RSP_CD=$RSP_CD</Set>
|
||||
<Set>RSP_MSG=$RSP_MSG</Set>
|
||||
</While>
|
||||
<Exec func="PUB:CommitWork"/>
|
||||
<Set>Rsp_Cd=00</Set>
|
||||
<Set>Rsp_Msg=交易成功</Set>
|
||||
</FlowCtrl>
|
||||
|
||||
<Exec func="PUB:CommitWork"/>
|
||||
<Set>Rsp_Cd=00</Set>
|
||||
<Set>Rsp_Msg=交易成功</Set>
|
||||
</FlowCtrl>
|
||||
</Transaction>
|
||||
</Tran>
|
||||
|
||||
@@ -6,11 +6,13 @@
|
||||
<Set>PARA.USERID=N002980574</Set><!--用户ID-->
|
||||
<Set>PARA.BUSMOD1=00001</Set> <!--代发工资模式-->
|
||||
<Set>PARA.BUSMOD2=00001</Set> <!--代发其他模式-->
|
||||
<Set>PARA.TRSTYP1=BYSA</Set> <!--交易代码 代发工资-->
|
||||
<Set>PARA.TRSTYP2=BYBK</Set> <!--交易代码 代发其他 -->
|
||||
</Macro>
|
||||
<Macro name="Batch_Cfg_ICBC" desc="工行批量参数">
|
||||
<Set>GRP_CIS=020090002434552</Set> <!--集团CIS号-->
|
||||
<Set>ATTACH_NO=102</Set> <!--归属银行编号-->
|
||||
<Set>PARA.MAX_CNT=1000</Set> <!--最大笔数 默认1000-->
|
||||
<Set>PARA.MAX_CNT=200</Set> <!--最大笔数 默认100 压缩支持1000,不压缩最大支持150-->
|
||||
</Macro>
|
||||
</FrontTab>
|
||||
|
||||
|
||||
@@ -21,11 +21,11 @@
|
||||
<Data><ROOT><GWA><SYS_CNL>SYS</SYS_CNL></GWA></ROOT></Data>
|
||||
</CycleItem>
|
||||
<!--心跳招行-->
|
||||
<CycleItem istxn='0' objsvr="OFRTCAP1" txncod='HEARTBEAT_CMB' txndatatype='text/etf' txndat='' funcname='' funcpath = '' interval="30" sndflag ='0' tmout="30" minute='*' hour='*' monthday='*' weekday='*' monthweek='*' month='*' trace='1'>
|
||||
<CycleItem istxn='0' objsvr="OFRTCAP1" txncod='HEARTBEAT_CMB' txndatatype='text/etf' txndat='' funcname='' funcpath = '' interval="120" sndflag ='0' tmout="30" minute='*' hour='*' monthday='*' weekday='*' monthweek='*' month='*' trace='1'>
|
||||
<Data><ROOT><GWA><SYS_CNL>SYS</SYS_CNL></GWA></ROOT></Data>
|
||||
</CycleItem>
|
||||
<!--心跳工行-->
|
||||
<CycleItem istxn='0' objsvr="OFRTCAP1" txncod='HEARTBEAT_ICBC' txndatatype='text/etf' txndat='' funcname='' funcpath = '' interval="30" sndflag ='0' tmout="30" minute='*' hour='*' monthday='*' weekday='*' monthweek='*' month='*' trace='1'>
|
||||
<CycleItem istxn='0' objsvr="OFRTCAP1" txncod='HEARTBEAT_ICBC' txndatatype='text/etf' txndat='' funcname='' funcpath = '' interval="120" sndflag ='0' tmout="30" minute='*' hour='*' monthday='*' weekday='*' monthweek='*' month='*' trace='1'>
|
||||
<Data><ROOT><GWA><SYS_CNL>SYS</SYS_CNL></GWA></ROOT></Data>
|
||||
</CycleItem>
|
||||
<!--接入批次长时间未处理完成查询-->
|
||||
@@ -37,7 +37,19 @@
|
||||
<Data><ROOT><GWA><SYS_CNL>SYS</SYS_CNL></GWA></ROOT></Data>
|
||||
</CycleItem>
|
||||
|
||||
|
||||
|
||||
<CycleItem istxn='0' objsvr="OFRTCAP1" txncod='BAT_SEND_TIMER' txndatatype='text/etf' txndat='' funcname='' funcpath = '' interval="65" sndflag ='0' tmout="30" minute='*' hour='*' monthday='*' weekday='*' monthweek='*' month='*' trace='1'>
|
||||
<Data><ROOT><CORG_NO>CMB</CORG_NO><GWA><SYS_CNL>SYS</SYS_CNL></GWA></ROOT></Data>
|
||||
</CycleItem>
|
||||
|
||||
<CycleItem istxn='0' objsvr="OFRTCAP1" txncod='BAT_SEND_TIMER' txndatatype='text/etf' txndat='' funcname='' funcpath = '' interval="65" sndflag ='0' tmout="30" minute='*' hour='*' monthday='*' weekday='*' monthweek='*' month='*' trace='1'>
|
||||
<Data><ROOT><CORG_NO>ICBC</CORG_NO><GWA><SYS_CNL>SYS</SYS_CNL></GWA></ROOT></Data>
|
||||
</CycleItem>
|
||||
|
||||
<CycleItem istxn='0' objsvr="OFRTCAP1" txncod='BAT_GET_TIMER' txndatatype='text/etf' txndat='' funcname='' funcpath = '' interval="65" sndflag ='0' tmout="30" minute='*' hour='*' monthday='*' weekday='*' monthweek='*' month='*' trace='1'>
|
||||
<Data><ROOT><CORG_NO>ICBC</CORG_NO><SND_TIME_INTERVAL>2</SND_TIME_INTERVAL><GET_TIME_INTERVAL>2</GET_TIME_INTERVAL><GWA><SYS_CNL>SYS</SYS_CNL></GWA></ROOT></Data>
|
||||
</CycleItem>
|
||||
|
||||
<CycleItem istxn='0' objsvr="OFRTCAP1" txncod='BAT_GET_TIMER' txndatatype='text/etf' txndat='' funcname='' funcpath = '' interval="65" sndflag ='0' tmout="30" minute='*' hour='*' monthday='*' weekday='*' monthweek='*' month='*' trace='1'>
|
||||
<Data><ROOT><CORG_NO>CMB</CORG_NO><SND_TIME_INTERVAL>2</SND_TIME_INTERVAL><GET_TIME_INTERVAL>2</GET_TIME_INTERVAL><GWA><SYS_CNL>SYS</SYS_CNL></GWA></ROOT></Data>
|
||||
</CycleItem>
|
||||
</Cycles>
|
||||
|
||||
Reference in New Issue
Block a user