oracle 在一個存儲過程中調(diào)用另一個返回游標的存儲過程

更新時間：2009年09月25日 23:19:06 作者：

實際項目當中經(jīng)常需要在一個存儲過程中調(diào)用另一個存儲過程返回的游標，本文列舉了兩種情況講述具體的操作方法。

第一種情況是返回的游標是某個具體的表或視圖的數(shù)據(jù)，如：
SQL-Code:

復制代碼代碼如下:

 
CREATE OR REPLACE PROCEDURE P_TESTA ( 
PRESULT OUT SYS_REFCURSOR 
) 
AS 
BEGIN 
OPEN PRESULT FOR SELECT * FROM USERS; 
END P_TESTA; 

其中USERS就是數(shù)據(jù)庫中一個表。在調(diào)用的時候只要聲明一個該表的ROWTYPE類型就可以了：
SQL-Code:

復制代碼代碼如下:

 
CREATE OR REPLACE PROCEDURE P_TESTB 
AS 
VARCURSOR SYS_REFCURSOR; 
R USERS%ROWTYPE; 
BEGIN 
P_TESTA(VARCURSOR); 
LOOP 
FETCH VARCURSOR INTO R; 
EXIT WHEN VARCURSOR%NOTFOUND; 
DBMS_OUTPUT.PUT_LINE(R.NAME); 
END LOOP; 
END P_TESTB; 

第二種情況，我們返回的不是表的所有的列，或許只是其中一列或兩列，如：
SQL-Code:

復制代碼代碼如下:

 
CREATE OR REPLACE PROCEDURE P_TESTA ( 
PRESULT OUT SYS_REFCURSOR 
) 
AS 
BEGIN 
OPEN PRESULT FOR SELECT ID,NAME FROM USERS; 
END P_TESTA; 

這里我們只返回了USERS表的ID,NAME這兩個列，那么調(diào)用的時候也必須做相應(yīng)的修改：
SQL-Code:

復制代碼代碼如下:

 
CREATE OR REPLACE PROCEDURE P_TESTB 
AS 
VARCURSOR SYS_REFCURSOR; 
CURSOR TMPCURSOR IS SELECT ID,NAME FROM USERS WHERE ROWNUM=1; 
R TMPCURSOR%ROWTYPE; 
BEGIN 
P_TESTA(VARCURSOR); 
LOOP 
FETCH VARCURSOR INTO R; 
EXIT WHEN VARCURSOR%NOTFOUND; 
DBMS_OUTPUT.PUT_LINE(R.ID); 
END LOOP; 
END P_TESTB; 

與之前不同的是我們聲明了一個游標類型的變量TMPCURSOR ，注意TMPCURSOR 的結(jié)構(gòu)必須與存儲過程P_TESTA 返回的游標結(jié)構(gòu)一致，否則就會出現(xiàn)錯誤。同理只要保持兩個游標類型結(jié)構(gòu)一致，就可以實現(xiàn)自由調(diào)用。

您可能感興趣的文章: