-- 建立测试表 
CREATE TABLE t (a NUMBER);  
 
-- 建立存储过程 
CREATE OR REPLACE PROCEDURE p_parallel (p_min IN NUMBER, p_max IN NUMBER)  
IS 
BEGIN 
 INSERT INTO t  
 SELECT TRUNC (DBMS_RANDOM.VALUE (p_min, p_max)) FROM DUAL;  
 
 COMMIT;  
END p_parallel;  
/  
 
-- 建立job 
DECLARE 
   x   NUMBER;  
BEGIN 
   sys.DBMS_JOB.submit (  
      job         => x,  
      what        => 'p_parallel(1,20);p_parallel(21,40);p_parallel(41,60);p_parallel(61,80);',  
      next_date   => TO_DATE ('14-05-2013 00:00:00', 'dd-mm-yyyy hh24:mi:ss'),  
      interval    => 'trunc(sysdate+1)',  
      no_parse    => FALSE);  
   SYS.DBMS_OUTPUT.put_line ('Job Number is: ' || TO_CHAR (x));  
 COMMIT;  
END;  
/  
 
-- 测试 
TRUNCATE TABLE t;  
EXEC dbms_job.run(101);  
 
SELECT * FROM t;