存储过程8
END IF;COMMIT;
END IF;
<<TO_NEXT>>
null;
--begin yinlei
BEGIN
IF IS_EXCEPTION_CODE <> 0 THEN
select to_char(sysdate,'yymmddhhmi')||lpad(to_char(SEQ_ERP_LOG.nextval),14,'0') INTO C_SEQ from dual;
INSERT INTO INT_ERP_LOG(LOGID,INTERFACENAME,INTIME,REFERENCE_NUM,STATUS,ERR_MESSAGE)VALUES (C_SEQ, 'INT_ERP_PO_CREATE', SYSDATE, v_REFERENCE_NUM, '-1', v_ERROR_DESCRIPTION);
--insert into main table
页:
[1]