diff --git a/cap/etc/batch/BAT_GET_DISK_RESULT_CTL.XML b/cap/etc/batch/BAT_GET_DISK_RESULT_CTL.XML
index 93f3118..81d1190 100644
--- a/cap/etc/batch/BAT_GET_DISK_RESULT_CTL.XML
+++ b/cap/etc/batch/BAT_GET_DISK_RESULT_CTL.XML
@@ -9,7 +9,7 @@
select dsk_nam from (select A.dsk_nam,B.rank from CAPDSKINF A,CAPCUSINF B
where A.dsk_nam in (select dsk_nam from
(select dsk_nam,sum(unfinished_num) unfinished_num,sum(finish_num) finish_num
- from (select dsk_nam,(case when BAT_STS not in ('4','0') then 1 else 0 end)
+ from (select dsk_nam,(case when BAT_STS not in ('4','2') then 1 else 0 end)
unfinished_num ,(case when BAT_STS in ('4','2') then 1 else 0 end) finish_num
from CAPBATINF b where b.dsk_nam in
(select DSK_NAM from CAPDSKINF a where a.dsk_sts = '1' and ORD_DT >= ? )) group by dsk_nam) c
@@ -21,12 +21,20 @@
DT_BEFER|
+
+ UPDATE CAPDSKINF SET dsk_sts = '4',
+ END_DT=?,
+ END_TM=?,
+ MD5_RESULT=?,
+ FILE_ID_RESULT=?
+ WHERE DSK_NAM = ?
+ AND dsk_sts = '1'
+
+ END_DT|END_TM|MD5_RESULT|FILE_ID|DSK_NAM|
+
+
- UPDATE CAPDSKINF SET dsk_sts = '4',
- END_DT=?,
- END_TM=?,
- MD5_RESULT=?,
- FILE_ID_RESULT=?,
+ UPDATE CAPDSKINF SET
SUC_CNT = ?,
SUC_AMT = ?,
FAL_CNT = ?,
@@ -34,7 +42,7 @@
WHERE DSK_NAM = ?
AND dsk_sts = '1'
- END_DT|END_TM|MD5_RESULT|FILE_ID|SUC_CNT|SUC_AMT|FAL_CNT|FAL_AMT|DSK_NAM|
+ SUC_CNT|SUC_AMT|FAL_CNT|FAL_AMT|DSK_NAM|
@@ -159,6 +167,16 @@
FAL_AMT=FDIV($FAIL_TXN_AMT,100,2)
+
+
+
+
+
+ Rsp_Cd=80
+ Rsp_Msg="数据库错误"
+
+
+
RTR_IN.DSK_NAM=$DSK_NAM
@@ -276,4 +294,4 @@
Rsp_Msg=交易成功
-
\ No newline at end of file
+
diff --git a/cap/etc/batch/BAT_GET_TIMER_CTL.XML b/cap/etc/batch/BAT_GET_TIMER_CTL.XML
index f01be43..40de1e2 100644
--- a/cap/etc/batch/BAT_GET_TIMER_CTL.XML
+++ b/cap/etc/batch/BAT_GET_TIMER_CTL.XML
@@ -8,7 +8,7 @@
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
+ 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
diff --git a/cap/etc/batch/DISKRESULLT_PKG.XML b/cap/etc/batch/DISKRESULLT_PKG.XML
index 736576b..4b6cc42 100644
--- a/cap/etc/batch/DISKRESULLT_PKG.XML
+++ b/cap/etc/batch/DISKRESULLT_PKG.XML
@@ -15,7 +15,7 @@
SELECT count(1) BAT_NUM FROM CAPBATINF
- WHERE DSK_NAM = ? AND (BAT_STS <4 OR BAT_STS >4)
+ WHERE DSK_NAM = ? AND BAT_STS not in('4','2')
DSK_NAM|
diff --git a/cap/etc/batch/GET_TOKEN_CTL.XML b/cap/etc/batch/GET_TOKEN_CTL.XML
index 4d3522d..99208ed 100644
--- a/cap/etc/batch/GET_TOKEN_CTL.XML
+++ b/cap/etc/batch/GET_TOKEN_CTL.XML
@@ -59,7 +59,9 @@
-
+
+
+
Rsp_Cd=00
Rsp_Msg=交易成功
diff --git a/cap/etc/batch/ZLL_TEST_CTL.XML b/cap/etc/batch/ZLL_TEST_CTL.XML
index 61c87b0..f52c47c 100644
--- a/cap/etc/batch/ZLL_TEST_CTL.XML
+++ b/cap/etc/batch/ZLL_TEST_CTL.XML
@@ -71,7 +71,7 @@
TESTNAME=initBatch_CMB
- DSK_NAM=2021031500002
+ DSK_NAM=3021031500002
ORD_DT=GETDATE()
TXN_MOD=02
MERC_ID=769346321368612
diff --git a/cap/etc/channel/cmb/Batch_CMB.XML b/cap/etc/channel/cmb/Batch_CMB.XML
index 85d49b3..ec8a32d 100644
--- a/cap/etc/channel/cmb/Batch_CMB.XML
+++ b/cap/etc/channel/cmb/Batch_CMB.XML
@@ -239,7 +239,7 @@
- SELECT TAC_TYP,ROUT_FLG,BR_NO,TAC_NO,substrb(POSTSCRIPT,0,40) POSTSCRIPT
+ SELECT TAC_TYP,ROUT_FLG,BR_NO,TAC_NO, case when TAC_TYP='N' AND POSTSCRIPT='工资' then '薪资' ELSE substrb(POSTSCRIPT,0,40) END POSTSCRIPT
FROM CAPTXNJNL
WHERE DSK_NAM=?
AND CORG_DSK_NO=? and ORD_DT = ? and rownum=1
@@ -249,7 +249,7 @@
SELECT trx_seq trxseq,
- ac_no accnbr,cus_nam accnam,TXN_AMT trsamt,substrb(POSTSCRIPT,0,40) trsdsp,bnk_flg bnkflg,
+ ac_no accnbr,cus_nam accnam,TXN_AMT trsamt,case when TAC_TYP='N' AND POSTSCRIPT='工资' then '薪资' ELSE substrb(POSTSCRIPT,0,40) END trsdsp,bnk_flg bnkflg,
' ' cprref,decode(ROUT_FLG,'SMALL','N','LARGE','Y','') fstflg,
decode(bnk_flg,'N',LBNK_NO,'') rcvbnk,decode(bnk_flg,'N',nvl(bank_nam,' '),'') eacbnk,city eaccty
FROM CAPTXNJNL
@@ -266,8 +266,8 @@
SELECT trx_seq trxseq,
- ac_no eacnbr,cus_nam eacnam,TXN_AMT rcvamt,substrb(POSTSCRIPT,0,40) trsdsp,bnk_flg bnkflg,
- ' ' cprref,substrb(POSTSCRIPT,0,40) trxtxt
+ ac_no eacnbr,cus_nam eacnam,TXN_AMT rcvamt,case when TAC_TYP='N' AND POSTSCRIPT='工资' then '薪资' ELSE substrb(POSTSCRIPT,0,40) END trsdsp,bnk_flg bnkflg,
+ ' ' cprref,case when TAC_TYP='N' AND POSTSCRIPT='工资' then '薪资' ELSE substrb(POSTSCRIPT,0,40) END trxtxt
FROM CAPTXNJNL
WHERE DSK_NAM='%s'
AND CORG_NO = '%s'
@@ -294,21 +294,22 @@
DSK_NAM|ORD_DT|CORG_NO|CORG_DSK_NO|TXN_MOD|
-
UPDATE CAPBATINF
SET BAT_STS=?,
RSP_CD = ?,
RSP_MSG = ?,
- CORG_JRN_NO=?
+ CORG_JRN_NO=?,
+ BAT_FAL_CNT =?,
+ BAT_FAL_AMT=?
WHERE
ORD_DT=?
AND CORG_NO=?
AND CORG_DSK_NO=?
AND BAT_STS='0'
- BAT_STS|RSP_CD|RSP_MSG|CORG_JRN_NO|ORD_DT|CORG_NO|CORG_DSK_NO|
+ BAT_STS|RSP_CD|RSP_MSG|CORG_JRN_NO|BAT_FAL_CNT|BAT_FAL_AMT|ORD_DT|CORG_NO|CORG_DSK_NO|
@@ -326,7 +327,7 @@
TXN_STS='F',
TTXN_ST='F',
RSP_CD = '80',
- RSP_MSG = ?,
+ RSP_MSG = ?
WHERE DSK_NAM=?
AND
ORD_DT=?
@@ -411,7 +412,8 @@
reqid=STRCAT(GETDATETIME(),$CORG_DSK_NO)
- userid=N002980574
+
+ userid=$PARA.USERID
TAC_NO=$TAC_NO
@@ -420,7 +422,7 @@
trxrmk=$POSTSCRIPT
sql_cmd=Qry_Export_CW
grp_nam=ntagcsaix2
- busmod=00001
+ busmod=$PARA.BUSMOD1
payacc=$tac_no
@@ -430,7 +432,7 @@
trxrmk=$POSTSCRIPT
sql_cmd=Qry_Export_CW
grp_nam=ntagcsaix2
- busmod=00001
+ busmod=$PARA.BUSMOD2
payacc=$tac_no
@@ -440,17 +442,17 @@
nusage=$POSTSCRIPT
sql_cmd=Qry_Export
grp_nam=ntagcdtly1
- busmod=00001
+ busmod=$PARA.BUSMOD1
accnbr=$tac_no
TX_COD=NTAGCAPY
- trstyp=BYSA
+ trstyp=BYBK
nusage=$POSTSCRIPT
sql_cmd=Qry_Export
grp_nam=ntagcdtly1
- busmod=00001
+ busmod=$PARA.BUSMOD2
accnbr=$tac_no
@@ -484,7 +486,7 @@
RSP_MSG=STRCAT( , )
-
+
MAX_CNT=$PARA.MAX_CNT
@@ -530,9 +532,11 @@
TRSP_CD=$resultcode
BAT_STS=2
+ BAT_FAL_CNT=$BAT_ORN_CNT
+ BAT_FAL_AMT=$BAT_ORN_AMT
-
+
Rsp_Cd=80
@@ -570,10 +574,7 @@
-
- Rsp_Cd=80
- Rsp_Msg=更新该批次流水处理状态失败
-
+
CORG_JRN_NO=$reqnbr
@@ -836,7 +837,7 @@
yurref=$OCORG_DSK_NO
TX_COD=NTAGCINY
reqid=STRCAT(GETDATETIME(),$OCORG_DSK_NO)
- userid=N002980574
+ userid=$PARA.USERID
@@ -1096,7 +1097,7 @@
- SELECT 'Y' YN FROM CAPCMBRFD WHERE YUR_REF=? AND BTH_DTL=? AND TRS_DAT=?
+ SELECT 'Y' YN FROM CAPCMBRFD WHERE YUR_REF=? AND BTH_DTL=? AND TRS_DAT=?
YUR_REF|BTH_DTL|TRS_DAT|
@@ -1106,7 +1107,9 @@
TRSP_MSG
rep_num
ntagdrfdz1_NUM
-
+
+
+
CORG_DSK_NO=STRCAT(GETDATETIME(),$CORG_DSK_NO)
bbknbr=$brNo
@@ -1117,7 +1120,7 @@
ctnkey=
TX_COD=NTAGDRFD
reqid=STRCAT(GETDATETIME(),$CORG_DSK_NO)
- userid=N002980574
+ userid=$PARA.USERID
trstyp=BYSA
@@ -1218,10 +1221,16 @@
+
+
TX_COD=DCLISMOD
reqid=STRCAT(GETDATETIME(),000000)
- userid=N002980574
- buscod=N03020
+ userid=$PARA.USERID
+ buscod=$buscod
+
+ buscod=N03020
+
+
diff --git a/cap/etc/channel/icbc/BATCH_ICBC.XML b/cap/etc/channel/icbc/BATCH_ICBC.XML
index ad01287..e5f75cc 100644
--- a/cap/etc/channel/icbc/BATCH_ICBC.XML
+++ b/cap/etc/channel/icbc/BATCH_ICBC.XML
@@ -2,7 +2,7 @@
-
+
SELECT COUNT(*) BAT_CNT FROM CAPTXNJNL
@@ -10,7 +10,7 @@
DSK_NAM|ORD_DT|CORG_NO|TXN_MOD|BNK_FLG|MAX_CNT|
-
+
SELECT COUNT(*) BAT_CNT FROM CAPTXNJNL
@@ -18,7 +18,7 @@
DSK_NAM|ORD_DT|CORG_NO|TXN_MOD|BNK_FLG|ROUT_FLG|MAX_CNT|
-
+
UPDATE CAPTXNJNL SET CORG_DSK_NO = ?,CORG_BUS_TYP =?,TXN_CD = '204020', TTXN_CD = ?,ACC_VER_STS= 'S'
@@ -33,8 +33,8 @@
WHERE DSK_NAM=? AND ORD_DT=? AND CORG_NO=? AND TXN_MOD=? AND BNK_FLG=? AND ROUT_FLG=? AND DSK_NAM_STS='0' AND TXN_STS='U' AND CORG_DSK_NO = '0' AND ROWNUM <= ?
CORG_DSK_NO|CORG_BUS_TYP|TTXN_CD|DSK_NAM|ORD_DT|CORG_NO|TXN_MOD|BNK_FLG|ROUT_FLG|MAX_CNT|
-
-
+
+
SELECT COUNT(*) BAT_CNT,NVL(SUM(TXN_AMT),0) BAT_SUM FROM CAPTXNJNL
@@ -71,25 +71,7 @@
CORG_NO=ICBC
MAX_CNT=$PARA.MAX_CNT
-
-
+
@@ -296,14 +278,16 @@
SET BAT_STS=?,
RSP_CD = ?,
RSP_MSG = ?,
- CORG_JRN_NO=?
+ CORG_JRN_NO=?,
+ BAT_FAL_CNT =?,
+ BAT_FAL_AMT=?
WHERE
ORD_DT=?
AND CORG_NO=?
AND CORG_DSK_NO=?
AND BAT_STS='0'
- BAT_STS|RSP_CD|RSP_MSG|CORG_JRN_NO|ORD_DT|CORG_NO|CORG_DSK_NO
+ BAT_STS|RSP_CD|RSP_MSG|CORG_JRN_NO|BAT_FAL_CNT|BAT_FAL_AMT|ORD_DT|CORG_NO|CORG_DSK_NO
@@ -383,17 +367,17 @@
- serial_no
+ SERIAL_NO
RSP_CD
RSP_MSG
SUM
REC
- rd
+ RD
-
+
@@ -475,8 +459,6 @@
summary_total=$summary_total
batch_sum_flag=$batch_sum_flag
-
-
@@ -505,18 +487,31 @@
- BAT_STS=2
- RSP_CD=$TRSP_CD
- RSP_MSG=$TRSP_MSG
-
-
-
-
-
- Rsp_Cd=80
- Rsp_Msg=更新该批次状态失败
+ TRSP_CD=$TRSP_CD
+
+ BAT_STS=3
+ RSP_CD=80
+ RSP_MSG=批次已发送
+
-
+
+ BAT_STS=2
+ RSP_CD=$TRSP_CD
+ RSP_MSG=$TRSP_MSG
+ BAT_FAL_CNT=$BAT_ORN_CNT
+ BAT_FAL_AMT=$BAT_ORN_AMT
+
+
+
+
+
+ Rsp_Cd=80
+ Rsp_Msg=更新该批次状态失败
+
+
+
+
+
SMS_FLAG=0
@@ -538,7 +533,7 @@
- BAT_STS=3
+ BAT_STS=3
RSP_CD=80
RSP_MSG=批次已发送
@@ -555,14 +550,14 @@
-
+
- serial_no
+ SERIAL_NO
RSP_CD
RSP_MSG
SUM
REC
- rd
+ RD
@@ -588,18 +583,7 @@
BAT_STS|END_TM|END_DT|BAT_SUC_AMT|BAT_SUC_CNT|BAT_FAL_AMT|BAT_FAL_CNT|RSP_CD|RSP_MSG|OORD_DT|OCORG_NO|OCORG_DSK_NO|OBAT_STS|
-
-
- UPDATE CAPBATINF
- SET RSP_CD=? ,
- RSP_MSG=?
- WHERE ORD_DT=?
- AND
- CORG_NO=?
- AND CORG_DSK_NO=?
-
- RSP_CD|RSP_MSG|OORD_DT|OCORG_NO|OCORG_DSK_NO|
-
+
UPDATE CAPTXNJNL A
@@ -695,6 +679,30 @@
OCORG_DSK_NO|OORD_DT|
+
+
+
+ UPDATE CAPTXNJNL
+ SET DSK_NAM_STS='4',
+ TXN_STS='F',
+ TTXN_ST='F',
+ RSP_CD = '80',
+ RSP_MSG = ?,
+ TRSP_CD = ?,
+ TRSP_MSG = ?
+ WHERE DSK_NAM=?
+ AND
+ ORD_DT=?
+ AND CORG_NO=?
+ AND CORG_DSK_NO = ?
+ AND
+ DSK_NAM_STS='0'
+ AND TXN_STS='U'
+
+ RSP_MSG|TRSP_CD|TRSP_MSG|ODSK_NAM|OORD_DT|OCORG_NO|OCORG_DSK_NO|
+
+
+
DELETE FROM CAPICBCPERDTMP
@@ -841,6 +849,7 @@
RSP_CD=$TRSP_CD
RSP_MSG=$TRSP_MSG
+ SMS_FLAG=0
BAT_STS=3
@@ -852,6 +861,51 @@
+
+
+ TIME_TEMP= SUBSTR(CALCTIME(GETDATETIME(MMDDHHMISS),-,m,30),3,8)
+
+
+ RSP_MSG=STRCAT(发往工行批次,$OCORG_DSK_NO,整批失败)
+ BAT_STS=2
+
+
+
+
+
+ Rsp_Cd=80
+ Rsp_Msg=更新该批次状态失败
+
+
+ BAT_FAL_AMT=$OBAT_ORN_AMT
+ BAT_FAL_CNT=$OBAT_ORN_CNT
+
+
+
+
+
+
+ Rsp_Cd=80
+ Rsp_Msg=更新该批次为发送处理状态失败
+
+
+
+
+ SMS_FLAG=0
+ BAT_STS=3
+
+
+
+
+
+ Rsp_Cd=80
+ Rsp_Msg=更新该批次为发送处理状态失败
+
+
+
+
+
+
BAT_STS=5
@@ -863,7 +917,6 @@
Rsp_Msg=更新该批次为发送处理状态失败
-
@@ -982,7 +1035,11 @@
RSP_MSG
SUM
REC
- rd
+ RD
+
+
+
+
diff --git a/cap/etc/channel/icbc/OFRTCAPZ_CTL.XML b/cap/etc/channel/icbc/OFRTCAPZ_CTL.XML
index 70bff99..1880ff5 100644
--- a/cap/etc/channel/icbc/OFRTCAPZ_CTL.XML
+++ b/cap/etc/channel/icbc/OFRTCAPZ_CTL.XML
@@ -340,7 +340,7 @@
bank_code=102
account_no=$AC_NO
- begin_date=20210317
+ begin_date=20210225
end_date=$TXN_DT
@@ -367,4 +367,22 @@
+
+
+
+ TX_COD=NTAGTLS2
+ reqid=STRCAT(GETDATETIME(),000000)
+ userid=N002980574
+ buscod=N03020
+
+
+
+
+
+
+
+ RSP_CD=00
+ RSP_MSG=交易成功
+
+
diff --git a/cap/etc/channel/icbc/SCAICBC_ITF.XML b/cap/etc/channel/icbc/SCAICBC_ITF.XML
index 49ce713..d4f3013 100644
--- a/cap/etc/channel/icbc/SCAICBC_ITF.XML
+++ b/cap/etc/channel/icbc/SCAICBC_ITF.XML
@@ -226,7 +226,7 @@
-
+
diff --git a/cap/etc/common/MACRO_BNK_CFG.XML b/cap/etc/common/MACRO_BNK_CFG.XML
index 0308729..6c7de40 100644
--- a/cap/etc/common/MACRO_BNK_CFG.XML
+++ b/cap/etc/common/MACRO_BNK_CFG.XML
@@ -1,13 +1,16 @@
-
- PARA.MAX_CNT=1000
-
-
- GRP_CIS=020090002434552
- ATTACH_NO=102
- PARA.MAX_CNT=1000
-
+
+ PARA.MAX_CNT=1000
+ PARA.USERID=N002980574
+ PARA.BUSMOD1=00001
+ PARA.BUSMOD2=00001
+
+
+ GRP_CIS=020090002434552
+ ATTACH_NO=102
+ PARA.MAX_CNT=1000
+
diff --git a/cap/sql/cre_cmm.sql b/cap/sql/cre_cmm.sql
index dd59fd0..58cc149 100644
--- a/cap/sql/cre_cmm.sql
+++ b/cap/sql/cre_cmm.sql
@@ -847,7 +847,7 @@ create table CMMTRTRULE_BATCH
WEIGHT NUMBER(3) default 0,
TXN_CNL VARCHAR2(20) default 'HRO' not null,
TXN_CNLNA VARCHAR2(64) default '易才批量代付' not null,
- ROUT_FLG VARCHAR2(5) default 0,
+ ROUT_FLG VARCHAR2(5) default 'SUPER',
GRP_NM VARCHAR2(20) default ' ' not null,
SKIP_HLD CHAR(1) default 'N' not null,
constraint CMMTRTRULE_BATCH_FK
@@ -884,7 +884,7 @@ create table CMMTEMRULE_BATCH
WEIGHT NUMBER(3) default 0,
TXN_CNL VARCHAR2(20) default 'CAP' not null,
TXN_CNLNA VARCHAR2(64) default '易才批量代付' not null,
- ROUT_FLG VARCHAR2(5) default 0,
+ ROUT_FLG VARCHAR2(5) default 'SUPER',
GRP_NM VARCHAR2(20) default ' ' not null,
SKIP_HLD CHAR(1) default 'N' not null,
constraint CMMTEMRULE_BATCH_FK