oracle 管道化表函數(Pipelined Table)

http://log-cd.javaeye.com/blog/411123

 

關鍵字: oracle pipelined table

    在實際的應用中，為了讓PL/SQL 函數返回資料的多個行，必須通過返回一個 REF CURSOR 或一個資料集合來完成。REF CURSOR 的這種情況局限於可以從查詢中選擇的資料，而整個集合在可以返回前，必須進行具體化。 9i 通過引入的管道化表函數糾正了後一種情況。表函數是返回整個行的集（通常作為一個集合）的函數，可以直接從 SQL 語句中進行查詢，就好像它是一個真正的資料庫表一樣。管道化表函數與之相似，但是它像在構建時一樣返回資料，而不是一次全部返回。管道化表函數更加有效， 因為資料可以儘可能快地返回。

    管道化表函數必須返回一個集合。在函數中，PIPE ROW 語句被用來返回該集合的單個元素，該函數必須以一個空的 RETURN 語句結束，以表明它已經完成。一旦我們建立了上述函數，我們就可以使用 TABLE 操作符從 SQL 查詢中調用它。

例1：
Type Definition Sql代碼

1. CREATE OR REPLACE TYPE COLOR_HEX_CODE AS OBJECT  
2. (  
3.   -- Attributes  
4.   colorName Varchar2(10),  
5.   colorCode varchar2(10)  
6.     
7.   -- Member functions and procedures  
8.   --member procedure <ProcedureName>(<Parameter> <Datatype>)  
9. );  

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 Sql代碼

1. CREATE OR REPLACE TYPE COLOR_TYPE AS TABLE OF COLOR_HEX_CODE;  

CREATE OR REPLACE TYPE COLOR_TYPE AS TABLE OF COLOR_HEX_CODE; 

Create Table Function Sql代碼

1. CREATE OR REPLACE FUNCTION F_PIPELINE_TEST RETURN COLOR_TYPE PIPELINED  
2. AS  
3. BEGIN  
4.     PIPE ROW(COLOR_HEX_CODE('black','#000000'));  
5.     PIPE ROW(COLOR_HEX_CODE('white','#FFFFFF'));  
6.     PIPE ROW(COLOR_HEX_CODE('red','#FF0000'));  
7.     PIPE ROW(COLOR_HEX_CODE('green','#00FF00'));  
8.     PIPE ROW(COLOR_HEX_CODE('blue','#0000FF'));  
9.     RETURN;  
10. END;  

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; 

測試: Sql代碼

1. select * from table( f_pipeline_test );  

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

例2：實現split函數功能 Sql代碼

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

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

Sql代碼

1. CREATE OR REPLACE FUNCTION F_SPLIT  
2.     (  
3.        P_STR       IN   VARCHAR2,  
4.        P_DELIMITER IN   varchar2  
5.      ) RETURN RESOLVE_STR PIPELINED  
6. AS  
7.     j     INT := 0;  
8.     i     INT := 1;  
9.     len   INT := 0;  
10.     len1  INT := 0;  
11.     tmp   VARCHAR2 (4000);  
12.     v_str VARCHAR2 (4000);  
13. BEGIN  
14.     v_str := TRIM(BOTH P_DELIMITER FROM P_STR);--去掉前後的分隔字元  
15.     len := LENGTH (v_str);  
16.     len1 := LENGTH(P_DELIMITER);  
17.   
18.     WHILE j < len  
19.       LOOP  
20.           j := INSTR (v_str, P_DELIMITER, i);--尋分隔字元位置  
21.   
22.           IF j = 0 THEN--沒有了  
23.               tmp := SUBSTR (v_str, i);  
24.               PIPE ROW (tmp);  
25.               EXIT;--結束  
26.           ELSE  
27.               tmp := SUBSTR (v_str, i, j - i);  
28.               i := j + len1;  
29.               PIPE ROW (tmp);  
30.           END IF;  
31.       END LOOP;  
32.   
33.     RETURN;  
34. END;  

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; 

測試： Sql代碼

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

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 Sql代碼

1. select r from (  
2.        select r from (  
3.               select rownum r from all_objects where rownum < 50  
4.                      ) order by dbms_random.VALUE  
5.               )where rownum <= 6;  

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 Sql代碼

1. CREATE OR REPLACE TYPE ARRAY AS TABLE OF NUMBER;  

CREATE OR REPLACE TYPE ARRAY AS TABLE OF NUMBER; 

Sql代碼

1. CREATE OR REPLACE FUNCTION gen_numbers(n IN NUMBER DEFAULT NULL)  
2. RETURN ARRAY PIPELINED  
3. AS  
4.   BEGIN  
5.     FOR i IN 1 .. nvl(n,9999)  
6.     LOOP  
7.     PIPE ROW(i);  
8.     END LOOP;  
9.   RETURN;  
10. END;  

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; 

測試： Sql代碼

1. select * from (  
2.   select *  
3.     from (select * from table(gen_numbers(49)))  order by dbms_random.random  
4.   )  
5. where rownum <= 6  

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

generating that range of dates Sql代碼

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

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 Sql代碼

1. CREATE OR REPLACE TYPE date_array AS TABLE OF DATE;  

CREATE OR REPLACE TYPE date_array AS TABLE OF DATE; 

Sql代碼

1. CREATE OR REPLACE FUNCTION date_table(sdate DATE, edate DATE)  
2. RETURN date_array PIPELINED AS  
3. BEGIN  
4.   FOR i IN 0 .. (edate - sdate)  
5.   LOOP  
6.     PIPE ROW(sdate + i);  
7.   END LOOP;  
8.   RETURN;  
9. END date_table;  

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;