排查多个存储过程错误并记录日志
create or replace procedure VD_supervise_ETL is
v_sqlcode varchar2(32);
v_sqlerr varchar2(500);
v_procname varchar2(32);
EXCEPTION
WHEN OTHERS THEN
v_procname:= 'VD_supervise_ETL';
v_sqlcode := SQLCODE;
v_sqlerr := SUBSTR(SQLERRM, 1, 200);
insert into proc_errlog
values
(sys_guid(), v_sqlcode, v_sqlerr, sysdate,v_procname);
commit;
end VD_supervise_ETL;