oracle clob转blob

最新推荐文章于 2024-09-04 09:53:00 发布

qjm201000

最新推荐文章于 2024-09-04 09:53:00 发布

阅读量1.3k

点赞数

本文链接：https://blog.csdn.net/qjm201000/article/details/100118685

版权

CREATE OR REPLACE FUNCTION C2B (b IN CLOB default empty_clob())
   RETURN BLOB
-- typecasts BLOB to CLOB (binary conversion)
IS
   res            BLOB;
   b_len          number := dbms_lob.getlength(b) ;
   dest_offset1   NUMBER := 1;
   src_offset1    NUMBER := 1;
   amount_c       INTEGER := DBMS_LOB.lobmaxsize;
   blob_csid      NUMBER := DBMS_LOB.default_csid;
   lang_ctx       INTEGER := DBMS_LOB.default_lang_ctx;
   warning        INTEGER;
BEGIN

   if b_len > 0 then
   DBMS_LOB.createtemporary (res, TRUE);
   DBMS_LOB.OPEN (res, DBMS_LOB.lob_readwrite);
   DBMS_LOB.convertToBlob (res,
                           b,
                           amount_c,
                           dest_offset1,
                           src_offset1,
                           blob_csid,
                           lang_ctx,
                           warning
                          );
else
   select   empty_blob() into res from dual ;
end if ;
   RETURN res;                                             -- res is OPEN here
END C2B;