当前位置:首页 > 开发 > 数据库 > 正文

Oracle批量导出存储过程

发表于: 2013-03-19   作者:bijian1013   来源:转载   浏览次数:
摘要: 法一: 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_so

法一:

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;

 
法三:(自己写存储过程导出)

1.创建DIRECTORY

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

 

如创建报没权限的错误,则以system的用户登录,给当前用户赋权

--赋权语句

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、PROCEDURE、TYPE、FUNCTION、TRIGGER、PACKAGE BODY、PACKAGE保存到桌面的test.sql中

begin
   loadproce('bijian');
end;

 

Oracle批量导出存储过程

  • 0

    开心

    开心

  • 0

    板砖

    板砖

  • 0

    感动

    感动

  • 0

    有用

    有用

  • 0

    疑问

    疑问

  • 0

    难过

    难过

  • 0

    无聊

    无聊

  • 0

    震惊

    震惊

编辑推荐
昨天使用exp可以导出oracle数据库表,今天说下怎么导出存储过程。 首先看下使用pl/sql怎么导出存储
首先,我要申明我之所以写这篇博客是因为今天看来篇博文http://chenzone.iteye.com/blog/2018199,
近日在研究SQL的存储过程,这里我陆续将我在使用存储过程中碰到的问题及解决办法发布到网上,请各位
create or replace package body cuttoship_lots is procedure prod_run(p_w_day date) as begin de
oracle的存储过程,其实就是执行一个任务,该任务包括了一系列的PL/ SQL语句,存储在数据库中,成为
什么是存储过程? 是一个可以用编程的方式来操作SQL的集合。 存储过程的优点? 执行效率很高,因为
存储过程创建语法: create or replace procedure 存储过程名(param1 in type,param2 out type)
什么是存储过程? 是一个可以用编程的方式来操作SQL的集合。 存储过程的优点? 执行效率很高,因为
存储过程 create or replace procedure pollution_level_judge(pollution_level in hm_pollution_le
oracle的版本为11g 官方描述: http://docs.oracle.com/cd/E11882_01/appdev.112/e25519/procedure.h
版权所有 IT知识库 CopyRight © 2009-2015 IT知识库 IT610.com , All Rights Reserved. 京ICP备09083238号