分享
 
 
 

ORACLE的存储过程的异步调用--任务和管道的应用

王朝oracle·作者佚名  2008-05-31
窄屏简体版  字體: |||超大  

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;

statusNUMBER;

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 readmaxproAS

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;

5. 附录:

5.1. 相关程序包说明

1

DBMS_JOB.SUBMIT(

JOB OUT BINARY_INTEGER,

WHAT IN VARCHAR2,

NEXT_DATE IN DATE DEFAULTSYSDATE,

INTERVAL IN VARCHAR2 DEFAULT 'NULL',

NO_PARSE IN BOOLEAN DEFAULT FALSE,

INSTANCE IN BINARY_INTEGER DEFAULT ANY_INSTANCE,

FORCE IN BOOLEAN DEFAULT FALSE)

功能:提交作业入作业队列

参数说明:

JOB:作业的作业号,输出参数

WHAT:作业对应的PL/SQL代码(一般用于过程名)

NEXT_DATE:下一次作业运行的时间

INTERVAL:作业执行间隔时间,缺省是NULL,只执行一次

NO_PARSE:是否对WHAT语句,在提交时进行分析,缺省是进行分析。

INSTANCE:作业提交时,指明运行作业的实例,缺省是0,任何的数据库全可以

FORCE:是否检查INSTANCE指定的数据库在运行,缺省是FALSE,不检查

例子:

declare

jobn number;

begin

DBMS_JOB.SUBMIT(jobn,'maxpro;',sysdate);

DBMS_OUTPUT.PUT_LINE('JOB=' jobn);

COMMIT;

end;

注重:

设定数据库参数JOB_QUEUE_PROCESSES = 非0值(最大队列数最大60)

对于9I前设定数据库参数JOB_QUEUE_INTERVAL = 非0值(队列扫描周期1-3600秒)

2

DBMS_PIPE.PACK_MESSAGE (itemINVARCHAR2);

DBMS_PIPE.PACK_MESSAGE (itemINNCHAR);

DBMS_PIPE.PACK_MESSAGE (itemINNUMBER);

DBMS_PIPE.PACK_MESSAGE (itemINDATE);

DBMS_PIPE.PACK_MESSAGE_RAW (itemINRAW);

DBMS_PIPE.PACK_MESSAGE_ROWID (itemINROWID);

功能:把一个数据项放到私有数据缓冲区

3

DBMS_PIPE.SEND_MESSAGE (

pipename IN VARCHAR2,

timeoutIN INTEGER DEFAULT MAXWAIT,

maxpipesizeIN INTEGER DEFAULT 8192)

RETURN INTEGER;

功能:发送私有数据缓冲区的信息到命名管道,假如管道不存在就建立

4

DBMS_PIPE.RECEIVE_MESSAGE (

pipename IN VARCHAR2,

timeoutIN INTEGERDEFAULT maxwait)RETURN INTEGER;

功能:从管道到接受信息放到数据缓冲区

5

DBMS_PIPE.UNPACK_MESSAGE (itemOUT VARCHAR2);

DBMS_PIPE.UNPACK_MESSAGE (itemOUT NCHAR);

DBMS_PIPE.UNPACK_MESSAGE (itemOUT NUMBER);

DBMS_PIPE.UNPACK_MESSAGE (itemOUT DATE);

DBMS_PIPE.UNPACK_MESSAGE_RAW (itemOUT RAW);

DBMS_PIPE.UNPACK_MESSAGE_ROWID (itemOUT ROWID);

功能:从数据缓冲区接收下一个数据项

6

DBMS_PIPE.PURGE ( pipenameINVARCHAR2);

功能:清除管道内的信息

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有