create or replace
procedure MESSAGEDATA_CLEAR_EXEC_PROC
as
job1 number;
v_err_num NUMBER; --ORA错误号
v_err_msg VARCHAR2(100); --错误描述
begin
dbms_job.submit(job1,'AlexMonitor.MESSAGEDATA_CLEAR_PROC;',sysdate,'TRUNC(SYSDATE+1) + (23*60)/(24*60)');
commit;
EXCEPTION
WHEN OTHERS THEN
v_err_num := SQLCODE;
v_err_msg := SUBSTR(SQLERRM, 1, 100);
dbms_output.put_line('MESSAGEDATA_CLEAR_EXEC_PROC_PARTITION_JOBS_PROC执行出现异常,错误码='|| v_err_num || '错误描述=' || v_err_msg);
end MESSAGEDATA_CLEAR_EXEC_PROC;
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/26851211/viewspace-753070/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/26851211/viewspace-753070/