[oracle] SQLPlus 如何查看引用游标中的结果集

 

SQL> set linesize 150;
SQL> set wrap off;
SQL> column ename format a20;
SQL>
SQL> var r refcursor;
SQL> exec p_test(:r);

PL/SQL 过程已成功完成。

SQL> print r;

EMPNO ENAME JOB MGR HIREDATE SAL COMM DEPTNO
---------- -------------------- --------- ---------- -------------- ---------- ---------- ----------
7369 SMITH CLERK 7902 17-12月-80 800 20
7499 ALLEN SALESMAN 7698 20-2月 -81 1600 300 30
已选择2行。

如果结果集太多，好像还需要设置exec dbms_output.enable(1000000)

第二种方法:

declare
p_results sys_refcursor;
v_value1 varchar2(3000);
v_value2 varchar2(3000);
v_value3 varchar2(3000);
v_value4 varchar2(3000);
v_result varchar2(10000);
begin
-- Call the procedure
p_get_result('2009-08-05', p_results);

fetch p_results into v_value1,v_value2,v_value3,v_value4;

while p_results%found
loop
v_result := v_value1||' '||v_value2||' '||v_value3||' '||v_value4;
dbms_output.put_line(v_result);

fetch p_results into v_value1,v_value2,v_value3,v_value4;
end loop;
close p_results;
end;