oracle 存储过程异常处理

先建一个错误跟踪表
create sequence s_error_id;
CREATE TABLE ERROR_RECORD
(
  ERROR_ID       NUMBER(10)     primary key,
  ERROR_CODE     NUMBER(10),
  ERROR_MSG      VARCHAR2(2000),
  ERROR_DATE     DATE,
  ERROR_PROGRAM  VARCHAR2(200)
);

--------在过程的例外里向跟踪表写入错误信息:
create or replace procedure day_task is
v_sqlcode  ERROR_RECORD.ERROR_CODE%type; 
v_msg  ERROR_RECORD.error_msg%type; 
begin
 ------program body  
 exception when others then
--记录错误信息表
v_sqlcode :=sqlcode;--异常代码
v_msg :=sqlerrm;--异常信息
insert into  error_record(error_code,error_msg,error_date,error_program)
  values  (v_sqlcode,v_msg,sysdate,‘day_task’);
end;