如何才能让一个运行中的程序永久休眠呢？
以下使用“命令解释器”的方法来解决。
在循环体中插入一个“命令解释器”，然后通过数据库内置的进程间通讯机制来发送命令，这种机制也叫数据库管道。

点击(此处)折叠或打开

DECLARE
pipename CONSTANT VARCHAR2(12) := 'signaler';
result INTEGER;
pipebuf VARCHAR2(64);
BEGIN
/*创建一个指定名字的私有管道*/
result ;=DBMS_PIPE.create_pipe(pipename);
LOOP
data_gathering_procedure;
DBMS_LOCK.sleep(10);
/*检查管道里是否有消息*/
IF
DBMS_PIPE.receive_message(pipename,0)=0
THEN
/*解释消息表采取动作*/
DBMS_PIPE.unpack_message(pipebuf);
EXIT_WHEN pipebuf='stop';
END IF;
END LOOP;
END;

对DBMS_PIPE的调用应该对CPU负载影响很小。
现在就可以构造一个简单地伙伴程序来终止上面的循环程序的运行。

点击(此处)折叠或打开

DECLARE
pipename VARCHAR2(12) :='signaler';
result INTEGER := DBMS_PIPE.creaete_pipe(pipename);
BEGIN
DBMS_PIPE.pack_message('stop');
END;

这个例子使用的是一个私有管道，所以必须由和那个运行“无限循环”的相同账号来发送stop消息。
在数据库中私有管道的名称空间是全局的，跨越当前用户所有会话的。因此，如果有多个程序同时运行“无限循环”，必须使用一些其他的逻辑：
1.保证为每一个会话的管道名称唯一；
2.在发送stop命令时，确保正确的管道名称。

ITPub博客

PL/SQL 结束一个人为的无限循环

最新文章