ORACLE clob转换成Blob类型

isolated

ORACLE 10G R2上
　　测试通过。
　　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;

 
 
本文转自 ☆★ 包罗万象网 ★☆ - http://www.baoluowanxiang.com 转载请注明出处，侵权必究！
原文链接：http://www.baoluowanxiang.com/a/website/database/2010/0531/917.html