Oracle自定義函式---按照某個分隔符拆分字串

--根據','拆分字串: 返回一個陣列
首先必須要在Type包下面建立create or replace type type_split as table of varchar2(4000); 因為下面要引用此型別

function split_str(var_str   in varchar2,var_split in varchar2)

  return type_split is

  var_out     type_split;
  var_tmp     varchar2(400);
  var_element varchar2(400);

begin
  var_tmp := var_str;
  var_out := type_split();
  --如果存在匹配的分割符
  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;