oracle 在一個存儲過程中調(diào)用另一個返回游標(biāo)的存儲過程
更新時間：2009年09月25日 23:19:06 作者：
實際項目當(dāng)中經(jīng)常需要在一個存儲過程中調(diào)用另一個存儲過程返回的游標(biāo)，本文列舉了兩種情況講述具體的操作方法。
第一種情況是返回的游標(biā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;
與之前不同的是我們聲明了一個游標(biāo)類型的變量TMPCURSOR ，注意TMPCURSOR 的結(jié)構(gòu)必須與存儲過程P_TESTA 返回的游標(biāo)結(jié)構(gòu)一致，否則就會出現(xiàn)錯誤。同理只要保持兩個游標(biāo)類型結(jié)構(gòu)一致，就可以實現(xiàn)自由調(diào)用。
SQL-Code:
復(fù)制代碼 代碼如下:
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:
復(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這兩個列，那么調(diào)用的時候也必須做相應(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;
與之前不同的是我們聲明了一個游標(biāo)類型的變量TMPCURSOR ，注意TMPCURSOR 的結(jié)構(gòu)必須與存儲過程P_TESTA 返回的游標(biāo)結(jié)構(gòu)一致，否則就會出現(xiàn)錯誤。同理只要保持兩個游標(biāo)類型結(jié)構(gòu)一致，就可以實現(xiàn)自由調(diào)用。
相關(guān)文章
rman恢復(fù)方案和oracle異機(jī)恢復(fù)
這篇文章主要介紹了rman恢復(fù)方案和oracle異機(jī)恢復(fù),需要的朋友可以參考下2014-03-03
oracle初始化參數(shù)設(shè)置...2007-03-03
今天處理別的問題查看告警日志偶然發(fā)現(xiàn)大量的報錯,無法擴(kuò)展SYSAUX表空間,于是登錄系統(tǒng),查看系統(tǒng)表空間使用情況,發(fā)現(xiàn)SYSAUX表空間用滿了,所以本文給大家介紹了Oracle 12.2處理sysaux空間占滿問題,需要的朋友可以參考下2024-02-02
本篇文章是對oracle指定排序的方法進(jìn)行了詳細(xì)的分析介紹，需要的朋友參考下2013-05-05
Oracle數(shù)據(jù)庫刪除表空間后磁盤空間不釋放的問題及解決
這篇文章主要介紹了Oracle數(shù)據(jù)庫刪除表空間后磁盤空間不釋放的問題及解決方案,具有很好的參考價值,希望對大家有所幫助,如有錯誤或未考慮完全的地方,望不吝賜教2023-11-11
在本教程中,您將學(xué)習(xí)如何在?Windows?上安裝?Oracle?數(shù)據(jù)庫?11g,需要的朋友可以參考下2023-11-11![[Oracle] dbms_metadata.get_ddl 的使用方法總結(jié)](http://img.jbzj.com/images/xgimg/bcimg6.png)
[Oracle] dbms_metadata.get_ddl 的使用方法總結(jié)
以下是對Oracle中dbms_metadata.get_ddl的用法進(jìn)行了詳細(xì)的分析介紹，需要的朋友參考下2013-07-07
這篇文章主要介紹了Oracle 11GR2的遞歸WITH子查詢方法,非常不錯，具有參考借鑒價值，朋友可以參考下2017-02-02
Oracle中serveroutput參數(shù)一次設(shè)置永久保存方法
serveroutput是sqlplus的配置參數(shù)，而不是數(shù)據(jù)庫的配置參數(shù)，每次都需要修改并保存sqlplus的配置參數(shù)，本文將介紹如何一次設(shè)置永久保存2012-11-11
本文主要介紹oracle date 類型字段的處理方法，講解的比較全面，需要的朋友可以參考一下。2016-06-06