Copy CLOB to BLOB

Question

Hi,
Oracle 9.2.0.8
How can I copy a CLOB to a BLOB ?
Thanks

Answer 1

HI,
This sample may help u.
create or replace procedure CLOB2BLOB (p_clob in out nocopy clob, p_blob in out nocopy blob) is
2 -- transforming CLOB â BLOB
3 l_off number default 1;
4 l_amt number default 4096;
5 l_offWrite number default 1;
6 l_amtWrite number;
7 l_str varchar2(4096 char);
8 begin
9 begin
10 loop
11 dbms_lob.read ( p_clob, l_amt, l_off, l_str );
12
13 l_amtWrite := utl_raw.length ( utl_raw.cast_to_raw( l_str) );
14 dbms_lob.write( p_blob, l_amtWrite, l_offWrite,
15 utl_raw.cast_to_raw( l_str ) );
16
17 l_offWrite := l_offWrite + l_amtWrite;
18
19 l_off := l_off + l_amt;
20 l_amt := 4096;
21 end loop;
22 exception
23 when no_data_found then
24 NULL;
25 end;
26 end;
27 /
Procedure created.
SCOTT@orcl_11g> show errors
No errors.
SCOTT@orcl_11g> CREATE TABLE test_tab
2 (id     NUMBER,
3      clob_col CLOB,
4      blob_col BLOB)
5 /
Table created.
SCOTT@orcl_11g> INSERT INTO test_tab (id, clob_col, blob_col)
2 VALUES (1, 'This was entered in the clob column.', EMPTY_BLOB())
3 /
1 row created.
SCOTT@orcl_11g> SET NULL Null
SCOTT@orcl_11g> SELECT clob_col, UTL_RAW.CAST_TO_VARCHAR2 (blob_col) AS blob_data
2 FROM test_tab
3 /
CLOB_COL
BLOB_DATA
This was entered in the clob column.
Null
SCOTT@orcl_11g> DECLARE
2 v_clob CLOB;
3 v_blob BLOB;
4 BEGIN
5 SELECT clob_col INTO v_clob FROM test_tab WHERE id = 1;
6 SELECT blob_col INTO v_blob FROM test_tab WHERE id = 1 FOR UPDATE;
7 clob2blob (v_clob, v_blob);
8 END;
9 /
PL/SQL procedure successfully completed.
SCOTT@orcl_11g> SELECT clob_col, UTL_RAW.CAST_TO_VARCHAR2 (blob_col) AS blob_data
2 FROM test_tab
3 /
CLOB_COL
BLOB_DATA
This was entered in the clob column.
This was entered in the clob column.
SCOTT@orcl_11g>
Reference :-
http://kr.forums.oracle.com/forums/thread.jspa?messageID=2702149
Regards,
Simma...