SELECT COUNT(*) BAT_CNT FROM CAPTXNJNL
WHERE DSK_NAM=? AND ORD_DT=? AND CORG_NO=? AND TXN_MOD=? AND BNK_FLG=? AND DSK_NAM_STS='0' AND TXN_STS='U' AND CORG_DSK_NO = '0' AND ROWNUM <= ?
DSK_NAM|ORD_DT|CORG_NO|TXN_MOD|BNK_FLG|MAX_CNT|
SELECT COUNT(*) BAT_CNT FROM CAPTXNJNL
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 <= ?
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'
WHERE DSK_NAM=? AND ORD_DT=? AND CORG_NO=? AND TXN_MOD=? AND BNK_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|MAX_CNT|
UPDATE CAPTXNJNL SET CORG_DSK_NO = ?,CORG_BUS_TYP =?,TXN_CD = '204020', TTXN_CD = ?,ACC_VER_STS= 'S'
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
WHERE DSK_NAM=? AND ORD_DT = ? AND CORG_NO=? AND CORG_DSK_NO = ? AND DSK_NAM_STS='0' AND TXN_STS='U'
DSK_NAM|ORD_DT|CORG_NO|CORG_DSK_NO
SELECT ICBCCORGBUSTYP.NEXTVAL CORG_BUS_TYP FROM DUAL
SELECT BATCH_TYPE FROM (
SELECT case when BNK_FLG='Y' then 'Y' when BNK_FLG='N' then ROUT_FLG end BATCH_TYPE FROM CAPTXNJNL
WHERE DSK_NAM=? AND ORD_DT=? AND CORG_NO=? AND TXN_MOD=? AND DSK_NAM_STS='0' AND TXN_STS='U' AND CORG_DSK_NO = '0')
GROUP BY BATCH_TYPE
DSK_NAM|ORD_DT|CORG_NO|TXN_MOD|
SELECT TAC_NO ICBC_BUS_TYP_SEQ FROM CAPTXNJNL
WHERE DSK_NAM=? AND ORD_DT=? AND CORG_NO=? AND ROWNUM =1
DSK_NAM|ORD_DT|CORG_NO|RSP_CDRSP_MSGCORG_NO=ICBCMAX_CNT=$PARA.MAX_CNTRsp_Cd=80Rsp_Msg=获取业务种类编号失败BR_NO=999999ICBC_BUS_TYP_SEQ=$ICBC_BUS_TYP_SEQRsp_Cd=80Rsp_Msg=获取序号失败CORG_BUS_TYP=$SEL_VALCORG_BUS_TYP=ADD($CORG_BUS_TYP,0)Rsp_Cd=80Rsp_Msg=游标打开失败Rsp_Cd=80Rsp_Msg=读取游标失败CHECK_TMPE=QryBatCntUPDATE_TMPE=UpdDskNoBNK_FLG=YCHECK_TMPE=QryBatCnt1UPDATE_TMPE=UpdDskNo1BNK_FLG=NROUT_FLG=$BATCH_TYPERsp_Cd=80Rsp_Msg=查询数据库失败BAT_CNT=$BAT_CNTBAT_TYP=$FIL_TYPSND_DT=SUBSTR($TACC_TM,1,8)SND_TM=SUBSTR($TACC_TM,9,6)CORG_DSK_NO=STRCAT(GETDATETIME(),$CORG_DSK_NO)CORG_SND_DT=GETDATE()TTXN_CD=PAYPERCOL_BATRsp_Cd=80Rsp_Msg=更新批次号失败Rsp_Cd=80Rsp_Msg=查询数据库失败BAT_STS=0BAT_VER_STS=1BAT_ORN_AMT=$BAT_SUMBAT_ORN_CNT=$BAT_CNTCORG_MERC_ID=ICBCRsp_Cd=STRCAT( , )Rsp_Msg=STRCAT( , )Rsp_Cd=80Rsp_Msg=登记接出批量信息登记表失败Rsp_Cd=80Rsp_Msg=批次重复RSP_CD=00RSP_MSG=交易成功
SELECT *
FROM CAPBATINF
WHERE CORG_DSK_NO=?
AND ORD_DT=?
AND CORG_NO='ICBC'
AND PRO_JRL='1'
CORG_DSK_NO|ORD_DT|
UPDATE CAPTXNJNL
SET DSK_NAM_STS='1'
WHERE DSK_NAM=?
AND
ORD_DT=?
AND CORG_NO=?
AND CORG_DSK_NO = ?
AND TXN_MOD=?
AND
DSK_NAM_STS='0'
AND TXN_STS='U'
DSK_NAM|ORD_DT|CORG_NO|CORG_DSK_NO|TXN_MOD|
UPDATE CAPTXNJNL
SET DSK_NAM_STS='4',
TXN_STS='F',
TTXN_ST='F',
RSP_CD = '80',
RSP_MSG = ? ,
TM_SMP=to_char(sysdate,'yyyymmddhh24miss')
WHERE DSK_NAM=?
AND
ORD_DT=?
AND CORG_NO=?
AND CORG_DSK_NO = ?
AND TXN_MOD=?
AND
DSK_NAM_STS='0'
AND TXN_STS='U'
RSP_MSG|DSK_NAM|ORD_DT|CORG_NO|CORG_DSK_NO|TXN_MOD|
UPDATE CAPBATINF
SET
HNULL(END_TM{1}=?),
HNULL(END_DT{2}=?),
BAT_STS=?,
RSP_CD = ?,
RSP_MSG = ?,
S_RSP_CD = ?,
S_RSP_MSG = ?,
CORG_JRN_NO=?,
BAT_FAL_CNT =?,
BAT_FAL_AMT=?
WHERE
ORD_DT=?
AND CORG_NO=?
AND CORG_DSK_NO=?
AND BAT_STS='0'
END_TM|END_DT|BAT_STS|RSP_CD|RSP_MSG|RSP_CD|RSP_MSG|CORG_JRN_NO|BAT_FAL_CNT|BAT_FAL_AMT|ORD_DT|CORG_NO|CORG_DSK_NO
SELECT TAC_NO AS payer_account,TAC_NAM AS payer_cnname,
'' AS payer_enname,'' AS payee_enname,'' AS manager_card_no,
'' AS manager_card_name,'' AS erp_serial_no,'' AS busi_code,'' AS erp_check_no,'' AS ori_voucher_type,
'' AS ori_voucher_name,'' AS ori_voucher_no,'' AS related_ref_no,CAP_ORD_NO AS i_seq_no,AC_NO AS payee_account,
CUS_NAM AS payee_cnname,LBNK_NO AS payee_bank_no,'CNY' AS currency,
TXN_AMT * 100 AS amount,'工资' AS purpose,
CASE WHEN LENGTH(POSTSCRIPT) <= 20 THEN POSTSCRIPT
WHEN NVL(INSTR(TRIM(POSTSCRIPT),' '),0) !=0
THEN SUBSTR(SUBSTR(TRIM(POSTSCRIPT),1,INSTR(TRIM(POSTSCRIPT),' ') - 1),1,20)
ELSE SUBSTR(TRIM(POSTSCRIPT),1,20) END summary,
DSK_NAM||substr(POSTSCRIPT,1,80) AS postscript,CAP_ORD_NO AS ref_no,case when BNK_FLG='Y' then '' ELSE CITY END payee_city,
case when BNK_FLG='Y' then '' when BNK_FLG='N' AND ROUT_FLG='SUPER' then '' ELSE LBNK_NAM END payee_bank_name,'' AS purpose_code,'' AS summary_en,
case when BNK_FLG='Y' then '2' when BNK_FLG='N' then decode(ROUT_FLG,'SUPER','3','LARGE','1','SMALL','2') end pay_type,
decode(BNK_FLG,'Y','1','N','2') AS io_flag
FROM CAPTXNJNL
WHERE DSK_NAM=?
AND CORG_NO = ?
AND CORG_DSK_NO = ?
AND ORD_DT=?
AND TXN_MOD=?
AND DSK_NAM_STS='0'
AND TXN_STS='U'
DSK_NAM|CORG_NO|CORG_DSK_NO|ORD_DT|TXN_MOD|
UPDATE CAPBATINF SET PRO_JRL ='0'
WHERE ORD_DT=? AND CORG_NO=? AND CORG_DSK_NO=? AND PRO_JRL='1'
ORD_DT|CORG_NO|CORG_DSK_NO|LockKey=STRCAT($CORG_NO,$CORG_DSK_NO)Rsp_Cd=80Rsp_Msg=加锁失败IS_LOCKED=TRUESMS_FLAG=$SMS_FLAGEVENT.DSK_NO=$DSK_NAMEVENT.BAT_NO=$CORG_DSK_NOEVENT.ERR_MSG=工行通道批量代付发送接口调用异常EVT_TYP=EVT_BATCH_SEND_FAILURESERIAL_NORSP_CDRSP_MSGSUMRECRDRsp_Cd=80Rsp_Msg=查询数据库出错Rsp_Cd=31Rsp_Msg=该合作机构不存在Rsp_Cd=80Rsp_Msg=查询数据库失败Rsp_Cd=31Rsp_Msg=该合作机构未启用BatCnt=$BAT_ORN_CNTBatAmt=$BAT_ORN_AMTTXN_DT=GETDATE()TXN_TM=GETDATETIME(HHMISS)MAX_CNT=$PARA.MAX_CNTBAT_SEQ=0TTXNSERVICE=PAYPERTTXNSERVICE1=PAYPER_BATQryExport=Qry_ExportICBC_CYC_CD=001CORG_DSK_NO=$CORG_DSK_NOCORG_MERC_ID=$CORG_MERC_IDTACC_TM=$TACC_TMBAT_TYP=$BAT_TYPRSP_CD=STRCAT( , )RSP_MSG=STRCAT( , )CIS=$GRP_CISBank_Code=102@MSG.className=com.icbc.api.request.MybankEnterpriseSalaryFinancialofficeMesfinstrsubmitRequestV1@MSG.uri=mybank/enterprise/salary/financialoffice/mesfinstrsubmit/V1trans_code=PAYPERtran_date=$TXN_DTtran_time=STRCAT($TXN_TM,000)f_seq_no=$CORG_DSK_NOlanguage=zh_CNsettle_mode=2busi_type=$CORG_BUS_TYPtotal_amount=AMTPOWER($BatAmt,2)instr_count=$BatCntsummary_total=$summary_totalbatch_sum_flag=$batch_sum_flagzip_flag=0zip_flag=1SMS_FLAG=1BAT_STS=3RSP_CD=80RSP_MSG=批次已发送BAT_STS=3RSP_CD=80RSP_MSG=批次已发送TRSP_CD=$TRSP_CDBAT_STS=3RSP_CD=$TRSP_CDRSP_MSG=SUBSTR($TRSP_MSG,1,100)BAT_STS=2RSP_CD=$TRSP_CDRSP_MSG=SUBSTR($TRSP_MSG,1,100)BAT_FAL_CNT=$BAT_ORN_CNTBAT_FAL_AMT=$BAT_ORN_AMTEND_TM=$TXN_TMEND_DT=$TXN_DTRsp_Cd=80Rsp_Msg=更新该批次状态失败SMS_FLAG=0BAT_STS=1Rsp_Cd=$TRsp_CdTRsp_Msg=批次提交成功Rsp_Msg=$TRsp_MsgRsp_Cd=80Rsp_Msg=更新该批次流水处理状态失败BAT_STS=3RSP_CD=80RSP_MSG=批次已发送CORG_JRN_NO=$SERIAL_NOSERIAL_NORSP_CDRSP_MSGSUMRECRD
UPDATE CAPBATINF
SET BAT_STS=? ,
END_TM=? ,
END_DT=?,
BAT_SUC_AMT=?,
BAT_SUC_CNT=?,
BAT_FAL_AMT=?,
BAT_FAL_CNT=?,
RSP_CD = ?,
RSP_MSG = ?
WHERE ORD_DT=?
AND CORG_NO=?
AND CORG_DSK_NO=?
AND BAT_STS=?
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 CAPTXNJNL A
SET
(TTXN_ST,TXN_STS,DSK_NAM_STS,TACC_DT,TACC_TM,TRSP_CD,TRSP_MSG,RSP_MSG,CORG_JRN_NO,TM_SMP)
=
( SELECT TTXN_ST TTXN_ST,
TTXN_ST TXN_STS,
'4',
?,
?,
TRSP_CD,
TRSP_MSG,
TRSP_MSG,
I_SEQ_NO CORG_JRN_NO,
to_char(sysdate,'yyyymmddhh24miss') TM_SMP
FROM CAPICBCPERDTMP B
WHERE B.QRY_I_SEQ_NO = A.CAP_ORD_NO
)
WHERE
A.CORG_NO = 'ICBC'
AND A.CORG_DSK_NO = ?
AND (A.TTXN_ST = 'U' OR
A.TTXN_ST = 'P')
AND ORD_DT=?
TACC_DT|TACC_TM|OCORG_DSK_NO|OORD_DT|
UPDATE CAPDSKINF
SET SUC_CNT=TO_NUMBER(NVL(TRIM(SUC_CNT),0))
+
TO_NUMBER(NVL(TRIM(?),0)),
SUC_AMT=TO_NUMBER(NVL(TRIM(SUC_AMT),0)) +
TO_NUMBER(NVL(TRIM(?),0)),
FAL_CNT=TO_NUMBER(NVL(TRIM(FAL_CNT),0)) +
TO_NUMBER(NVL(TRIM(?),0)),
FAL_AMT=TO_NUMBER(NVL(TRIM(FAL_AMT),0)) +
TO_NUMBER(NVL(TRIM(?),0))
WHERE DSK_NAM=?
BAT_SUC_CNT|BAT_SUC_AMT|BAT_FAL_CNT|BAT_FAL_AMT|ODSK_NAM
SELECT ROWNUM,t.*
FROM CAPTXNJNL t
WHERE DSK_NAM='%s'
AND
CORG_NO = '%s'
AND CORG_DSK_NO = '%s'
AND ORD_DT='%s'
AND
DSK_NAM_STS='1'
AND TXN_STS='U'
ODSK_NAM|OCORG_NO|OCORG_DSK_NO|OORD_DT|
SELECT COUNT(*) BAT_FAL_CNT,NVL(SUM(TXN_AMT),0) BAT_FAL_AMT
FROM CAPTXNJNL
WHERE ORD_DT = ? AND CORG_NO = ? AND CORG_DSK_NO = ?
AND TTXN_ST =
'F'
OORD_DT|CORG_NO|OCORG_DSK_NO
SELECT COUNT(*) BAT_SUC_CNT,NVL(SUM(TXN_AMT),0) BAT_SUC_AMT
FROM CAPTXNJNL
WHERE ORD_DT = ? AND CORG_NO = ? AND CORG_DSK_NO = ?
AND TTXN_ST =
'S'
OORD_DT|CORG_NO|OCORG_DSK_NO
SELECT COUNT(*) AS UNDO_CNT FROM CAPICBCPERD WHERE Result
in
('0','1','2','3','4','5','9','10','95')
SELECT COUNT(*) UNDO_CNT FROM CAPTXNJNL
WHERE CORG_NO = 'ICBC' AND CORG_DSK_NO = ? AND ORD_DT = ? AND TTXN_ST IN ('P','U')
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 = ?,
TM_SMP=to_char(sysdate,'yyyymmddhh24miss')
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
UPDATE CAPBATINF SET PRO_JRL ='0'
WHERE ORD_DT=? AND CORG_NO=? AND CORG_DSK_NO=? AND PRO_JRL='1'
OORD_DT|OCORG_NO|OCORG_DSK_NO|LockKey=STRCAT($OCORG_NO,$OCORG_DSK_NO)Rsp_Cd=80Rsp_Msg=加锁失败IS_LOCKED=TRUESMS_FLAG=$SMS_FLAGEVENT.DSK_NO=$ODSK_NMEVENT.BAT_NO=$OCORG_DSK_NOEVENT.ERR_MSG=工行通道回盘查询接口调用异常EVT_TYP=EVT_BATCH_BACK_FAILURERSP_CDRSP_MSGSUMRECrdORD_TYP=$OBAT_TYPTXN_DT=GETDATE()TXN_TM=GETDATETIME(HHMISS)TACC_DT=$TXN_DTTACC_TM=$TXN_TMORN_JRN_NO=$OCORG_DSK_NOEND_TM=GETDATETIME(HHMISS)END_DT=GETDATE()BAT_SUC_AMT=0BAT_SUC_CNT=0BAT_FAL_CNT=0BAT_FAL_AMT=0RSP_CD=STRCAT( , )RSP_MSG=STRCAT( , )CORG_NO=$OCORG_NOTTXNSERVICE=QPAYPERRsp_Cd=80Rsp_Msg=平台取流水号失败fSeqno=STRCAT(Q,SUBSTR($TXN_DT,3,6),$fSeqno)trans_code=QPAYPERtran_date=$TXN_DTtran_time=STRCAT($TXN_TM,000)f_seq_no=$fSeqnolanguage=zh_CNqry_f_seq_no=$ORN_JRN_NOqry_serial_no=$qry_serial_no@MSG.className=com.icbc.api.request.MybankEnterpriseSalaryFinancialofficeMesfinstrqryRequestV1@MSG.uri=mybank/enterprise/salary/financialoffice/mesfinstrqry/V1SMS_FLAG=1Rsp_Cd=80Rsp_Msg=查询第三方失败Rsp_Cd=80Rsp_Msg=查询第三方失败RSP_CD=$TRSP_CDRSP_MSG=$TRSP_MSGSMS_FLAG=0BAT_STS=3Rsp_Cd=80Rsp_Msg=更新该批次为发送处理状态失败TIME_TEMP= SUBSTR(CALCTIME(GETDATETIME(MMDDHHMISS),-,m,30),3,8)RSP_MSG=STRCAT(发往工行批次,$OCORG_DSK_NO,整批失败)BAT_STS=2Rsp_Cd=80Rsp_Msg=更新该批次状态失败BAT_FAL_AMT=$OBAT_ORN_AMTBAT_FAL_CNT=$OBAT_ORN_CNTRsp_Cd=80Rsp_Msg=更新该批次为发送处理状态失败SMS_FLAG=0BAT_STS=3Rsp_Cd=80Rsp_Msg=更新该批次为发送处理状态失败SMS_FLAG=0BAT_STS=3Rsp_Cd=80Rsp_Msg=更新该批次为发送处理状态失败BAT_STS=5Rsp_Cd=80Rsp_Msg=更新该批次为发送处理状态失败SMS_FLAG=0Rsp_Cd=80Rsp_Msg=更新流水交易状态失败Rsp_Cd=80Rsp_Msg=查询临时表批次记录状态为P的记录数失败UNDO_CNT=$UNDO_CNTBAT_SUC_AMT=$BAT_SUC_AMTBAT_SUC_CNT=$BAT_SUC_CNTBAT_FAL_AMT=$BAT_FAL_AMTBAT_FAL_CNT=$BAT_FAL_CNTBAT_STS=3Rsp_Cd=00Rsp_Msg=交易处理中...Rsp_Cd=80Rsp_Msg=更新该批次状态失败Rsp_Cd=80Rsp_Msg=累加更新接入批量信息表成功失败总笔数及总金额失败Rsp_Cd=00Rsp_Msg=批次处理完成BAT_STS=4Rsp_Cd=80Rsp_Msg=更新该批次为发送处理状态失败TXN_MOD_FLG=$OBAT_TYPCAP_TYP=CAP_PAY_BATRUL_TYP=HROCAP_TYP=$CAP_TYPCORG_NO=$OCORG_NOCSW_TYP=0ORD_DT=$OORD_DTCORG_DSK_NO=$OCORG_DSK_NO
RUL_TYP|CAP_TYP|CORG_NO|CSW_TYP|ORD_DT|CORG_DSK_NO|
Rsp_Cd=80Rsp_Msg=系统错误TRSP_CDRSP_CDRSP_MSGSUMRECRDTXN_DT=GETDATE()TXN_TM=GETDATETIME(HHMISS)Rsp_Cd=80Rsp_Msg=平台取流水号失败fSeqno=STRCAT(Q,SUBSTR($TXN_DT,3,6),$fSeqno)trans_code=QPAYPERtran_date=$TXN_DTtran_time=STRCAT($TXN_TM,000)f_seq_no=STRCAT(Q,SUBSTR($TXN_DT,3,6),$fSeqno)language=zh_CNqry_f_seq_no=1qry_serial_no=$qry_serial_no@MSG.className=com.icbc.api.request.MybankEnterpriseSalaryFinancialofficeMesfinstrqryRequestV1@MSG.uri=mybank/enterprise/salary/financialoffice/mesfinstrqry/V1Rsp_Cd=00Rsp_Msg=心跳检查成功Rsp_Cd=00Rsp_Msg=心跳检查成功EVENT.CORG_NO=ICBCEVENT.ERR_MSG=工行通道通讯异常EVT_TYP=EVT_CHANNEL_COMMU_FAILURERsp_Cd=80Rsp_Msg=系统错误短信告警