Dbms_lob wwv_flow_files

Question

I created a file upload as shown in the how-to, which I am using to upload csv files to the wwv_flow_files table. I would like to take the blob and break it apart for insert to a processing table. However, I am new to dbms_lob and would like any help possible. Are there any good references to using this in a pl/sql package to create inserts from blob fields?
Many Thanks!!!

Answer 1

Ok, I was able to find a solution and I'll post what I have. I was uploading a csv file with 3 fields (number, text, text) to the flow_files table. I was able to break this apart for insert using the anonymous block below. I'll probably store this as a function so that I can return a success/failure message.
I hope this can help someone else!
Begin
Declare
v_blob blob;                    
v_raw raw(32767);     
v_len number;
v_pos integer := 1;
v_amt binary_integer := 15;
v_out varchar2(500);
v_sql varchar2(255);
v_search raw(4);
l_linebreak varchar2(2) := chr(13)||chr(10);
v_pad1 varchar2(5);
v_pad2 varchar2(7);
v_pad3 varchar2(5);
begin
v_sql := 'insert into table_x (field1,field2,field3) values ';
v_search := utl_raw.cast_to_raw(l_linebreak);
select BLOB_CONTENT
into v_blob
from WWV_FLOW_FILE_OBJECTS$
where id = 775113501593078;
v_pad1 := ','||'''';
v_pad2 := ''''||','||'''';
v_pad3 := ''''||')';
v_pos := 1;
loop
v_amt := DBMS_LOB.INSTR(v_blob,v_search,v_pos);
v_amt := v_amt - v_pos;
If v_amt < 1 then
v_amt := 1;
End if;
/* Read current sector from blob into raw*/
DBMS_LOB.READ(v_blob,v_amt,v_pos,v_raw);
v_out := utl_raw.cast_to_varchar2(v_raw); --convert raw to varchar2 and set to output variable
--dbms_output.put_line(v_out);
v_out := replace(v_out,chr(10),'');
v_out := replace(v_out,chr(13),'');
If length(v_out) > 0 then
v_out := v_sql||'('||replace(substr(v_out,1,instr(v_out,',')),',',v_pad1)
||replace(substr(v_out,instr(v_out,',')+1,(length(v_out)-(instr(v_out,',')))),',',v_pad2)
               ||v_pad3;
--dbms_output.put_line(v_out);
     Execute immediate v_out;
End if;
v_out := null;
v_raw := null;
v_pos := v_pos + v_amt +1;
v_amt := null;
end loop;
EXCEPTION
WHEN others THEN
     dbms_output.put_line(sqlerrm);
NULL;
end;
end;