当前位置: 首页 > 图文教程 > 数据库 > Oracle > oracle 在一个存储过程中调用另一个返回游标的存储过程

Oracle
MySQL安全性指南 (1)(转)
MySQL安全性指南 (2)(转)
MySQL安全性指南(3)(转)
Microsoft SQL Server 7.0安全问题
如何删除oracle10g中的垃圾表?
Oracle诊断工具-RDA使用概述
开启企业殿堂的钥匙 Oracle服务器的安装
Oracle数据库监听配置
ORACLE的客户端如何连接到数据库
Linux 9i下Dataguard配置
在RHEL4U4上安装Oracle10GS2
Oracle开发(一).Windows下配置使用ProC
Oracle数据库开发(二).Linux下配置使用ProC
解决ora-01861文字与格式字符串不匹配
Ruby on Rails 连接 Oracle 数据库实践
oracle 10G在fedora2上的安装
oracle 透明网关环境的建立
Oracle9i iSQL*PLUS的配置过程
oracle安装过程中无法换盘
Oracle 10g RAC之网络设置

Oracle 中的 oracle 在一个存储过程中调用另一个返回游标的存储过程


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2010-01-10   浏览: 213 ::
收藏到网摘: n/a

实际项目当中经常需要在一个存储过程中调用另一个存储过程返回的游标,本文列举了两种情况讲述具体的操作方法。 第一种情况是返回的游标是某个具体的表或视图的数据,如:
SQL-Code:
复制代码 代码如下:

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

其中USERS就是数据库中一个表。在调用的时候只要声明一个该表的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这两个列,那么调用的时候也必须做相应的修改:
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 的结构必须与存储过程P_TESTA 返回的游标结构一致,否则就会出现错误。同理只要保持两个游标类型结构一致,就可以实现自由调用。