Oracle Str Split Function

create or replace type tb_strSplit  as table of varchar2(4000);

create or replace function to_table(pv_str varchar2,pv_split varchar2) return tb_strSplit
as
  ltab tb_strSplit := tb_strSplit();
  pos integer := 0;
  ls varchar2(4000) := pv_str;
begin
  pos := instr(ls,pv_split);
  while pos > 0 loop
    ltab.extend;
    ltab(ltab.count) := substr(ls,1,pos - 1);
    ls := substr(ls,pos + length(pv_split));
    pos := instr(ls,pv_split);
  end loop;
  ltab.extend;
  ltab(ltab.count) := ls;
  return ltab;
end;

set serverout on
declare
aa tbl_str;
begin
aa := to_table('a|||b|||c','|||');
for i in 1..aa.count loop
        dbms_output.put_line(aa(i));
end loop;
end;
/

----------------------------------------------------------

CREATE OR REPLACE function strToTb(inVStr in string,inStrSplit in varchar) return tb_strSplit PIPELINED
as
v_tmp varchar2(4000);
v_element varchar2(4000);
begin

v_tmp := inVStr;
while instr(v_tmp,inStrSplit)>0 loop
   v_element := substr(v_tmp,1,instr(v_tmp,inStrSplit)-1);
   v_tmp := substr(v_tmp,instr(v_tmp,inStrSplit)+length(inStrSplit),length(v_tmp));
   pipe row(v_element);
end loop;

pipe row(v_tmp);

return;
end strToTb;
/

select * from table(strToTb('a|||b|||c','|||'));

 

------------------------------------------------------------------------------------------------------------------------------------------------------

create or replace type type_split as table of varchar2(300); 

--create function

create or replace function split

(

   p_list varchar2,

   p_sep varchar2 := ' '

)  return type_split pipelined

 is

   l_idx  pls_integer;

   v_list  varchar2(30) := p_list;

begin

   loop

      l_idx := instr(v_list,p_sep);

      if l_idx > 0 then

          pipe row(substr(v_list,1,l_idx-1));

          v_list := substr(v_list,l_idx+length(p_sep));

      else

          pipe row(v_list);

          exit;

      end if;

   end loop;

   return;

end split;
/

 

 SQL> select * from table(split('northsnow,hell',','));