Tom在EXPert One on One Oracle中,介绍了如何利用JOB的特性,来控制JOB运行的下次执行时间。在以前的文章中,我也给出过修改NEXT_DATE的具体的例子:http://yangtingkun.itpub.net/post/468/56931
Tom给出的运行JOB的PL/SQL代码为:
DECLARE
job BINARY_INTEGER := :job; next_date DATE := :mydate;broken BOOLEAN := FALSE;
BEGIN WHAT :mydate := next_date; IF broken THEN :b := 1; ELSE :b :=0; END IF; END;并说明了如何使用NEXT_DATE作为存储过程的输出参数,来指定下次JOB的下次运行时间。
第一次看到这里的时候,一方面是感叹这种内部的东西,一般人是无法得到的,只有Tom这种内部人士才能得到;另一方面是佩服Tom的功力,说实话,即使是把代码给我,我也想不出这么巧妙的方法。
这次重读这部分内容,有了一点新的想法,对于BROKEN变量,是否也可以做点什么?
采用和上面类似的方法,可以控制JOB的行为,使JOB成功运行一次后,就自动停止不在执行。由于普通的一次性JOB,在运行后就从JOB视图中消失了,假如希望留下运行信息,则必须使用日志表,十分的麻烦。而采用下面的方法处理一次性JOB,可以方便将JOB的运行信息保留下来:
SQL> CONN /@YANGTK AS SYSDBA 已连接。 SQL> GRANT EXECUTE ON DBMS_LOCK TO YANGTK;
授权成功。
SQL> CONN YANGTK/YANGTK@YANGTK 已连接。 SQL> CREATE OR REPLACE PROCEDURE P_TEST (P_BROKEN OUT BOOLEAN) AS 2 BEGIN 3 P_BROKEN := TRUE; 4 DBMS_LOCK.SLEEP(5); 5 END; 6 /过程已创建。
SQL> DECLARE 2 V_JOB NUMBER; 3 BEGIN 4 DBMS_JOB.SUBMIT(V_JOB, 'P_TEST(BROKEN);', SYSDATE, 'SYSDATE + 1/1440'); 5 COMMIT; 6 END; 7 /PL/SQL 过程已成功完成。
SQL> COL WHAT FORMAT A30 SQL> SELECT JOB, WHAT, TOTAL_TIME, BROKEN, FAILURES FROM USER_JOBS; JOB WHAT TOTAL_TIME B FAILURES ---------- ------------------------------ ---------- - ---------- 6 P_TEST(BROKEN); 3 N SQL> SELECT JOB, WHAT, TOTAL_TIME, BROKEN, FAILURES FROM USER_JOBS; JOB WHAT TOTAL_TIME B FAILURES ---------- ------------------------------ ---------- - ---------- 6 P_TEST(BROKEN); 5 Y 0
采用这种方法,运行一次后,JOB不再运行,但是JOB信息并没有丢失,仍然保留在USER_JOBS视图中。