mybatisコール存在過程

4201 ワード

mybatis呼び出しが存在するプロセス.
Serivice
SAICDao.insertTsaveamt(tsaveamt);
mybatisの配置によります.戻り値は自動的にtsavemtに保存されます.
DAO
void insertTemploydcmSQ(Tmember tmember)throws SQLException;
参照
<select id=「insertTaveamt」parameterType=「cn.com.mmm.customer.domail.Taveamt」statementType=「CALLABLE」  >
{call}  procmtugrant、嗳嗳(procugb)、撗(啱)、21873;(啱)、呷(proc yn)、呷(呷)、呷(呷)
は、啝{savemt}、21853;(イ)、啝(イ)、咻(expiremudiate)、jdbcType=TIMESTAMP、璣(procuid)、咻de=OUT、jdbcType=VRCHAR)}

参照
CREATE OR REPLACE PROCEURE MMM.PROC_SAVAMT_GRANT(
V MMM.MEMB_TYPE
VuMMM_PROC_INTS AVEAMT_PROC_TYPE
V MMM_PROC_IN TSAVEAMT__PROC_TYPE
VMMM.ORDERD-IN TSAVEAMT_MMM.ORDERD%TYPE
VuMMM.ORDERHuGuMM-IN TSAVEAMT HuMMM.ORDERHUGmuSEQ%TYPE
VuMMM.ORDERHuDUMMM_IN TSAVEAMT_U MMM.ORDERD_TYPE
VuMMM.ORDERHuWUMMM.IN TSAVEAMT_MMM.ORDER椆TYPE
VuMMM.SAVAMTUGB IN TSAVEAMT-SAVAMTYPE
は、VUMMM惫SAVAMT忽IN TSAVEAMT惬MMM.SAVAMT CODE%TYPE
V-M,VUSAVAMT  IN TSAVEAMT_SAVAMT%TYPE
は、VUMMM_SAVEVE_IN TSAVEAMT_UMMM.SAVEVE%TYPE
は、VUMMMUEX PIREHUDATE IN TSAVEAMT_M.EXPIREHUDATE%TYPE
は、VUMMM_UUSERUID_IN TSAVEAMT_UMMM.PROC_TYPE
は、VuMMM枰C枰IN TSAVEAMT栥M.C.Cタイプです.
は、VUMMM栀SITECODE IN TSAVEAMT栭M.SITECODE%TYPE
ERRCODE OUT VRCHARR 2
ERRNO OUT NUMBER
、ERRMSG OUT VRCHARR 2)
IS
    V_MMM_SAVAMT_MMM_SEQ_MMM TSAVEAMT_MMM.SAVAMT_MMM_SEQ%TYPE;
    V_MMM_SYSDATETIME   DATE;
    V_MMM_ERRCODE       VRC HAR 2(2)
    V_MMM_ERRNO         NUMBER
    V_MMM_ERRMSG        VRCHAR 2(100)
    P_EXPIRE_DATE   DATE;
BEGIN
IF V_MMM_PROC_GB_MMM!='1'AND V_MMM_PROC_GB_MMM!='0'AND V_MMM_PROC_YN!='1'AND V_MMM_PROC_YN!='0
THEN
        V_MMM_ERRCODE:='ER';
        V_MMM_ERRNO:=999
        V_MMM_ERRMSG:='IT IS WRONG PARDER!PROC_GB、PROC_YN;
GOTO ERROR_ROUTINE;
END IF
    IF V_MMM_PROC_YN='1'
    THEN
        P_EXPIRE_DATE:=V_MMM_EXPIRE_DATE;
    END IF
    BEGIN
        SELECT LPAD(TONUMBER(NVL(MAX(SAVAMT MMMUSEQ))+1,10,'0',SYSDATE
          INTO V_MMM_SAVAMT_MMM_SEQ_MMM,V_MMM_SYSDATETIME
          FROM TSAVEAMT_MMM
         WHERE MEMB_NO=V_MMM_CUST_NO;
    EXCEPTION WHEN OTHERS THEN
        V_MMM_ERRCODE:='ER';
        V_MMM_ERRNO:=ABS(SQLCODE);
        V_MMM_ERRMSG:=SUBSTR(SQLERRM、1、100);
        GOTO ERROR_ROUTINE;
    END;
    BEGIN
        INSERT INTO TSAVEAMT_MMM(
          MEMBAU NO,SAVAMT MMM曄SEQ,SAVAMT_SEQUPRE,SAVAMT_SEQ
        , PROC_GB、PROC_YN、ORGuYN、ORDER_NO、ORDERHUGuMMMuSEQ、ORDER DUMMMuSEQ、ORDERHMuSEQ
        , SAVAMT GB、SAVAMTUCODE、SAVEVE NOTE、SAVAMT、PROC_ID、PROC_DATE
        , EXPIREHUYN、EXPIREHUDATE、EXPIREHUDATEU、USEuYN、USEUMAMT、SITEuCODE
        , INSERT__ID、INSERT_DATE、MODIFYuID、MODIFYuDATE、SAVAMTUORG、CuCODE
        )
        VALES
        (
            VuMMM、VuCUSTUNO、VMMM、VMMM、VuSAVAMT、VMMM
            ,VuMMM,VuPROC_gMMM,VuMMM,VuPROC_YN,'1',VuMMMuORDERDO,VuMMM,VualDERD,VuMMM,VuMMM,VuMMMuSEQ,VuMMMuORDERHuDUMM,VuMMM,VuMMMMMMM
            , VuMMM_SAVAMTGB、VMMM-uSAVAMTUCODE、VuMMM_SAVERTUCODE、VuSAVEVE、VUMMM、VuSAVAMT、VuMMMUSERUID、VuMMM_SYSATETIME
            , '0',DECODE(VuMMM_PROC_YN,'1',PuEXPIRE DATE,'),DECODE(VuMMM_PROC_YN,'1',PuEXPIRE DATE,')
            , '0',0,V栥MM M棅SITEuCODE
            , VuMMM_UUSERUID、VuMMM_SYSDATETIME、VuMMM_UUSERUID、VuMMM_SYSDATETIME、VuMMM_USAVAMT、VuMMM_MuCuCODE
        );
    EXCEPTION WHEN OTHERS THEN
        V MMM:='ER'
        V MMM ERRNO:=ABS(SQLCODE);
        VUMMMUERRMSG:=SUBSTR(SQLERRM、1、100);
        GOTO ERRORUROUTINE
    END;
<
  ERRCODE:='OK';
  ERRNO   := 0;
  ERRMSG  := V MMM_SAVAMTMMM;
  GOTO ENDUROUTINE;
<
  ERRCODE:=V栥MM MuERRCODE;
  ERRNO   := VMM MUERRNO
  ERRMSG  := V MMM ERRMSG;
<
dbmsuoutput.put_line(ERRCODE 124;|𞓜|𞓜𞓜𞓜TO𞓜CHAR(ERRNO)|𞓜𞓜ERRMSG);
END;