oracle dba 书上的一个DBMS_JOB的例子

//书本实验

//每隔一分钟将系统当前时间插入基表displaytime中
create table displaytime(
job_no number(7),
current_date date);

create or replace procedure displaycurrenttime as
v_sysdate varchar2(50);
n number(7):=0;
begin
v_sysdate:=To_Char(sysdate,'yyyy.mm.dd hh24:mi:ss');
select NVL(max(job_no),0) into n from displaytime;
n:=n+1;
insert into displaytime values(n,sysdate);
end displaycurrenttime;
/

VARIABLE job_no1 number;
begin
dbms_job.submit(:job_no1,'displaycurrenttime;',sysdate,'sysdate+1/1440');
end;
/

 

 

begin
dbms_job.run(:job_no1);
end;
/

 

 

 

--实验完成

--接下来将本作业停止，要不然太费系统资源了：）

begin
dbms_job.remove(:job_no1);
end;
/