使用oracle压缩blob对象


1、使用oracle压缩blob对象

l_blob := utl_compress.lz_compress(l_blob);

2、将blob转换成clob
FUNCTION blob_to_clob(blob_in IN BLOB) RETURN CLOB AS
    v_clob    CLOB;
    v_varchar VARCHAR2(32767 );
    v_start   PLS_INTEGER := 1 ;
    v_buffer  PLS_INTEGER := 32767 ;
    tmp_num   NUMBER;
  BEGIN
    dbms_lob.createtemporary(v_clob, TRUE);
    tmp_num := ceil(dbms_lob.getlength(blob_in) / v_buffer);
    IF tmp_num > 0 THEN
      --防止传入的BLOB为NULL或长度为0时引发错误
      FOR i IN 1 .. tmp_num LOOP
        v_varchar := utl_raw.cast_to_varchar2(dbms_lob.substr(blob_in,
                                                              v_buffer,
                                                              v_start));
        dbms_lob.writeappend(v_clob, length(v_varchar), v_varchar);
        v_start := v_start + v_buffer;
      END LOOP ;
    END IF ;
    RETURN v_clob;
  END blob_to_clob;

3、将clob数据插入文件中
dbms_xslprocessor.clob2file(l_clob, p_dir_name, p_file_name);

郑重声明:本站内容如果来自互联网及其他传播媒体,其版权均属原媒体及文章作者所有。转载目的在于传递更多信息及用于网络分享,并不代表本站赞同其观点和对其真实性负责,也不构成任何其他建议。