Oracle 管道化表函数(Pipelined Table)[转载]

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

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

例1：
Type Definition

CREATE OR REPLACE TYPE COLOR_HEX_CODE AS OBJECT
(
  -- Attributes
   colorName Varchar2(10),
  colorCode varchar2(10)
  
  -- Member functions and procedures
   --member procedure <ProcedureName>(<Parameter> <Datatype>)
 );

Create Table Type

CREATE OR REPLACE TYPE COLOR_TYPE AS TABLE OF COLOR_HEX_CODE;

Create Table Function

CREATE OR REPLACE FUNCTION F_PIPELINE_TEST RETURN COLOR_TYPE PIPELINED
 AS
 BEGIN
    PIPE ROW(COLOR_HEX_CODE('black','#000000'));
    PIPE ROW(COLOR_HEX_CODE('white','#FFFFFF'));
    PIPE ROW(COLOR_HEX_CODE('red','#FF0000'));
    PIPE ROW(COLOR_HEX_CODE('green','#00FF00'));
    PIPE ROW(COLOR_HEX_CODE('blue','#0000FF'));
    RETURN;
 END;

测试:

select * from table( f_pipeline_test );

结果：
COLORNAME  COLORCODE
black   #000000
white   #FFFFFF
red   #FF0000
green   #00FF00
blue   #0000FF

例2：实现split函数功能

CREATE OR REPLACE TYPE RESOLVE_STR IS TABLE OF VARCHAR2 (4000);

CREATE OR REPLACE FUNCTION F_SPLIT
    (
       P_STR       IN   VARCHAR2,
       P_DELIMITER IN   varchar2
     ) RETURN RESOLVE_STR PIPELINED
 AS
    j     INT := 0;
    i     INT := 1;
    len   INT := 0;
    len1  INT := 0;
    tmp   VARCHAR2 (4000);
    v_str VARCHAR2 (4000);
 BEGIN
    v_str := TRIM(BOTH P_DELIMITER FROM P_STR);--去掉前后的分隔符
     len := LENGTH (v_str);
    len1 := LENGTH(P_DELIMITER);

    WHILE j < len
      LOOP
          j := INSTR (v_str, P_DELIMITER, i);--寻分隔符位置
 
          IF j = 0 THEN--没有了
               tmp := SUBSTR (v_str, i);
              PIPE ROW (tmp);
              EXIT;--结束
           ELSE
              tmp := SUBSTR (v_str, i, j - i);
              i := j + len1;
              PIPE ROW (tmp);
          END IF;
      END LOOP;

    RETURN;
END;

测试：

SELECT * FROM TABLE (F_SPLIT('-12-02-ab-cd-a0-ef-', '-'));

例3：产生6个0..49的随机数
First the quick-and-dirty solution without a pipelined function

select r from (
       select r from (
              select rownum r from all_objects where rownum < 50
                     ) order by dbms_random.VALUE
              )where rownum <= 6;

pipelined function

CREATE OR REPLACE TYPE ARRAY AS TABLE OF NUMBER;

CREATE OR REPLACE FUNCTION gen_numbers(n IN NUMBER DEFAULT NULL)
RETURN ARRAY PIPELINED
AS
  BEGIN
    FOR i IN 1 .. nvl(n,9999)
    LOOP
    PIPE ROW(i);
    END LOOP;
  RETURN;
END;

测试：

select * from (
  select *
    from (select * from table(gen_numbers(49)))  order by dbms_random.random
  )
where rownum <= 6

generating that range of dates

select to_date('2009-5-10','yyyy-mm-dd') + column_value-1 from TABLE(gen_numbers(15));

Note the name of the column we used: COLUMN_VALUE. That is the default name for the column coming back from the PIPELINED function.
another example

CREATE OR REPLACE TYPE date_array AS TABLE OF DATE;

CREATE OR REPLACE FUNCTION date_table(sdate DATE, edate DATE)
RETURN date_array PIPELINED AS
BEGIN
  FOR i IN 0 .. (edate - sdate)
  LOOP
    PIPE ROW(sdate + i);
  END LOOP;
  RETURN;
END date_table;