create or replace function str_split
(
a_str varchar2,--要分割的字符串
a_split varchar2--分隔符号
)
return varchar2
is
temp_str varchar2(1000);
temp_length number;
split_length number;
result_str varchar2(1000);
begin
temp_str := ltrim(rtrim(a_str));
temp_length := 0;
result_str := a_str;
while instr(temp_str,a_split)<>0 loop
temp_length := instr(temp_str,a_split);
split_length := length(a_split);
result_str := substr(temp_str,split_length+temp_length);
temp_str := result_str;
end loop;
return result_str;
end str_split;