create table csv_data
  (csv_data clob)


insert into csv_data
  (csv_data)
  
  values
    ('34,1,"FAX",2010-03-11T23:54:33,"314"');

insert into csv_data
  (csv_data)
  
  values
    ('35,1,"BU",2011-01-11T23:54:33,"314"');

insert into csv_data
  (csv_data)
  
  values
    ('36,1,"BU",2012-02-11T23:54:33,"314"');
commit;

create or replace package SplitData as 
  
  function SplitString (TableName  dbms_tf.table_t,
                        ColumnName dbms_tf.columns_t,
                        Delimiter  varchar2 default ',') return clob sql_macro;

  function SplitString (DelimitedData varchar2,
                        Delimter      varchar2 default ',') return clob sql_macro;

 end;

create or replace package body SplitData as 
  
  function SplitString (TableName  dbms_tf.table_t,
                        ColumnName dbms_tf.columns_t,
                        Delimiter  varchar2 default ',') return clob sql_macro as
    
    SQLStatement clob;


    begin

      SQLStatement := 'select t.*, 
                              regexp_substr('||ColumnName(1)||', ''[^''||Delimiter||'']+'', 1, position) string_value,
                              position
                         from (select rownum row_num,
                                      TableName.*
                                 from TableName) t,
                              lateral (select level position
                                         from dual
                                         connect by level <= length ('||ColumnName(1)||') - length (replace('||ColumnName(1)|| ', Delimiter)) + 1)';

      return SQLStatement;

    end SplitString;


  function SplitString (DelimitedData varchar2,
                        Delimter      varchar2 default ',') return clob sql_macro as

    SQLStatement clob;


    begin
      SQLStatement := 'select regexp_substr(DelimitedData, ''[^''||Delimter||'']+'', 1, level) string_value,
                              level position
                         from dual
                         connect by level <= length (DelimitedData) - length(replace(DelimitedData, Delimter)) + 1';

      return SQLStatement;

    end SplitString;

end SplitData;

select column1,
       column2,
       column3,
       column4,
       column5
  from (select row_num,
               replace(to_char(string_value), '"') string_value,
               to_number(position) position
          from SplitData.SplitString(csv_data, columns(csv_data)))
    pivot (min(string_value) for position in (1   as column1,
                                              2   as column2,
                                              3   as column3,
                                              4   as column4,
                                              5   as column5));