两个游标相互调用

declare
cursor ename_c is select distinct v_qzjgh from etbj_cszm where 1=1 AND i_zt = 1 AND DT_QFRQ IS NOT NULL and to_char(dt_create,'yyyy-MM-dd')>'2017-08-01';
v_ename_c ename_c%rowtype;
--cursor v_c is select empno from emp where ename=v_ename_c.ename;
v_c sys_refcursor;
v_empno varchar2(100);
v_sql varchar2(32765);
begin
for v_ename_c in ename_c
--for v_empno in v_c
loop
dbms_output.put_line(v_ename_c.v_qzjgh);
--dbms_output.put_line(v_empno);
open v_c for 'select v_id from etbj_cszm where v_qzjgh='''||v_ename_c.v_qzjgh||''''||'order by dt_create asc';
loop
fetch v_c into v_empno;
dbms_output.put_line(v_empno);
exit;
end loop;
close v_c;
end loop;
end;

转载于:https://www.cnblogs.com/doudou618/p/7550613.html