create or replace PROCEDURE "RESULT" (res1 OUT SYS_REFCURSOR )
IS
Cursor c is Select distinct id,fname,lname,dob,gender,address1 from emp where name like '%B%'
d c%rowtype;
BEGIN
OPEN c;
LOOP
fetch c into d;
exit when c%notfound;
OPEN res1 FOR select e.id from emp e where e.poi_user_id IN (d.id);
End Loop;
END;
程序RESULT编译。
如果我在没有程序的情况下运行查询,我得到5个结果但是当我使用上面的代码时,它只返回最后的结果。
SET SERVEROUTPUT ON;
Declare
c SYS_REFCURSOR;
id number;
begin
RESULT(c);
loop
fetch c into id; -- and other columns if needed
exit when c%notfound;
dbms_output.put_line(id);
end loop;
END;
结果5
答案 0 :(得分:1)
你不应该让自己很难理解编码。在这种情况下,您不需要任何循环,带有FILTER条件的简单SELECT就足以满足您的要求。希望以下查询有帮助。对于命名约定,用户“”也不是一个好的编码实践。
就你的问题而言,REFCURSOR并不是那么聪明地保留每次迭代的所有记录并打印出合作输出。
CREATE OR REPLACE PROCEDURE "RESULT"(
res1 OUT SYS_REFCURSOR )
IS
BEGIN
OPEN res1 FOR
SELECT e.id FROM emp e
WHERE EXISTS
( SELECT 1
FROM emp E1
WHERE e1.name LIKE '%B%'
AND e1.poi_user_id = e.id
);
END;