以下是Oracle導(dǎo)出sql語(yǔ)句存儲(chǔ)過程的一個(gè)方法：

先修改init.ora   

例如：   

  utl_file_dir=/usr         //路徑為   oracle所在的盤:/usr   

然后就是Oracle導(dǎo)出sql語(yǔ)句的過程。此過程將用戶TEMP的P1過程的代碼保存到ORACLE安裝盤下/USR/TEXT.TXT中   

create   or   replace   procedure   TEST     
is     
    file_handle   utl_file.file_type;     
    STOR_TEXT   VARCHAR2(4000);     
    N   NUMBER;     
I   NUMBER;     
  begin     
I:=1;     
      SELECT   MAX(LINE)   INTO   N   FROM   ALL_SOURCE   WHERE   OWNER='TEMP'   AND       
    
NAME='P1';     
file_handle:=utl_file.fopen('/usr','test.txt','a');     
WHILE   I<=N   LOOP     
      SELECT   TEXT     INTO   STOR_TEXT   FROM   ALL_SOURCE   WHERE   OWNER='TEMP'   AND       
    
NAME='P1'   AND   LINE=   I;     
      I:=I+1;     
      utl_file.put_line(file_handle,stor_text);     
END   LOOP;     
      utl_file.fclose(file_handle);     
commit;     
end   TEST;     
/     
exec   TEST;    

這樣就實(shí)現(xiàn)了Oracle導(dǎo)出sql語(yǔ)句存儲(chǔ)過程。

【編輯推薦】

1. Oracle導(dǎo)出SQL腳本的spool實(shí)現(xiàn)
2. 三分鐘搞定oracle用戶表空間
3. 淺述Oracle用戶表空間關(guān)系
4. Oracle用戶管理常用操作參考手冊(cè)
5. 老鳥談Oracle用戶表空間