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