龙盟编程博客 | 无障碍搜索 | 云盘搜索神器
快速搜索
主页 > 数据库类 > Oracle 技术 >

Oracle运行时需要的随时运行操作系统命令有哪些

时间:2011-04-12 23:18来源:未知 作者:admin 点击:
分享到:
一般的情况下在Oracle 8i中,经常会出现这种情况,即,在存储过程中出现 Oracle 运行操作系统命令,一般的情况我们就是利用Oracle Enterprise Manager来设定作业时可以达到这个目的.但是由于

一般的情况下在Oracle 8i中,经常会出现这种情况,即,在存储过程中出现Oracle运行操作系统命令,一般的情况我们就是利用Oracle Enterprise Manager来设定作业时可以达到这个目的.但是由于OEM在设定作业缺乏灵活性,设定的作业的参数是固定的.。

在实际应用当中往往需要在SQL语句当中Oracle运行需要随时运行操作系统命令.Oracle 8i没有直接运行OS命令的语句,我们可以利用DBMS_PIPE程序包实现这一要求.

DBMS_PIPE通过创建管道,可以让至少两个进程进行通信.Oracle的管道与操作系统的管道在概念上有相同的地方,但是在实现机制不同.
下面介绍实现具体步骤:

1 创建一个程序包,姑且起名叫DAEMON,SQL语句如下:

/*创建daemon程序包*/

  1. CREATE OR REPLACE PACKAGE BODY daemon AS  

/*execute_system是实现Oracle运行os命令的函数*/

  1. FUNCTION execute_system(command VARCHAR2,   
  2. timeout NUMBER DEFAULT 10)   
  3. RETURN NUMBER IS   
  4. status NUMBER;   
  5. result VARCHAR2(20);   
  6. command_code NUMBER;   
  7. pipe_name VARCHAR2(30);   
  8. BEGIN   
  9. pipe_name :DBMS_PIPE.UNIQUE_SESSION_NAME;   
  10. DBMS_PIPE.PACK_MESSAGE(''SYSTEM'');   
  11. DBMS_PIPE.PACK_MESSAGE(pipe_name);   
  12. DBMS_PIPE.PACK_MESSAGE(command);   
  13.  

/*向daemon管道发送表示命令的字符*/

  1. status :DBMS_PIPE.SEND_MESSAGE(''daemon'', timeout);   
  2. IF status <> 0 THEN   
  3. RAISE_APPLICATION_ERROR(-20010,   
  4. ''Execute_system: Error while sending. Status = '' || status);   
  5. END IF;   
  6. status :DBMS_PIPE.RECEIVE_MESSAGE(pipe_name, timeout);   
  7. IF status <> 0 THEN   
  8. RAISE_APPLICATION_ERROR(-20011,   
  9. ''Execute_system: Error while receiving.   
  10. Status = '' || status);   
  11. END IF;   

/*获取返回结果*/

  1. DBMS_PIPE.UNPACK_MESSAGE(result);   
  2. IF result <> ''done'' THEN   
  3. RAISE_APPLICATION_ERROR(-20012,   
  4. ''Execute_system: Done not received.'');   
  5. END IF;   
  6. DBMS_PIPE.UNPACK_MESSAGE(command_code);   
  7. DBMS_OUTPUT.PUT_LINE(''System command executed. result = '' ||   
  8. command_code);   
  9. RETURN command_code;   
  10. END execute_system;   
  11.  

/*stop是让daemon停止*/

  1. PROCEDURE stop(timeout NUMBER DEFAULT 10) IS   
  2. status NUMBER;   
  3. BEGIN   
  4. DBMS_PIPE.PACK_MESSAGE(''STOP'');   
  5. status :DBMS_PIPE.SEND_MESSAGE(''daemon'', timeout);   
  6. IF status <> 0 THEN   
  7. RAISE_APPLICATION_ERROR(-20030,   
  8. ''stop: error while sending. status = '' || status);   
  9. END IF;   
  10. END stop;   
  11. END daemon;  

通过Sql*Plus运行以上语句,将为当前用户创建daemon程序包. 上述的相关内容就是在Oracle运行操作系统命令中如何创建一个程序包,姑且起名叫DAEMON,SQL语句如下的描述,希望会给你带来一些帮助在此方面。

文章出自: http://www.programbbs.com/doc/class10-3.htm

精彩图集

赞助商链接