RAISE_APPLICATION_ERROR(-20041,'STATUS IS F');
RETURN 0;
END;
CREATE OR REPLACE PROCEDURE SET_ERROR_LOG
IS
BEGIN
GLOBAL_PARAM.LOG_EXCEPTION := 'error desc---'||sqlerrm;
commit;
RAISE no_data_found;
END; -- Procedure;
CREATE OR REPLACE PACKAGE GLOBAL_PARAM IS
LOG_EXCEPTION VARCHAR2(2000):='';
STATUS_START VARCHAR2(10):='S';
STATUS_CLOSE VARCHAR2(10):='C';
STATUS_FAILED VARCHAR2(10):='F';
END; 创建日志表
create table PROGRAM_LOG
(
ID NUMBER not null,
BATCH_NUMBER VARCHAR2(50),
PROGRAM_NAME VARCHAR2(100),
START_DATE DATE,
END_DATE DATE,
PROGRAM_STATUS VARCHAR2(20),
MEMO VARCHAR2(2000)
)