各位帮忙，如何定义一个job，让它在每个月的月末24点触发一个存储过程，仁慈点，把写的代码解释解释！！！！！

Question

DBMS_JOB.SUBMIT(:jobno,//job号
                'your_procedure;',//要执行的过程
                trunc(sysdate)+1/24,//下次执行时间
                'trunc(sysdate)+1/24+1'//每次间隔时间
               );
删除job:dbms_job.remove(jobno);
修改要执行的操作:job:dbms_job.what(jobno,what);
修改下次执行时间：dbms_job.next_date(job,next_date);
修改间隔时间：dbms_job.interval(job,interval);
停止job:dbms.broken(job,broken,nextdate);
启动job:dbms_job.run(jobno);
例子：
VARIABLE jobno number;
begin
      DBMS_JOB.SUBMIT(:jobno, 
              'Procdemo;', --要执行的存储过程语句（或者sql语句）
               SYSDATE, 'last_day(SYSDATE) + 1');--每月月末24点执行
         commit;
end;
/

Answer 1

1、把init<sid>.ora中如下两个参数打开
 JOB_QUEUE_INTERVAL=60
 JOB_QUEUE_PROCESSES=4
 job_queue_keep_connections=true 然后重启一个库
然后再按照 bzszp(www.bzszp.533.net) 的方法

Answer 2

楼上朋友，为啥817里就没那个job_queue_keep_connections呢？？？

Answer 3

一个简单例子： 创建测试表
SQL> create table a(a date);表已创建。创建一个自定义过程
SQL> create or replace procedure test as
  2  begin
  3  insert into a values(sysdate);
  4  end;
  5  /过程已创建。创建JOB
SQL> variable job1 number;
SQL> 
SQL> begin
  2  dbms_job.submit(:job1,'test;',sysdate,'trunc(add_month(last_day(sysdate),1)');　　--每天1440分钟，即一分钟运行test过程一次
  3  commit;
  4  end;
  5  /PL/SQL 过程已成功完成。

Answer 4

SQL> variable job1 number;
楼上的兄弟,这句话是不是写错了...?

Answer 5

DECLARE
  job1 NUMBER;
BEGIN
  Dbms_Job.submit(:job1,'test',SYSDATE,'trunc(add_month(last_day)(sysdate),1)');
  COMMIT;END;偶改成这个样子了.
但是提示:
ORA-01008: 并非所有变量都已关联是么回事呢?

Answer 6

又试了一下子,如果把DECLARE改为VARIABLE
则为:
1 1 ORA-00900: 无效 SQL 语句           
2 1 ORA-01008: 并非所有变量都已关联

Answer 7

我也來貼貼！DBMS_Job包的用法  
包含以下子过程： 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参数指示在什么时候此工作将再次运行。此参数缺省值为当前日期和时间。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代码。
一个简单例子： 创建测试表
SQL> create table a(a date);表已创建。创建一个自定义过程
SQL> create or replace procedure test as
  2  begin
  3  insert into a values(sysdate);
  4  end;
  5  /过程已创建。创建JOB
SQL> variable job1 number;
SQL> 
SQL> begin
  2  dbms_job.submit(:job1,'test;',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 a;时间
-------------------
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 过程已成功完成。 

Answer 8

'last_day(SYSDATE) + 1');--每月月末24点执行
换成
'last_day(SYSDATE) + 28');

Answer 9

为什么是last_day(SYSDATE) + 28' or 'last_day(SYSDATE) + 1'
我在数据库的sqlplus里执行，感觉都不对！SQL> select last_day(SYSDATE) + 28 from dual;LAST_DAY(SYSDATE)+2
-------------------
2004/05/28 14:31:02
SQL> select last_day(SYSDATE) +1 from dual;LAST_DAY(SYSDATE)+1
-------------------
2004/05/01 14:31:49请问这是为什么？

Answer 10

last_day(trunc(sysdate))+1 这样才能让定时器在每月的月末执行！
如：SQL>  select last_day(trunc(sysdate))+1 from dual;LAST_DAY(TRUNC(SYSD
-------------------
2004/05/01 00:00:00

Answer 11

declare
jobno number;
begin
dbms_job.submit(jobcn,'pro;',sysdate,'add_months(trunc(sysdate,''mm''),1)');
commit;
end;
/

Answer 12

Create Or Replace Procedure Auto_Cljs_Job (v_timestr In Varchar2,v_jobno Out Varchar2,v_msg Out Varchar2) Is/******************************************************************************
   PURPOSE:  自动潮流计算Job的建立与更改     REVISIONS:
   Ver        Date        Author           Description
   ---------  ----------  ---------------  ------------------------------------
   1.0        2003-10-17   Fred Zhang       1. Created this procedure.
******************************************************************************/
jobno Integer;
jobid Integer;
Begin
  Select job Into jobid From all_jobs Where what='AUTO_CLJS;';          
    dbms_job.Change(jobid,'AUTO_CLJS;',To_Date(To_Char(Sysdate,'yyyy-mm-dd')||' '||V_timestr,'yyyy-mm-dd hh24:mi:ss'),'trunc(sysdate,''mi'')+1');
    Commit;
    v_jobno:=jobid;
    v_msg:='恭喜你！自动计算设定已经成功更改！'; 
    Exception When No_Data_Found Then
      dbms_job.submit(jobid,'AUTO_CLJS;',To_Date(To_Char(Sysdate,'yyyy-mm-dd')||' '||V_timestr,'yyyy-mm-dd hh24:mi:ss'),'trunc(sysdate,''mi'')+1');
      Commit;
      v_jobno:=jobid;
      v_msg:='恭喜你！自动计算已经成功设定！';          End  Auto_Cljs_Job;CREATE OR REPLACE PROCEDURE Auto_Cljs_Job_Start_Stop (result OUT VARCHAR2) IS
tmpVar NUMBER;
/******************************************************************************
   PURPOSE:   自动潮流计算Job的启动与停止   REVISIONS:
   Ver        Date        Author           Description
   ---------  ----------  ---------------  ------------------------------------
   1.0        2003-10-18   Fred Zhang       1. Created this procedure.
******************************************************************************/
jobid INTEGER;
job_status VARCHAR2(1);
BEGIN
  SELECT job,broken INTO jobid,job_status FROM all_jobs WHERE what='AUTO_CLJS;';
        IF job_status='N' THEN
            dbms_job.broken(jobid,TRUE);
            COMMIT;
            result:='恭喜你！自动计算设定已经停止！';
        ELSE
            dbms_job.broken(jobid,FALSE);
            COMMIT;
            result:='恭喜你！自动计算设定已经开始！';
        END IF;
        EXCEPTION 
          WHEN NO_DATA_FOUND THEN 
               result:='对不起，你还没有设定此Job！';  
  WHEN OTHERS THEN
               NULL;
END Auto_Cljs_Job_Start_Stop;
/