DECLARE
X NUMBER;
BEGIN
SYS.DBMS_JOB.SUBMIT
( job => X,
what => 'ETL_RUN_D_Date;',
next_date => to_date('2009-08-26 01:00:00','yyyy-mm-dd hh24:mi:ss'),
interval => 'trunc(sysdate)+1+1/24',
no_parse => FALSE
);
SYS.DBMS_OUTPUT.PUT_LINE('Job Number is: ' || to_char(x));
COMMIT;
END;
/以上是明確指定每天的1點執行此job,如果指定是每天中午12點執行interval需要指定為'trunc(sysdate)+1+12/24',如果僅僅指定interval為一天,這樣當你手工用dbms_job.run(job)去運行一次時,job每天的執行時間是會改變的,如果你想job每天在固定時間執行,可以參考上面的例子.
初始化相關參數job_queue_processes
alter system set job_queue_processes=39 scope=spfile;//最大值不能超過1000 ;job_queue_interval = 10 //調度作業重新整理頻率秒為單位
job_queue_process 表示oracle能夠並發的job的數量,可以通過語句
show parameter job_queue_process;
來查看oracle中job_queue_process的值。當job_queue_process值為0時表示全部停止oracle的job,可以通過語句
ALTER SYSTEM SET job_queue_processes = 10;
來調整啟動oracle的job。
相關視圖:
dba_jobs
all_jobs
user_jobs
dba_jobs_running 包含正在運行job相關資訊
-------------------------
提交job文法:
begin
sys.dbms_job.submit(job => :job,
what => 'P_CLEAR_PACKBAL;',
next_date => to_date('04-08-2008 05:44:09', 'dd-mm-yyyy hh24:mi:ss'),
interval => 'sysdate+ 1/360');
commit;
end;
/
-------------------------
建立JOB
variable jobno number;
begin
dbms_job.submit(:jobno, 'P_CRED_PLAN;',SYSDATE,'SYSDATE+1/2880',TRUE);
commit;
運行JOB
SQL> begin
dbms_job.run(:job1);
end;
/
刪除JOB
SQL> begin
dbms_job.remove(:job1);
end;
/
DBA_JOBS
===========================================
欄位(列) 類型 描述
JOB NUMBER 任務的唯一標示號
LOG_USER VARCHAR2(30) 提交任務的使用者
PRIV_USER VARCHAR2(30) 賦予任務許可權的使用者
SCHEMA_USER VARCHAR2(30) 對任務作文法分析的使用者模式
LAST_DATE DATE 最後一次成功運行任務的時間
LAST_SEC VARCHAR2(8) 如HH24:MM:SS格式的last_date日期的小時,分鐘和秒
THIS_DATE DATE 正在運行任務的開始時間,如果沒有運行任務則為null
THIS_SEC VARCHAR2(8) 如HH24:MM:SS格式的this_date日期的小時,分鐘和秒
NEXT_DATE DATE 下一次定時運行任務的時間
NEXT_SEC VARCHAR2(8) 如HH24:MM:SS格式的next_date日期的小時,分鐘和秒
TOTAL_TIME NUMBER 該任務運行所需要的總時間,單位為秒
BROKEN VARCHAR2(1) 標誌參數,Y標示任務中斷,以後不會運行
INTERVAL VARCHAR2(200) 用於計算下一已耗用時間的運算式
FAILURES NUMBER 任務運行連續沒有成功的次數
WHAT VARCHAR2(2000) 執行任務的PL/SQL塊
CURRENT_SESSION_LABEL RAW MLSLABEL 該任務的信任Oracle會話符
CLEARANCE_HI RAW MLSLABEL 該任務可信任的Oracle最大間隙
CLEARANCE_LO RAW MLSLABEL 該任務可信任的Oracle最小間隙
NLS_ENV VARCHAR2(2000) 任務啟動並執行NLS會話設定
MISC_ENV RAW(32) 任務啟動並執行其他一些會話參數
--------------------------
描述 INTERVAL參數值
每天午夜12點 'TRUNC(SYSDATE + 1)'
每天早上8點30分 'TRUNC(SYSDATE + 1) + (8*60+30)/(24*60)'
每星期二中午12點 'NEXT_DAY(TRUNC(SYSDATE ), ''TUESDAY'' ) + 12/24'
每個月第一天的午夜12點 'TRUNC(LAST_DAY(SYSDATE ) + 1)'
每個季度最後一天的晚上11點 'TRUNC(ADD_MONTHS(SYSDATE + 2/24, 3 ), 'Q' ) -1/24'
每星期六和日早上6點10分 'TRUNC(LEAST(NEXT_DAY(SYSDATE, ''SATURDAY"), NEXT_DAY(SYSDATE, "SUNDAY"))) + (6×60+10)/(24×60)'
--------------------------
1:每分鐘執行
Interval => TRUNC(sysdate,'mi') + 1/ (24*60)
或
Interval => sysdate+1/1440
2:每天定時執行
例如:每天的淩晨1點執行
Interval => TRUNC(sysdate) + 1 +1/ (24)
3:每周定時執行
例如:每周一淩晨1點執行
Interval => TRUNC(next_day(sysdate,'星期一'))+1/24
4:每月定時執行
例如:每月1日淩晨1點執行
Interval =>TRUNC(LAST_DAY(SYSDATE))+1+1/24
5:每季度定時執行
例如每季度的第一天淩晨1點執行
Interval => TRUNC(ADD_MONTHS(SYSDATE,3),'Q') + 1/24
6:每半年定時執行
例如:每年7月1日和1月1日淩晨1點
Interval => ADD_MONTHS(trunc(sysdate,'yyyy'),6)+1/24
7:每年定時執行
例如:每年1月1日淩晨1點執行
Interval =>ADD_MONTHS(trunc(sysdate,'yyyy'),12)+1/24
/////////////////////////////
begin
sys.dbms_job.submit(job => :job,
what => 'check_err;',
next_date => trunc(sysdate)+23/24,
interval => 'trunc(next_day(sysdate,''星期五''))+23/24');
commit;
end;
其中:job是系統自動產生編號,check_err是我的一個過程,next_date設定下次執行時間,這裡是今天晚上23:00,interval設定時間間隔,多久執行一次,這裡是每周的星期五晚上23:00,函數next_day返回日期中包含指定字元的日期,trunc 函數去掉日期裡的時間,也就是得到的是某天的00:00,時間是以天為單位的所以要得到某某點某某分,就需要分數:
1/24 一小時;
1/1440 一分;
1/3600 一秒;
/////////////////////
一、設定初始化參數 job_queue_processes
sql> alter system set job_queue_processes=n;(n>0)
job_queue_processes最大值為1000
查看job queue 後台進程
sql>select name,description from v$bgprocess;
二,dbms_job package 用法介紹
包含以下子過程:
Broken()過程。
change()過程。
Interval()過程。
Isubmit()過程。
Next_Date()過程。
Remove()過程。
Run()過程。
Submit()過程。
User_Export()過程。
What()過程。
1、Broken()過程更新一個已提交的工作的狀態,典型地是用來把一個已破工作標記為未破工作。
這個過程有三個參數:job 、broken與next_date。
PROCEDURE Broken (job IN binary_integer,
Broken IN boolean,
next_date IN date :=SYSDATE)
job參數是工作號,它在問題中唯一標識工作。
broken參數指示此工作是否將標記為破——TRUE說明此工作將標記為破,而FLASE說明此工作將標記為未破。
next_date參數指示在什麼時候此工作將再次運行。此參數預設值為當前日期和時間。
job如果由於某種原因未能成功之行,oracle將重試16次後,還未能成功執行,將被標記為broken重新啟動狀態為broken的job,有如下兩種方式;
a、利用dbms_job.run()立即執行該job
sql>begin
sql>dbms_job.run(:jobno) 該jobno為submit過程提交時返回的job number
sql>end;
sql>/
b、利用dbms_job.broken()重新將broken標記為false
sql>begin
sql>dbms_job.broken (:job,false,next_date)
sql>end;
sql>/
2、Change()過程用來改變指定工作的設定。
這個過程有四個參數:job、what 、next_date與interval。
PROCEDURE Change (job IN binary_integer,
What IN varchar2,
next_date IN date,
interval IN varchar2)
此job參數是一個整數值,它唯一標識此工作。
What參數是由此工作啟動並執行一塊PL/SQL代碼塊。
next_date參數指示何時此工作將被執行。
interval參數指示一個工作重執行的頻度。
3、Interval()過程用來顯式地設定重執行一個工作之間的時間間隔數。這個過程有兩個參數:job與interval。
PROCEDURE Interval (job IN binary_integer,
Interval IN varchar2)
job參數標識一個特定的工作。interval參數指示一個工作重執行的頻度。
4、ISubmit()過程用來用特定的工作號提交一個工作。這個過程有五個參數:job、what、next_date、interval與no_parse。
PROCEDURE ISubmit (job IN binary_ineger,
What IN varchar2,
next_date IN date,
interval IN varchar2,
no_parse IN booean:=FALSE)
這個過程與Submit()過程的唯一區別在於此job參數作為IN型參數傳遞且包括一個由開發人員提供的工作號。如果提供的工作號已被使用,將產生一個錯誤。
5、Next_Date()過程用來顯式地設定一個工作的執行時間。這個過程接收兩個參數:job與next_date。
PROCEDURE Next_Date(job IN binary_ineger,
next_date IN date)
job標識一個已存在的工作。next_date參數指示了此工作應被執行的日期與時間。
6、Remove()過程來刪除一個已計劃啟動並執行工作。這個過程接收一個參數:
PROCEDURE Remove(job IN binary_ineger);
job參數唯一地標識一個工作。這個參數的值是由為此工作調用Submit()過程返回的job參數的值。已正在啟動並執行工作不能由調用過程式刪除。
7、Run()過程用來立即執行一個指定的工作。這個過程只接收一個參數:
PROCEDURE Run(job IN binary_ineger)
job參數標識將被立即執行的工作。
8、使用Submit()過程,工作被正常地計劃好。
這個過程有五個參數:job、what、next_date、interval與no_parse。
PROCEDURE Submit ( job OUT binary_ineger,
What IN varchar2,
next_date IN date,
interval IN varchar2,
no_parse IN booean:=FALSE)
job參數是由Submit()過程返回的binary_ineger。這個值用來唯一標識一個工作。
what參數是將被執行的PL/SQL代碼塊。
next_date參數指識何時將運行這個工作。
interval參數何時這個工作將被重執行。
no_parse參數指示此工作在提交時或執行時是否應進行文法分析——TRUE指示此PL/SQL代碼在它第一次執行時應進行文法分析,而FALSE指示本PL/SQL代碼應立即進行文法分析。
9、User_Export()過程返回一個命令,此命令用來安排一個存在的工作以便此工作能重新提交。
此程式有兩個參數:job與my_call。
PROCEDURE User_Export(job IN binary_ineger,
my_call IN OUT varchar2)
job參數標識一個安排了的工作。my_call參數包含在它的目前狀態重新提交此工作所需要的本文。
10、What()過程應許在工作執行時重新設定此正在啟動並執行命令。這個過程接收兩個參數:job與what。
PROCEDURE What (job IN binary_ineger,
What IN OUT varchar2)
job參數標識一個存在的工作。what參數指示將被執行的新的PL/SQL代碼。
三、查看相關job資訊
1、相關視圖
dba_jobs
all_jobs
user_jobs
dba_jobs_running 包含正在運行job相關資訊
2、查看相關資訊
SQL>SELECT JOB, NEXT_DATE, NEXT_SEC, FAILURES, BROKEN
SQL>FROM DBA_JOBS;
JOB NEXT_DATE NEXT_SEC FAILURES B
------- --------- -------- -------- -
9125 01-JUN-01 00:00:00 4 N
14144 24-OCT-01 16:35:35 0 N
9127 01-JUN-01 00:00:00 16 Y
3 rows selected.
正在啟動並執行JOB相關資訊
SELECT SID, r.JOB, LOG_USER, r.THIS_DATE, r.THIS_SEC
FROM DBA_JOBS_RUNNING r, DBA_JOBS j
WHERE r.JOB = j.JOB;
SID JOB LOG_USER THIS_DATE THIS_SEC
----- ---------- ------------- --------- --------
12 14144 HR 24-OCT-94 17:21:24
25 8536 QS 24-OCT-94 16:45:12
2 rows selected.
JOB QUEUE LOCK相關資訊
SELECT SID, TYPE, ID1, ID2
FROM V$LOCK
WHERE TYPE = 'JQ';
SID TY ID1 ID2
--------- -- --------- ---------
12 JQ 0 14144
1 row selected.
四、簡單例子
一個簡單例子:
建立測試表
SQL> create table TEST(a date);
表已建立。
建立一個自訂過程
SQL> create or replace procedure MYPROC as
2 begin
3 insert into TEST values(sysdate);
4 end;
5 /
過程已建立。
建立JOB
SQL> variable job1 number;
SQL>
SQL> begin
2 dbms_job.submit(:job1,'MYPROC;',sysdate,'sysdate+1/1440'); --每天1440分鐘,即一分鐘運行test過程一次
3 end;
4 /
PL/SQL 過程已成功完成。
運行JOB
SQL> begin
2 dbms_job.run(:job1);
3 end;
4 /
PL/SQL 過程已成功完成。
SQL> select to_char(a,'yyyy/mm/dd hh24:mi:ss') 時間 from TEST;
時間
-------------------
2001/01/07 23:51:21
2001/01/07 23:52:22
2001/01/07 23:53:24
刪除JOB
SQL> begin
2 dbms_job.remove(:job1);
3 end;
4 /
PL/SQL 過程已成功完成。