如果数据量很小的话可以使用拼sql的方法来返回cursor SQL> create or replace procedure proc_return_error(o_cur out sys_refcursor) 2 as 3 v_sql varchar2(4000); 4 begin 5 v_sql:='select * from ( 6 select cast(null as number(20)) id ,cast(null as date) dealdate from dual'; 7 for i in 1..10 loop 8 if mod(i,3)=0 then 9 v_sql:=v_sql||' union all select '||i||',sysdate from dual'; 10 end if; 11 end loop; 12 v_sql:=v_sql||')where dealdate is not null'; 13 open o_cur for v_sql; 14 end; 15 /Procedure created.SQL> var cv_a refcursor SQL> exec proc_return_error(:cv_a);PL/SQL procedure successfully completed.SQL> print cv_a ID DEALDATE ---------- -------------- 3 13-12月-10 6 13-12月-10 9 13-12月-10
你如果只要返回id,你就直接返回一个id的字符串就行了。然后使用你的程序去split下。。
SQL> create or replace procedure proc_return_error(o_cur out sys_refcursor)
2 as
3 v_sql varchar2(4000);
4 begin
5 v_sql:='select * from (
6 select cast(null as number(20)) id ,cast(null as date) dealdate from dual'; 7 for i in 1..10 loop
8 if mod(i,3)=0 then
9 v_sql:=v_sql||' union all select '||i||',sysdate from dual';
10 end if;
11 end loop;
12 v_sql:=v_sql||')where dealdate is not null';
13 open o_cur for v_sql;
14 end;
15 /Procedure created.SQL> var cv_a refcursor
SQL> exec proc_return_error(:cv_a);PL/SQL procedure successfully completed.SQL> print cv_a ID DEALDATE
---------- --------------
3 13-12月-10
6 13-12月-10
9 13-12月-10