toad for oracle可否批量导出存储过程

Posted

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了toad for oracle可否批量导出存储过程相关的知识,希望对你有一定的参考价值。

在toad的左边窗口中找到存储过程标签,选中存储过程,然后右键--execute procedure。 会弹出窗口,输入参数,就可以调试存储过程的。 参考技术A pl/sql developer可以批量导出存储过程。
toad还是没有导出这个功能。

Oracle批量导出存储过程(保持每个存储过程独立)

如有A,B,C三个存储过程希望被导出,导出时还是保持A.sql,B.sql,C.sql而不是全部导到一个text.sql当中。存储过程或者shell方式都可以

略微复杂,需要存储过程实现。

1、创建输出路径,比如你要在d盘test目录下输出,你就先在d盘根目录下建立一个test的目录。

2、sqlplus下以sysdba登录,执行以下语句

create or replace directory TMP as \'d:\\test\';
 
grant read,write on directory TMP to scott; --比如我用的scott用户
 
alter system set utl_file_dir=\'d:\\test\' scope=spfile;

3、以上步骤执行完,需要重启数据库。

4、创建一个存储过程,代码如下(基本是不用改动,原封复制即可):

CREATE OR REPLACE PROCEDURE SP_OUTPUT_PROCEDURE is
  file_handle     utl_file.file_type;
  Write_content   VARCHAR2(1024);
  Write_file_name VARCHAR2(50);
  v_name          varchar2(50);
  v_text          varchar2(2000);
  cursor cur_procedure_name is
    select distinct name from user_source where type = \'PROCEDURE\';
  cursor cur_sp_out is
    select t.text
      from (select 0 line, \'CREATE OR REPLACE \' text
              from dual
            union
            select line, text
              from user_source
             where type = \'PROCEDURE\'
               and name = v_name) t
     order by line;
begin
  open cur_procedure_name;
  loop
    fetch cur_procedure_name
      into v_name;
    exit when cur_procedure_name%notfound;
    write_file_name := v_name || \'.txt\';
    open cur_sp_out;
    loop
      fetch cur_sp_out
        into v_text;
      exit when cur_sp_out%notfound;
      file_handle   := utl_file.fopen(\'TMP\', write_file_name, \'a\');
      write_content := v_text;
      --write file
      IF utl_file.is_open(file_handle) THEN
        utl_file.put_line(file_handle, write_content);
      END IF;
      --close file
      utl_file.fclose(file_handle);
    end loop;
    close cur_sp_out;
  end loop;
  close cur_procedure_name;
end;

5、创建完毕执行存储过程,这个就不赘述了,执行完毕后,你会发现d盘test目录下的文件名就是以存储过程名命名的txt文件,如图:

6、里边内容(就是存储过程创建时的代码,可能排版看着难看点,但是不影响使用):

追问

请问第31行里的a代表什么?

参考技术A 用plsql到出,十分方便

以上是关于toad for oracle可否批量导出存储过程的主要内容,如果未能解决你的问题,请参考以下文章

使用 Toad for Oracle 检索存储过程、视图、函数、触发器

toad for oracle 更改表 ddl 导出

Oracle批量导出存储过程(保持每个存储过程独立)

Oracle / Toad 中的 For 循环

如何在 Oracle toad 中编辑和保存存储过程?

Oracle怎么导出存储过程