create or replace function split_str(var_str in varchar2,
var_split in varchar2)
/****************************************************
注意 先执行下面语句 创建类型
create or replace type t_ret_table is table of varchar2(100)
** 函数名称:split_str
** 参 数:【名称】 【类型 】 【说明】
** var_str varchar2 要拆分的字符串
** var_split varchar2 字符串分隔符
** 返 回 值:Result t_ret_table 拆分后数组集合
** 摘 要:拆分字符串
调用 举例:
select * from table(split_str('2008-10-21','-'))
****************************************************/
return t_ret_table is
var_out t_ret_table;
var_tmp varchar2(4000);
var_element varchar2(4000);
begin
var_tmp := var_str;
var_out := t_ret_table();
--如果存在匹配的分割符
while instr(var_tmp, var_split) > 0 loop
var_element := substr(var_tmp, 1, instr(var_tmp, var_split) - 1);
var_tmp := substr(var_tmp,
instr(var_tmp, var_split) + length(var_split),
length(var_tmp));
--var_out.extend(1);
var_out.extend;
var_out(var_out.count) := var_element;
end loop;
--var_out.extend(1);
var_out.extend;
var_out(var_out.count) := var_tmp;
return var_out;
end split_str;
var_split in varchar2)
/****************************************************
注意 先执行下面语句 创建类型
create or replace type t_ret_table is table of varchar2(100)
** 函数名称:split_str
** 参 数:【名称】 【类型 】 【说明】
** var_str varchar2 要拆分的字符串
** var_split varchar2 字符串分隔符
** 返 回 值:Result t_ret_table 拆分后数组集合
** 摘 要:拆分字符串
调用 举例:
select * from table(split_str('2008-10-21','-'))
****************************************************/
return t_ret_table is
var_out t_ret_table;
var_tmp varchar2(4000);
var_element varchar2(4000);
begin
var_tmp := var_str;
var_out := t_ret_table();
--如果存在匹配的分割符
while instr(var_tmp, var_split) > 0 loop
var_element := substr(var_tmp, 1, instr(var_tmp, var_split) - 1);
var_tmp := substr(var_tmp,
instr(var_tmp, var_split) + length(var_split),
length(var_tmp));
--var_out.extend(1);
var_out.extend;
var_out(var_out.count) := var_element;
end loop;
--var_out.extend(1);
var_out.extend;
var_out(var_out.count) := var_tmp;
return var_out;
end split_str;