在Oracle 8i中，往往會出現(xiàn)要在存儲過程中運行操作系統(tǒng)命令的情況。一般來說，利用Oracle Enterprise Manager設定作業(yè)時可以達到這個目的。但是由于OEM在設定作業(yè)缺 乏靈活性，設定的作業(yè)的參數(shù)是固定的。在實際應用當中往往需要在SQL語句當中運行需要隨時運行操作系統(tǒng)命令。Oracle 8i沒有直接運行OS命令的語句，我們可以利用DBMS_PIPE程序包實現(xiàn)這一要求。 

　　DBMS_PIPE通過創(chuàng)建管道，可以讓至少兩個進程進行通信。Oracle的管道與操作系統(tǒng)的管道在概念上有相同的地方，但是在實現(xiàn)機制不同。

　　下面介紹實現(xiàn)具體步驟: 

　　1、創(chuàng)建一個程序包，姑且起名叫DAEMON，SQL語句如下: 

　　/*創(chuàng)建daemon程序包*/ 
　　CREATE OR REPLACE PACKAGE BODY daemon AS 
　　/*execute_system是實現(xiàn)運行os命令的函數(shù)*/ 
　　FUNCTION execute_system（command VARCHAR2， 
　　timeout NUMBER DEFAULT 10） 
　　RETURN NUMBER IS 

　　status NUMBER；
　　result VARCHAR2（20）；
　　command_code NUMBER；
　　pipe_name VARCHAR2（30）；
　　BEGIN 
　　pipe_name := DBMS_PIPE.UNIQUE_SESSION_NAME；
　　DBMS_PIPE.PACK_MESSAGE（'SYSTEM'）；
　　DBMS_PIPE.PACK_MESSAGE（pipe_name）；
　　DBMS_PIPE.PACK_MESSAGE（command）；
　　/*向daemon管道發(fā)送表示命令的字符*/ 
　　status := DBMS_PIPE.SEND_MESSAGE（'daemon'， timeout）；
　　IF status <> 0 THEN 
　　RAISE_APPLICATION_ERROR（-20010， 
　　'Execute_system: Error while sending. Status = ' || status）；
　　END IF；

最新評論