Oracle存储过程中任务和管道的应用

作者:网络 来源:佚名 更新时间:2008-11-17 15:07:51 点击:

  1. 前言

  在oracle数据库实际应用过程中,经常把业务处理逻辑的放在存储过程,客户端通过ado进行调用。有些业务逻辑处理量大并且复杂,使客户端调用存储过程后,长时间没有反应,也不知存储过程运行状态,本文讲述如何在oracle通过任务和管道的应用,异步调用存储过程的方法。

  2. 基本原理

  1.使用dbms_job包将主处理存储过程作为任务提交到任务队列中;

  2.主处理存储过程在运行过程中通过dbms_pipe包将处理情况放在管道中;

  3.监控存储过程读取管道,从而了解处理情况;

  4.本文没有描述双向通信的方式,监控存储过程可以通过管道发送信息给主处理存储过程。

  3. 具体实现测试

  建立测试环境

  3.1. 对数据库的ini进行相关修改,使系统的任务队列功能打开

  对于oracle9i,只需修设定数据库的ini内的"job_queue_processes=非0值",如 "job_queue_processes=10",对于oracle8i除设定实例ini文件中的"job_queue_processes=非0值"外,还需设定"job_queue_interval=1"。

  3.2. 设用用户权限

  由于使用oracle中特定的程序包,所以要注意要明文给于用户系统权限。对当前用户(测试用户),赋于以下权力:  execute dbms_pipe
  execute dbms_lock
  execute dbms_job

  3.3. 建立模拟大业务处理存储过程

  本存储过程通过循环30次,调用dbms_lock.sleep(1)(体眠1秒)和写管道模拟大的处理过程。

  具体代码如下:  create or replace procedure maxpro as
  n integer;
  status number;
  begin
  for n in 1..30 loop
  dbms_pipe.purge('maxpro'); --清除原管道信息
  dbms_pipe.pack_message(n); --把信息放入缓冲区
  status:=dbms_pipe.send_message('maxpro');
  dbms_lock.sleep(1);
  end loop;
  dbms_pipe.purge('maxpro'); --清除原管道信息
  dbms_pipe.pack_message(999999); --把信息放入缓冲区,用999999 表示过程完成
  status:=dbms_pipe.send_message('maxpro');
  end maxpro;

||| 菜鸟学堂:

  3.4. 建立读取管道动态了解处理状态的存储过程

  以下代码是对于maxpro存储过程的状态进行读取的过程,主要使用读取管道的方法,注意:  status:= dbms_pipe.receive_message('maxpro',0);

  中的"0"参数是很关键的,说明接受等待时间为0秒,表示,调用时如果没有信息不等待直接返回。

  具体代码如下:  create or replace procedure readmaxpro as
  n integer;
  status integer;
  begin
  --接受等待时间为1秒,可以为0,立即调用或
  dbms_pipe.receive_message('mypipe') 等待100天
  status:= dbms_pipe.receive_message('maxpro',0);
  --status为0为成功可以unpack_message,1为超时没有数据,
  2为信息太大,3为内部错误
  if status <> 0 then
  dbms_output.put_line('管道中现在没有信息返回');
  return;
  end if;
  dbms_pipe.unpack_message(n);
  dbms_output.put_line('maxpro 的当前进行状态为'|| n);
  end;

  3.5. -起动模拟大业务处理存储过程为后台进程的存储过程(beginmaxpro)

  通过dbms_job.submit(job,'maxpro;',sysdate,null,false);使"maxpro"为一个任务,在当前时间(sysdate)后执行,当然如果把sysdate改一具体时间,那就在具体时间执行。

  具休代码如下:  create or replace procedure beginmaxpro as
  job binary_integer;
  begin
  dbms_job.submit(job,'maxpro;',sysdate,null,false);
  dbms_output.put_line('队列号码job=' || job);
  commit;
  end;

|||

  4. 代码执行

  4.1. 执行过程

  在cmd行输入 sqlplus 根据提示登录
  设定dbms_output可见
  sql> set serveroutput on
  以下是执行过程和相应的返回信息
  sql> call beginmaxpro();
  队列号码job=21
  调用完成。
  sql> call readmaxpro();
  maxpro 的当前进行状态为14
  调用完成。
  sql> call readmaxpro();
  maxpro 的当前进行状态为16
  调用完成。
  sql> call readmaxpro();
  maxpro 的当前进行状态为23
  调用完成。
  sql> call readmaxpro();
  maxpro 的当前进行状态为999999
  调用完成。
  sql> call readmaxpro();
  管道中现在没有信息返回
  调用完成。
  sql>

  4.2. 执行分析

  beginmaxpro(),将主处理存储过程放入队列的过程,执行后存储程序马上返回,maxpro存储过程放在任务队列中,并设定为在当前系统时间执行(马上执行)。

  maxpro为主处理存储过程,开始执行模拟大业务处理,处理过程中将处理进度信息写入管道。

  readmaxpro();为检查状态存储过程,首先读取信息,如果信息不存在,说明管道内没有信息可读而退出;如果存在信息则读出信息。

  本例子可以进行改进,输出不通过dbms_output.put_line而是用返回值,那么就可以在前端用ado调用,发布任务,任务过程中从客户端读取进度。代码如下:  create or replace procedure readmaxpro(p out intergr) as
  n integer;
  status integer;
  begin
  status:= dbms_pipe.receive_message('maxpro',0);
  if status <> 0 then
  p:=-1;
  return;
  end if;
  dbms_pipe.unpack_message(p);
  end;