-- 先創建Blog轉換為Clob的function
CREATE ? OR ? REPLACE ? FUNCTION ?BlobToClob(blob_in? IN ?BLOB)? RETURN ?CLOB? AS
????v_clob????CLOB;
????v_varchar? VARCHAR2 ( 32767 );
????v_start???PLS_INTEGER?: = ? 1 ;
????v_buffer??PLS_INTEGER?: = ? 32767 ;
BEGIN
????DBMS_LOB.CREATETEMPORARY(v_clob,?TRUE);
???? FOR ?i? IN ? 1 ?..?CEIL(DBMS_LOB.GETLENGTH(blob_in)? / ?v_buffer)?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);
? ? ? ? --DBMS_OUTPUT.PUT_LINE(v_varchar);
????????v_start?: = ?v_start? + ?v_buffer;
???? END ?LOOP;
???? RETURN ?v_clob;
END ?BlobToClob;