1.定义自定义类型，函数返回自定义类型
SQL> create or replace type str_split is table of varchar2(1000);
2 /
Type created
2.用一个Function来实现字符串分割的功能。
/*
* 功能：字符串分割。
* 参数：p_str 分割的字符串
* p_delimiter 分隔符
*/
create or replace function fun_str_split(p_str in varchar2,
p_delimiter in varchar2)
return str_split
pipelined is
v_start number := 1; --开始查找的位置
v_index number := 0; --查找到的索引
v_length number := length(p_str); --字符串长度
begin
while (v_start <= v_length) loop
--从开始位置开始查找，每次查找完毕更新开始位置为查找到的位置。
v_index := instr(p_str, p_delimiter, v_start);
if v_index = 0 then
--未找到，说明结束了
pipe row(substr(p_str, v_start));
v_start := v_length + 1;
else
pipe row(substr(p_str, v_start, v_index - v_start));
v_start := v_index + 1;--查找到的索引 + ','占的长度
end if;
end loop;
return;
end;
3.测试
SQL> select * from table(fun_str_split('hello,world,abc',','));
COLUMN_VALUE
--------------------------------------------------------------------------------
hello
world
abc
//注意上面使用了column_value，这是一个PIPELINED function返回的默认列的名字。
关于pipelined（摘自http://www.linuxidc.com/Linux/2011-05/35797.htm）
pipelined是Oracle的一个关键字。
普通函数的结尾加一个pipelined关键字，就是管道函数。
这个函数的返回参数类型为集合，这是为了使其能作为表函数使用。
表函数就是在from子句中以table(v_resultset)调用的，v_resultset就是一个集合类型的参数。
管道化表函数必须返回一个集合。
在函数中，PIPE ROW 语句被用来返回该集合的单个元素，该函数必须以一个空的 RETURN 语句结束，以表明它已经完成。
一旦我们创建了上述函数，我们就可以使用 TABLE 操作符从 SQL 查询中调用它。
//典型的Pipelined例子
//当使用PL/SQL表函数时，下面是典型的步骤
//生产函数必须在其定义中使用PIPELINED关键字
//生产函数必须使用一个out参数，这个参数是一个集合，对应到返回的结果集
//一旦有结果产生，通过使用PIPE ROW关键字将其输送给消费函数
//生产函数必须以RETURN语句结束，但是不需要制定返回值
//消费函数必须使用TABLE关键字，将从PIPELINE function返回的行集当成一个常规表
//第一步.定义一个返回的行集的格式。
//在这个实例中，我们返回这三个类型的值:int,date,varchar2(25)
CREATE OR REPLACE TYPE myObjectFormat
AS OBJECT
(
A INT,
B DATE,
C VARCHAR2(25)
)
/
//下一步，为第一步定义的类型定义一个集合类型
CREATE OR REPLACE TYPE myTableType
AS TABLE OF myObjectFormat
/
//最后，生产函数被打包到一个包里面，它是一个pipelined function就像被pipelined关键字所标记一样。
CREATE OR REPLACE PACKAGE myDemoPack
AS
FUNCTION prodFunc RETURN myTableType PIPELINED;
END;
/
CREATE OR REPLACE PACKAGE BODY myDemoPack AS
FUNCTION prodFunc RETURN myTableType PIPELINED IS
BEGIN
FOR i in 1 .. 5
LOOP
PIPE ROW (myObjectFormat(i,SYSDATE+i,'Row '||i));
END LOOP;
RETURN;
END;
END;
/
//测试结果：
alter session set nls_date_format='yyyy-mm-dd';
SELECT * FROM TABLE(myDemoPack.prodFunc());
A B C
----------------- ----------- ------------
1 2011-05-05 Row 1
2 2011-05-06 Row 2
3 2011-05-07 Row 3
4 2011-05-08 Row 4
5 2011-05-09 Row 5
//结论：
//在一个select语句里面，我们需要一个数据源，而不是一张表的话，Pipelined functions非常有用。