用DBMS_JOB来实现高级计划任务

dbms_job.submit(
   what=>'statspack_alert.sql;',
   next_date=>sysdate+1/24, -- 在下一个小时后启动
   interval=>'sysdate+1/24');  -- 每小时运行一次

问题是，尽管我们在这个程序中指定了任务起始时间和重新执行的时间间隔，但是我们看不到在预定时间运行该任务的机制。例如，如何让一个任务在早上8点启动、每小时运行一次、最后在下午5点终止呢？

上面的例子让该任务每小时运行一次，但是为了获得时间间隔，它有必要创建两个其它任务：一个任务在下午5点终止（主）任务，另一个任务在第二天早上8点启动（主）任务。

为了实现高级计划任务，我们可以创建自定义间隔，让任务在特定的时间间隔来启动和终止。下面是一个例子：

--
--  Schedule a snapshot to be run on this instance every hour

variable jobno number;
variable instno number;
begin

  select instance_number into :instno from v$instance;
-- ------------------------------------------------------------
-- 提交任务从6：00开始，每小时运行一次
-- ------------------------------------------------------------
dbms_job.submit(
   :jobno, 'statspack.snap;',
   trunc(sysdate)+6/24,
   'trunc(SYSDATE+1/24,''HH'')',
   TRUE,
   :instno);

-- ------------------------------------------------------------
-- 提交任务从9：00开始，12小时后运行
-- ------------------------------------------------------------
dbms_job.submit(
   :jobno,
   'statspack.snap;',
   trunc(sysdate+1)+9/24,
   'trunc(SYSDATE+12/24,''HH'')',
   TRUE,
   :instno);

-- ------------------------------------------------------------
-- 提交任务从6：00开始，每隔十分钟运行一次
-- ------------------------------------------------------------
dbms_job.submit(
   :jobno,
   'statspack.snap;',
   trunc(sysdate+1/144,'MI'),
   'trunc(sysdate+1/144,''MI'')',
   TRUE,
   :instno);
 
-- ----------------------------------------------------------------
-- 提交任务从周一到周五早上6：00开始，每小时运行一次
-- ----------------------------------------------------------------
dbms_job.submit(
   :jobno,
   'statspack.snap;',
   trunc(sysdate+1)+6/24,
   'trunc(
     least(
       next_day(SYSDATE,''MONDAY''),
       next_day(SYSDATE,''TUESDAY''),
       next_day(SYSDATE,''WEDNESDAY''),
       next_day(SYSDATE,''THURSDAY''),
       next_day(SYSDATE,''FRIDAY'')
     )
    +1/24,''HH'')',
   TRUE,
   :instno);

  commit;
end;
/