编写存储过程导出oracle表数据到多个文本文件

1、测试表和数据：

create table test(id int , s varchar2());

begin

    for k in .. loop

        insert into test values(k,'test'||k);

    end loop;

end;

/

2、在本地创建一个目录，如D:/myoracledata

在sql plus中执行如下语句

create or replace directory MY_DIR as 'D:/myoracledata';

3、在sql plus中执行如下脚本。下面代码是 100行换一个文件,文件名前缀为data

declare

    row_result varchar2();

    selectsql varchar2();

    qrycursor SYS_REFCURSOR;

    txt_handle UTL_FILE.file_type;

    filenum number;

    num number;

    MAX_NUM number;

    FILENAME_PREFIX varchar2();

BEGIN

    MAX_NUM:=;

    FILENAME_PREFIX:='data';

    filenum:=;

    num:=;

    selectsql := ' select id||'',''||s from test';

    txt_handle := UTL_FILE.FOPEN('MY_DIR','data'||filenum||'.txt','w');

    open qrycursor for selectsql;

    loop

      fetch qrycursor into row_result;

      exit when qrycursor%notfound;

      UTL_FILE.PUT_LINE(txt_handle,row_result);

      num:=num+;

      if  num=MAX_NUM then

        filenum:=filenum+;

        UTL_FILE.FCLOSE(txt_handle);

        txt_handle := UTL_FILE.FOPEN('MY_DIR',FILENAME_PREFIX||filenum||'.txt','w');

        num:=;

      end if;

    end loop;

    close qrycursor;

    UTL_FILE.FCLOSE(txt_handle);

end;

/

巴特西

编写存储过程导出oracle表数据到多个文本文件

最新文章

热门文章