Oracle - 如何在存储过程中使用out ref cursor参数?

时间:2021-01-17 21:03:36

The standard way that our applications pass information from oracle stored procedures to the oracle .net provider is via an out ref cursor parameter.

我们的应用程序将信息从oracle存储过程传递到oracle .net提供程序的标准方法是通过out ref cursor参数。

In the past all of our stored procedures used to be in packages and had something like this:

在过去,我们所有的存储过程都在包中,并且具有以下内容:

CREATE OR REPLACE PACKAGE test_package IS
   TYPE refcur IS REF CURSOR;
   PROCEDURE get_info ( o_cursor            OUT      refcur );
END test_package;
/
CREATE OR REPLACE PACKAGE BODY test_package IS
   PROCEDURE get_info ( o_cursor            OUT      refcur ) AS
   BEGIN
     OPEN o_cursor FOR
       SELECT * FROM v$database;
   END get_info;
END test_package;
/

Now I would like to move that get_info procedure out of the package and into a regular procedure but don't know what to do to get the refcur type. How do I create it outside the package scope?

现在我想将get_info过程从包中移出并进入常规过程,但不知道如何获取refcur类型。如何在包范围外创建它?

CREATE OR REPLACE TYPE refcur IS REF CURSOR;

创建或替换类型refcur是REF CURSOR;

doesn't work.

3 个解决方案

#1


I can't test it here (no Oracle) but you can do:

我不能在这里测试它(没有Oracle),但你可以这样做:

create or replace procedure get_info(p_cursor out sys_refcursor)
is
begin
  open p_cursor for
    select *
    from   v$database; 
end;
/

In Oracle 9 and higher it is no longer needed to declare TYPE result_crsr IS REF CURSOR

在Oracle 9及更高版本中,不再需要声明TYPE result_crsr IS REF CURSOR

Use sys_refcursor instead.

请改用sys_refcursor。

#2


TYPE result_crsr IS REF CURSOR;

An example of anonymous block of SQL using a ref cursor:

使用引用游标的匿名SQL块的示例:

DECLARE
   TYPE result_crsr IS REF CURSOR;
   crsr_test_result   result_crsr;
BEGIN


   OPEN crsr_test_result FOR
        SELECT * from user_objects;
     ? := crsr_test_result;
END;

#3


Try this:

CREATE OR REPLACE PROCEDURE get_info(o_cursor OUT sys_refcursor) IS
BEGIN
  OPEN o_cursor FOR SELECT * FROM dual;
END;
/

Your question has raises two important questions:

您的问题提出了两个重要问题:

1) You say it "doesn't work". I take that to mean that Oracle is returning an exception when you execute the statement. What is the error message Oracle is returning? It should start with ORA-nnnnn and be followed by some text.

1)你说它“不起作用”。我认为这意味着Oracle在执行语句时返回异常。 Oracle返回的错误消息是什么?它应该以ORA-nnnnn开头,然后是一些文本。

2) What purpose would be served by moving a PROCEDURE out of a PACKAGE? There are a few more lines of code with the package, the procedure signature repeated in both the package spec and the package body, but having the procedure within a package provides several important benefits.

2)将程序移出包装会有什么用途?包中还有一些代码行,在包规范和包体中重复了过程签名,但在包中包含过程提供了几个重要的好处。

#1


I can't test it here (no Oracle) but you can do:

我不能在这里测试它(没有Oracle),但你可以这样做:

create or replace procedure get_info(p_cursor out sys_refcursor)
is
begin
  open p_cursor for
    select *
    from   v$database; 
end;
/

In Oracle 9 and higher it is no longer needed to declare TYPE result_crsr IS REF CURSOR

在Oracle 9及更高版本中,不再需要声明TYPE result_crsr IS REF CURSOR

Use sys_refcursor instead.

请改用sys_refcursor。

#2


TYPE result_crsr IS REF CURSOR;

An example of anonymous block of SQL using a ref cursor:

使用引用游标的匿名SQL块的示例:

DECLARE
   TYPE result_crsr IS REF CURSOR;
   crsr_test_result   result_crsr;
BEGIN


   OPEN crsr_test_result FOR
        SELECT * from user_objects;
     ? := crsr_test_result;
END;

#3


Try this:

CREATE OR REPLACE PROCEDURE get_info(o_cursor OUT sys_refcursor) IS
BEGIN
  OPEN o_cursor FOR SELECT * FROM dual;
END;
/

Your question has raises two important questions:

您的问题提出了两个重要问题:

1) You say it "doesn't work". I take that to mean that Oracle is returning an exception when you execute the statement. What is the error message Oracle is returning? It should start with ORA-nnnnn and be followed by some text.

1)你说它“不起作用”。我认为这意味着Oracle在执行语句时返回异常。 Oracle返回的错误消息是什么?它应该以ORA-nnnnn开头,然后是一些文本。

2) What purpose would be served by moving a PROCEDURE out of a PACKAGE? There are a few more lines of code with the package, the procedure signature repeated in both the package spec and the package body, but having the procedure within a package provides several important benefits.

2)将程序移出包装会有什么用途?包中还有一些代码行,在包规范和包体中重复了过程签名,但在包中包含过程提供了几个重要的好处。