ORACLE Split方法记录

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;