create or replace function split(p_str varchar2, p_sep varchar2 := ' ')
-------------------------------
--p_str :源字符串
--p_sep :分隔符
--功能:分割字符串为table
--使用示例:select * from table( split('1,2,3,4',','));
-------------------------------
return type_split --自定义类型(create or replace type type_split as table of varchar2(512);)
pipelined is
l_idx pls_integer; --list index
v_list varchar2(512) := p_str;
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;