快捷導(dǎo)航

oracle 在一個(gè)存儲(chǔ)過(guò)程中調(diào)用另一個(gè)返回游標(biāo)的存儲(chǔ)過(guò)程

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

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

第一種情況是返回的游標(biāo)是某個(gè)具體的表或視圖的數(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ù)庫(kù)中一個(gè)表。在調(diào)用的時(shí)候只要聲明一個(gè)該表的ROWTYPE類型就可以了：
SQL-Code:

復(fù)制代碼代碼如下:

 
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:

復(fù)制代碼代碼如下:

 
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這兩個(gè)列，那么調(diào)用的時(shí)候也必須做相應(yīng)的修改：
SQL-Code:

復(fù)制代碼代碼如下:

 
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; 

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

您可能感興趣的文章: