SQL>
SQL> create or replace procedure print_clob( p_clob in clob )
2 as
3 l_offset number default 1;
4 begin
5 loop
6 exit when l_offset > dbms_lob.getlength(p_clob);
7 dbms_output.put_line( dbms_lob.substr( p_clob, 255, l_offset ) );
8 l_offset := l_offset + 255;
9 end loop;
10 end;
11 /
Procedure created.
SQL>
SQL>
|