【IT168 技术文档】在oracle数据库实际应用过程中，经常把业务处理逻辑的放在存储过程，客户端通过ado进行调用。有些业务逻辑处理量大并且复杂，使客户端调用存储过程后，长时间没有反应，也不知存储过程运行状态，本文讲述如何在oracle通过任务和管道的应用，异步调用存储过程的方法。
1. 基本原理
1.使用DBMS_JOB包将主处理存储过程作为任务提交到任务队列中
2.主处理存储过程在运行过程中通过DBMS_PIPE包将处理情况放在管道中
3.监控存储过程读取管道，从而了解处理情况
4.本文没有描述双向通信的方式，监控存储过程可以通过管道发送信息给主处理存储过程
2. 具体实现测试
建立测试环境
2.1. 对数据库的ini进行相关修改，使系统的任务队列功能打开
对于ORACLE9I，只需修设定数据库的INI内的"JOB_QUEUE_PROCESSES=非0值"，如"JOB_QUEUE_PROCESSES=10"，对于ORACLE8I除设定实例ini文件中的"JOB_QUEUE_PROCESSES=非0值"外，还需设定"job_queue_interval=1"
2.2. 设用用户权限
由于使用ORACLE中特定的程序包，所以要注意要明文给于用户系统权限。对当前用户（测试用户），赋于以下权力
EXECUTE DBMS_PIPE
EXECUTE DBMS_LOCK
EXECUTE DBMS_JOB
2.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;
2.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;
2.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;
3. 代码执行
3.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>
