Oracle导出clob字段到csv

使用UTL_FILE

ref: How to Export The Table with a CLOB Column Into a CSV File using UTL_FILE ?(Doc ID 1967617.1)

--preapre data
CREATE TABLE TESTCLOB(ID NUMBER, MYCLOB1 CLOB, MYCLOB2 CLOB );
INSERT INTO TESTCLOB(ID,MYCLOB1,MYCLOB2) VALUES(1,'Sample row 11', 'Sample row 12');
INSERT INTO TESTCLOB(ID,MYCLOB1,MYCLOB2) VALUES(2,'Sample row 21', 'Sample row 22');
INSERT INTO TESTCLOB(ID,MYCLOB1,MYCLOB2) VALUES(3,'Sample row 31', 'Sample row 32');
INSERT INTO TESTCLOB(ID,MYCLOB1,MYCLOB2) VALUES(4,'Sample row 41', 'Sample row 42');
INSERT INTO TESTCLOB(ID,MYCLOB1,MYCLOB2) VALUES(5,'Sample row 51', 'Sample row 52');
COMMIT;

column MYCLOB1 format a20
column MYCLOB2 format a20
SELECT * FROM TESTCLOB;

--create directory
CREATE OR REPLACE DIRECTORY MYDIR AS '/u02/';


--create function
CREATE OR REPLACE FUNCTION EXPORT_TABLE_TO_CSV_FILE(p_query     in dbms_sql.varchar2a,
                                                      p_separator in varchar2 default ',',
                                                      p_dir       in varchar2,
                                                      p_filename  in varchar2,
                                                      p_is_head   in boolean default false)
  RETURN NUMBER is
  l_output        utl_file.file_type;
  l_theCursor     integer default dbms_sql.open_cursor;
  l_columnValue   varchar2(2000);
  l_columnValClob clob;
  l_status        integer;
  l_colCnt        number default 0;
  l_separator     varchar2(10) default '';
  l_cnt           number default 0;
  l_col_desc      dbms_sql.desc_tab;
  l_offset        integer;
BEGIN
  dbms_sql.parse(l_theCursor,
                 p_query,
                 p_query.first,
                 p_query.last,
                 true,
                 dbms_sql.native);
  dbms_sql.describe_columns(l_theCursor, l_colCnt, l_col_desc);
  for i in 1 .. l_colCnt loop
    if l_col_desc(i).col_type = 112 then
      dbms_sql.define_column(l_theCursor, i, l_columnValClob);
    else
      dbms_sql.define_column(l_theCursor, i, l_columnValue, 4000);
    end if;
  end loop;
  l_status := dbms_sql.execute(l_theCursor);
  if dbms_sql.fetch_rows(l_theCursor) > 0 then
    l_output := utl_file.fopen(p_dir, p_filename, 'w', 32767);
    if p_is_head then
      for i in 1 .. l_col_desc.count loop
        utl_file.put(l_output, l_separator || l_col_desc(i).col_name);
        l_separator := p_separator;
      end loop;
      utl_file.new_line(l_output);
    end if;
    loop
      l_separator := '';
      for i in 1 .. l_colCnt loop
        if l_col_desc(i).col_type = 112 then
          l_offset := 1;
          dbms_sql.column_value(l_theCursor, i, l_columnValClob);
          utl_file.put(l_output, l_separator);
          loop
            l_columnValue := dbms_lob.substr(l_columnValClob,
                                             2000,
                                             l_offset);
            -- dbms_output.put_line(l_columnValue);
            l_offset := l_offset + 2000;
            utl_file.put(l_output, l_columnValue);
            exit when trim(l_columnValue) is null;
          end loop;
        else
          dbms_sql.column_value(l_theCursor, i, l_columnValue);
          utl_file.put(l_output, l_separator || l_columnValue);
        end if;
        l_separator := p_separator;
      end loop;
      utl_file.new_line(l_output);
      l_cnt := l_cnt + 1;
      exit when(dbms_sql.fetch_rows(l_theCursor) <= 0);
    end loop;
  end if;
  dbms_sql.close_cursor(l_theCursor);
  utl_file.fclose(l_output);
  return l_cnt;
END;
/



set serverout on
DECLARE
  l_sql dbms_sql.varchar2a;
  l_cnt integer;
BEGIN
  l_sql(1) := 'SELECT * FROM TESTCLOB';
  l_cnt := export_table_to_csv_file(l_sql,
                                    ',',
                                    'MYDIR',
                                    'csvsample.csv',
                                    TRUE);
END;
/


使用sql developer

oracle开发的sql developer运行需要java.速度慢.
(不是plsql developer).
下载
在这里插入图片描述
1.Open SQL Developer:

Connect to your Oracle database using Oracle SQL Developer.
2. Run SQL Query:

Run a query to select the CLOB data.
SELECT clob_column FROM your_table;
3. Export the Data:

Right-click on the result set and choose the “Export” option.
Select “CSV” as the format and follow the prompts to save the data to a CSV file.

  • 1
    点赞
  • 2
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
Oracle解析CLOB字段可以使用DBMS_LOB包提供的功能。 CLOBOracle数据库中一种特殊的数据类型,用于存储大文本数据。在解析CLOB字段时,需要使用DBMS_LOB包中的一些过程和函数。 首先,可以使用DBMS_LOB.GETLENGTH函数获取CLOB字段的长度。这个函数返回CLOB字段的字符数。 然后,可以使用DBMS_LOB.SUBSTR函数截取指定长度的CLOB字段的子字符串。这个函数接受两个参数,第一个参数是CLOB字段本身,第二个参数是截取的起始位置,第三个参数是截取的长度。它返回指定长度的子字符串。 另外,可以使用DBMS_LOB.FILEEXISTS函数检查CLOB字段是否关联了外部文件,返回TRUE或FALSE。 如果CLOB字段关联了外部文件,可以使用DBMS_LOB.FILEOPEN函数打开这个文件,然后可以使用DBMS_LOB.READ函数从文件中读取数据。 另外,可以使用DBMS_LOB.CREATETEMPORARY函数创建一个临时LOB对象,可以将CLOB字段的数据复制到该临时LOB对象中,然后可以使用DBMS_LOB.READ函数从临时LOB对象中读取数据。 在解析CLOB字段时,需要注意的是,CLOB字段可能存储了非常大的文本数据,所以需要谨慎处理,以避免内存溢出或性能问题。可以使用块大小和缓冲区大小等参数来提高解析CLOB字段的效率。 总之,通过使用DBMS_LOB包提供的函数和过程,我们可以很方便地解析CLOB字段并进行各种操作,例如获取长度、截取子字符串、读取关联文件等。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值