oracle实现split函数功能

转载： http://blog.csdn.net/jojo52013145/article/details/6758279
在实际的应用中，为了让PL/SQL 函数返回数据的多个行，必须通过返回一个 REF CURSOR 或一个数据集合来完成。REF CURSOR 的这种情况局限于可以从查询中选择的数据，而整个集合在可以返回前，必须进行具体化。 9i 通过引入的管道化表函数纠正了后一种情况。表函数是返回整个行的集（通常作为一个集合）的函数，可以直接从 SQL 语句中进行查询，就好像它是一个真正的数据库表一样。管道化表函数与之相似，但是它像在构建时一样返回数据，而不是一次全部返回。管道化表函数更加有效，因为数据可以尽可能快地返回。

管道化表函数必须返回一个集合。在函数中，PIPE ROW 语句被用来返回该集合的单个元素，该函数必须以一个空的 RETURN 语句结束，以表明它已经完成。一旦我们创建了上述函数，我们就可以使用 TABLE 操作符从 SQL 查询中调用它。

1. 定义一个OBJECT类型的TYPE
CREATE OR replace TYPE TY_OBJ AS OBJECT (str1 VARCHAR2(50));
2. 定义一个TYPE继承了这个TY_OBJ;
CREATE OR replace TYPE strsplit_type AS TABLE OF TY_OBJ;
--DROP TYPE strsplit_type;
--DROP TYPE TY_OBJ;
3.测试用例：实现split函数功能

 create or replace function strsplit(p_value varchar2,
                                    p_split varchar2 := ',')
--usage: select * from table(strsplit('1,2,3,4,5'))
 RETURN strsplit_type 
  pipelined is
  v_idx       integer;
  v_str       varchar2(50);
  v_strs_last varchar2(4000) := p_value;

begin
  loop
    v_idx := instr(v_strs_last, p_split);
    exit when v_idx = 0;
    v_str       := substr(v_strs_last, 1, v_idx - 1);
    v_strs_last := substr(v_strs_last, v_idx + 1);
    pipe row(TY_OBJ(v_str));
  end loop;
  pipe row(TY_OBJ(v_strs_last));
  RETURN;

end strsplit;