如何使用 RefCursor 返回类型测试 Oracle 存储过程？

Question

我正在寻找有关如何在 SQL Developer 或 Embarcardero Rapid XE2 中测试 Oracle 存储过程的良好解释。谢谢。

Answer 1

类似的东西

create or replace procedure my_proc( p_rc OUT SYS_REFCURSOR )
as
begin
  open p_rc
   for select 1 col1
         from dual;
end;
/

variable rc refcursor;
exec my_proc( :rc );
print rc;

可以在 SQL*Plus 或 SQL Developer 中工作。我没有任何使用 Embarcardero Rapid XE2 的经验，所以我不知道它是否支持这样的 SQL*Plus 命令。

Answer 2

像这样的东西可以让您在几乎任何客户端上测试您的过程：

DECLARE 
  v_cur SYS_REFCURSOR;
  v_a   VARCHAR2(10);
  v_b   VARCHAR2(10);
BEGIN
  your_proc(v_cur);

  LOOP
    FETCH v_cur INTO v_a, v_b;
    EXIT WHEN v_cur%NOTFOUND;
    dbms_output.put_line(v_a || ' ' || v_b);
  END LOOP;
  CLOSE v_cur;
END;

基本上，您的测试工具需要支持 SYS_REFCURSOR 变量的定义以及在传递您定义的变量时调用您的过程的能力，然后循环遍历游标结果集。 PL/SQL 可以做到这一切，并且匿名块易于设置和维护，具有相当的适应性，并且对于使用 PL/SQL 的任何人来说都非常可读。

另一种虽然相似的方法是构建一个执行相同操作的命名过程，并假设客户端有一个调试器（如 SQL Developer、PL/SQL Developer、TOAD 等），然后您可以单步执行。

Answer 3

在 SQL Developer 中，您可以右键单击包主体，然后选择“运行”。 “运行 PL/SQL”窗口将允许您编辑 PL/SQL 块。单击“确定”将出现一个标题为“输出变量 - 日志”的窗口窗格，其中包含一个输出变量选项卡。您可以在左侧选择输出变量，结果显示在右侧。非常方便快捷。

我已经将 Rapid 与 T-SQL 结合使用，我认为有一些与此类似的东西。

编写您自己的 delcare-begin-end 脚本，在其中循环遍历光标，就像 DCookie 的示例一样，始终是一个很好的练习。它适用于任何东西，并且您会知道您的代码可以工作。

Answer 4

在 Toad 10.1.1.8 中，我使用：

variable salida refcursor
exec MY_PKG.MY_PRC(1, 2, 3, :salida)  -- 1, 2, 3 are params
print salida

然后，作为脚本执行。

Answer 5

create or replace procedure my_proc(  v_number IN number,p_rc OUT SYS_REFCURSOR )
as
begin
open p_rc
for select 1 col1
     from dual;
 end;
 /

然后编写一个函数来调用您的存储过程，

 create or replace function my_proc_test(v_number IN NUMBER) RETURN sys_refcursor
 as
 p_rc sys_refcursor;
 begin
 my_proc(v_number,p_rc);
 return p_rc;
 end
 /

然后您可以在 SQLDeveloper 编辑器中运行此 SQL 查询。

 SELECT my_proc_test(3) FROM DUAL;

您将在控制台中看到结果，右键单击它并选择单个记录视图并编辑结果，您可以看到引用光标返回的所有记录。

Answer 6

我想这个链接对你来说就足够了。我在寻找执行oracle程序的方法时发现的。

页面链接

简短描述：

--cursor variable declaration 
variable Out_Ref_Cursor refcursor;
--execute procedure 
execute get_employees_name(IN_Variable,:Out_Ref_Cursor);
--display result referenced by ref cursor.
print Out_Ref_Cursor;