Oracleバルクエクスポート・ストレージ・プロシージャ

法一:
PL/SQLツールエクスポート
 
法二:

SET echo off;
SET heading   off;
SET feedback   off;
spool C:\Documents and Settings\Administrator\  \proc.sql;

 
--1、sysユーザーなどで陸を待つと:

select   text   from   dba_source   where   owner= 'lingfeng'    and   type   = 'PROCEDURE';

 
--2、一般のユーザーを使用して(その下のストアド・プロシージャをエクスポートするユーザー):

select   text   from   user_source;
spool   off;

法3:(自己書き込みストレージプロシージャエクスポート)
1.DIRECTORYの作成

create or replace directory PROCE_DIR as 'C:/Documents and Settings/Administrator/  ';

 
レポート作成権限のないエラーの場合は、システムのユーザーでログインし、現在のユーザーに権限を付与します.
--権限付与文

grant create any directory to bijian;

 
--解約文

revoke create any directory from bijian;

 
作成後、次の文で作成に成功したかどうかを問い合せることができます.

select * from dba_directories;

 
2.エクスポート・ストレージ・プロシージャの作成

create or replace procedure loadProce(owner varchar2)
is
    type user_source_table_type is table of user_source.text%TYPE INDEX BY BINARY_INTEGER;
    user_source_table user_source_table_type;
    file_handle utl_file.file_type;
    stor_text VARCHAR2(4000);
    sql_stat varchar2(1000);
    sql_stat2 varchar2(1000);
    sql_stat3 varchar2(1000);
    nCount NUMBER;
   i NUMBER;
begin
    sql_stat:='select distinct(name) from all_source where owner = ''' || upper(owner) || '''';
    execute immediate sql_stat bulk collect into user_source_table;
    file_handle:=utl_file.fopen('PROCE_DIR','test.sql','W');
    for j in 1..user_source_table.count loop
        i:=1;
        sql_stat2:='SELECT MAX(LINE) FROM ALL_SOURCE WHERE OWNER=''' || upper(owner) || ''' AND NAME=''' || user_source_table(j) || '''';
        --dbms_output.put_line(sql_stat2);
        execute immediate sql_stat2 into nCount;
        WHILE i<=nCount LOOP
           sql_stat3:='SELECT TEXT FROM ALL_SOURCE WHERE OWNER=''' || upper(owner) || ''' AND NAME=''' || user_source_table(j) || ''' and line = ' || i;
           --dbms_output.put_line(sql_stat3);
           execute immediate sql_stat3 into stor_text;
           i:=i+1;
         utl_file.put(file_handle,stor_text);
        END LOOP;
    end loop;
    utl_file.fclose(file_handle);
    commit;
end loadProce;

 
3.呼び出し、TYPE BODY、PROSDURE、TYPE、FUNCTION、TRIGGER、PACKAGE BODY、PACKAGEをデスクトップのtestに保存する.sql中

begin
   loadproce('bijian');
end;