Oracle 拆分字符串函数
在将图形系统的数据保存的DCOM方式转化为数据库底层直接操作的过程中，需要保留以前的批量的插入和删除功能，这其中就会涉及到将传入的字符串进行拆分然后利用ORA 的存储过程进行批量处理。在此记录下字符串拆分函数：
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 字符串分隔符
** 返 回 值： t_ret_table CURSOR 拆分后数据集合
** 摘 要：拆分字符串
调用 举例：
select * from table(split_str('A-B-C','-'))
****************************************************/
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_element值
var_element:=substr(var_element,instr(var_element,'>',1)+1);
var_out(var_out.count) := var_element;
--打印
--SET SERVEROUT ON;
DBMS_OUTPUT.PUT_LINE(var_element);
--打印
end loop;
--var_out.extend(1);
var_out.extend;
var_out(var_out.count) := var_tmp;
return var_out;
end split_str;
TAG:
