SELECT UPPER(CRD_EMK_SEQ) PRE_EMK_SEQ,UPPER(CRD_TX_SEQ) PRE_TX_SEQ,CRD_STS,SUB_AC,USR_NO,CRD_STSW,CRD_VER,MAIN_AC FROM LPSTCRD WHERE MBL_NO=? AND CRD_STS!='2' MBL_NO| SELECT UPPER(CRD_EMK_SEQ) PRE_EMK_SEQ,UPPER(CRD_TX_SEQ) PRE_TX_SEQ,CRD_STS,SUB_AC,USR_NO,CRD_STSW,CRD_VER,MAIN_AC FROM LPSTCRD WHERE MBL_NO=? AND CRD_STS!='2' FOR UPDATE MBL_NO| UPDATE LPSTCRD SET CRD_EMK_SEQ=? ,CRD_TX_SEQ=?,TM_SMP=? WHERE MBL_NO=? AND SUB_AC=? CRD_EMK_SEQ|@O.STK_AREA.CRD_TX_SEQ|SYS_TM_SMP|MBL_NO|SUB_AC| SELECT EMK_STS FROM LPSTEMK WHERE SUB_AC=? AND CRD_TX_SEQ=? AND EMK_TYP='S' SUB_AC|@O.STK_AREA.CRD_TX_SEQ| UPDATE LPSTEMK SET EMK_STS='0',TM_SMP=? WHERE ORD_NO=? SYS_TM_SMP|ORD_NO| SELECT MSG_INF FROM PUBTMSG WHERE MSG_CD =? GWA.MSG_CD| CMD_CD=SUBSTR($PIN_DAT,1,2) ~MSG_DAT=查询应用序列号信息成功 SUB_AC|PIN_DAT|

MSG_CD|

~MSG_DAT=验证报文MAC失败 CMD_CD|SUB_AC|PIN_DAT|MAIN_AC|

PIN_DAT|MSG_CD|

~MSG_DAT=解密失败 TXN_DAT=@O.PIN_DAT CMD_CD|TXN_DAT|

MSG_CD|STK_AREA|

~MSG_DAT=报文解析失败 RDM_NO1=@O.STK_AREA.RDM_NO1 CRD_BAL=TOUPPER(ADDCHAR(DEC2HEX(@O.STK_AREA.CRD_BAL),8,0,1)) TX_AMT=TOUPPER(ADDCHAR(DEC2HEX(@O.STK_AREA.TX_AMT),8,0,1)) CRD_EMK_SEQ=@O.STK_AREA.CRD_EMK_SEQ MAC1=@O.STK_AREA.MAC1 SUB_AC|RDM_NO1|CRD_BAL|TX_AMT|CRD_EMK_SEQ|MAC1|

MSG_CD|

~MSG_DAT=验证交易报文MAC失败 RSL_CD=01 UPD_FLG=0 END INP_DAT.CMD_CD=@O.STK_AREA.CMD_CD INP_DAT.TXN_DAT=$TXN_DAT INP_DAT.SUB_AC=$SUB_AC INP_DAT|GWA|

MSG_CD|

~MSG_DAT=未确认信息同步失败 ~MSG_DAT=未确认信息处理完毕 INP_DAT.MBLNO_OR_LOGID=$MBL_NO INP_DAT.TX_CD=$GWA.TX_CD INP_DAT|

OUT_DAT|MSG_CD|

RSL_CD=01 END CI_NO=@O.OUT_DAT.CI_NO U_NO=@O.OUT_DAT.USR_NO USR_PROV=@O.OUT_DAT.USR_PROV USR_CITY=@O.OUT_DAT.USR_CITY CCY_CD=CNY RISK_DAT.MBL_NO=$MBL_NO RISK_DAT.RISK_SWITCH=C RISK_DAT.TX_AMT=AMTSIMPLEFMT(@O.STK_AREA.TX_AMT) TMP_TX_AMT=ADD(@O.STK_AREA.CRD_BAL,@O.STK_AREA.TX_AMT) RISK_DAT.TX_AMT_TOT=AMTSIMPLEFMT($TMP_TX_AMT) RISK_DAT|GWA|

MSG_CD|

RSL_CD=01 END INP_DAT.MBL_NO=$MBL_NO INP_DAT.PAY_PSWD_IN=@O.STK_AREA.PAY_PSW GWA|INP_DAT|

OUT_DAT|MSG_CD|

RSL_CD=01 END EMK_SWITCH=0 ORD_NO=$GWA.JRN_NO ORD_DT=$GWA.TX_DT TX_DT=$GWA.TX_DT TX_TM=$GWA.TX_TM AC_DT=$GWA.AC_DT EMK_STS=4 LAST_EMK_CMD=1 CRD_TX_SEQ=@O.STK_AREA.CRD_TX_SEQ CRD_PPD_RSL=0000 EMK_TYP=S BUS_CNL=STK RDM_NO=@O.STK_AREA.RDM_NO1 TX_AMT=AMTSIMPLEFMT(@O.STK_AREA.TX_AMT) CRD_BAL=AMTSIMPLEFMT(@O.STK_AREA.CRD_BAL) POST_AC_DT=$GWA.AC_DT RSL_CD=01 RSL_CD=01 ~MSG_DAT=卡片状态满足合法可以进行充值交易 EMK_SWITCH=1 RSL_CD=01 ORD_NO=$GWA.JRN_NO ORD_DT=$GWA.TX_DT AC_DT=$GWA.AC_DT BUS_CNL=STK TX_DT=$GWA.TX_DT TX_TM=$GWA.TX_TM EMK_STS=3 CRD_TX_SEQ=@O.STK_AREA.CRD_TX_SEQ LAST_EMK_CMD=1 CRD_PPD_RSL=0000 EMK_TYP=S RDM_NO=@O.STK_AREA.RDM_NO1 TX_AMT=AMTSIMPLEFMT(@O.STK_AREA.TX_AMT) CRD_BAL=AMTSIMPLEFMT(@O.STK_AREA.CRD_BAL) POST_AC_DT=$GWA.AC_DT END ~MSG_DAT=查询原充值交易状态成功 RSL_CD=00 END RSL_CD=01 END GWA.JRN_NO= ORD_NO=$GWA.JRN_NO ORD_DT=$GWA.TX_DT AC_DT=$GWA.AC_DT BUS_CNL=STK TX_DT=$GWA.TX_DT TX_TM=$GWA.TX_TM EMK_STS=4 LAST_EMK_CMD=1 CRD_TX_SEQ=@O.STK_AREA.CRD_TX_SEQ CRD_PPD_RSL=0000 EMK_TYP=S RDM_NO=@O.STK_AREA.RDM_NO1 TX_AMT=AMTSIMPLEFMT(@O.STK_AREA.TX_AMT) CRD_BAL=AMTSIMPLEFMT(@O.STK_AREA.CRD_BAL) POST_AC_DT=$GWA.AC_DT RSL_CD=01 END M_MAW.AC_NO=$MAIN_AC M_MAW.CAP_TYP=1 M_MAW.AMT=AMTSIMPLEFMT(@O.STK_AREA.TX_AMT) M_MAW.TX_OPP_NO=$SUB_AC M_MAW.ORD_TYP=07 M_MAW.TX_OPP_TYP=0 M_MAW.TX_DT=$GWA.TX_DT M_MAW.TX_TM=$GWA.TX_TM M_MAW.ORD_NO=$GWA.JRN_NO M_MAW.TX_CD=2140010 M_MAW.MAX_CHK_FLG=N M_MAW.MIN_CHK_FLG=N M_MAW.TX_TYP=06 M_MAW.BUS_TYP=0700 ~MSG_DAT=主账户支取失败 RSL_CD=01 END S_PAD.USR_NO=$USR_NO S_PAD.APP_SEQ_NO=$SUB_AC S_PAD.AC_TYP=101 S_PAD.CAP_TYP=1 S_PAD.AMT=AMTSIMPLEFMT(@O.STK_AREA.TX_AMT) S_PAD.TX_AMT=AMTSIMPLEFMT(@O.STK_AREA.TX_AMT) S_PAD.C_TX_DT=$GWA.TX_DT S_PAD.TX_TM=$GWA.TX_TM S_PAD.TX_CD=2140010 S_PAD.ORD_TYP=07 S_PAD.TX_TYP=06 S_PAD.BUS_TYP=0700 S_PAD.ORD_NO=$GWA.JRN_NO RSL_CD=01 ~MSG_DAT=圈存失败 END RSL_CD=00 END RDM_NO1=@O.STK_AREA.RDM_NO1 TX_AMT=ADDCHAR(TOUPPER(DEC2HEX(@O.STK_AREA.TX_AMT)),8,0,1) TX_TYP=02 SUB_AC|RDM_NO1|CRD_EMK_SEQ|TX_AMT|TX_TYP|GWA|

OUT_DAT|MSG_CD|

~MSG_DAT=生产交易MAC失败 TXN_DT=@O.OUT_DAT.C_TX_DT TXN_TM=@O.OUT_DAT.C_TX_TM MAC2=@O.OUT_DAT.MAC2 CRD_JRN_NO=@O.STK_AREA.CRD_JRN_NO CRD_TX_SEQ=@O.STK_AREA.CRD_TX_SEQ CMD_CD=@O.STK_AREA.CMD_CD MSG_INF=充值失败 RSL_MSG=ADDCHAR(STRCAT(80,UCS2ENCODE($MSG_INF)),78,0020,0) TXN_DT=00000000 TXN_TM=000000 MAC2=00000000 RSL_MSG=STRCAT(805145503C6210529FFF0C672C6B215145503C,UCS2ENCODE(AMTSIMPLEFMT(@O.STK_AREA.TX_AMT))) ADD_LEN_CNT=DIV(SUB(78,STRLEN($RSL_MSG)),4) ~ADD_CNT=0 ~ADD_CNT=ADD(~ADD_CNT,1) RSL_MSG=STRCAT($RSL_MSG,0020) RSL_MSG_LEN=27

BK_TXN_DAT|MSG_CD|

~MSG_CD=组织交易报文失败 BK_TXN_DAT=@O.BK_TXN_DAT SUB_AC|BK_TXN_DAT|

BK_TXN_DAT|MSG_CD|

~MSG_CD=加密交易报文失败 BK_TXN_DAT=@O.BK_TXN_DAT SUB_AC|BK_TXN_DAT|

BK_TXN_DAT|MSG_CD|

~MSG_CD=生成报文MAC失败 SMS_CD=LPS800 BK_TXN_DAT=@O.BK_TXN_DAT INP_CRR.PAY_CI_NO=$CI_NO INP_CRR.PAY_USR_NO=$U_NO INP_CRR.PAY_AC_TYP=100 INP_CRR.STL_CI_NO=$CI_NO INP_CRR.STL_USR_NO=$U_NO INP_CRR.STL_AC_TYP=101 INP_CRR.AMT_FLG=1 INP_CRR.BUS_CNL=$GWA.BUS_CNL INP_CRR.RSV_FLG=N INP_CRR.TOT_FLG=1 INP_CRR.TX_AMT1=$RISK_DAT.TX_AMT INP_CRR.JRN_NO=$GWA.JRN_NO INP_CRR.TX_DT=$GWA.TX_DT INP_CRR.TX_TYP=06