DECLARE
   V_JOBNUM NUMBER;
BEGIN
   SELECT JOB
     INTO V_JOBNUM
     FROM USER_JOBS
    WHERE WHAT LIKE '%APAGA_LISTA%';

   IF (V_JOBNUM IS NOT NULL) THEN
      DBMS_JOB.REMOVE(V_JOBNUM);
      DBMS_JOB.SUBMIT(V_JOBNUM,
                      WHAT=> 'BEGIN APAGA_LISTA;END;',
                      INTERVAL=> 'SYSDATE + 3/24');
      COMMIT;
   END IF;
EXCEPTION
   WHEN NO_DATA_FOUND THEN BEGIN
      DBMS_JOB.SUBMIT(V_JOBNUM,
                      WHAT => 'BEGIN APAGA_LISTA;END;',
                      INTERVAL => 'SYSDATE + 3/24');
      COMMIT;
   END;
END;
/

-- VERSAO --
BEGIN ATUVEROBJ('APAGA_LISTA_JOB','0.00.000'); END;
/