Job____oracle to automatically monitor and reset Oracle's exception execution

--Monitoring whether the job performs an abnormal or stopped behavior
CREATE OR REPLACE PROCEDURE p_job_monitoring as
BEGIN
For V in (SELECT JOB, WHAT, failures, broken
From User_jobs T
WHERE t.failures > 15
OR t.broken = ' Y '
OR t.next_date > To_date (' 2070-01-01 ', ' yyyy-mm-dd ') LOOP
Dbms_output. Put_Line (V.what | | ' Perform an exception, please check! ');
Dbms_job. RUN (V.job);
Dbms_job. Broken (V.job, FALSE);
End LOOP;
End;
/


--1-hour execution of this stored procedure
VARIABLE job_no number;
BEGIN
Dbms_job. SUBMIT (: Job_no, ' p_job_monitoring; ', sysdate, ' sysdate+1/24 ');
COMMIT;
End;
/