Cursor with bulk collect ...

Question

Hi experts,
CURSOR ZIP_CUR IS SELECT * FROM ZIP_MASTER WHERE ..(SUBQUERY)
OPEN ZIP_CUR;
LOOP
     EXIT WHEN C1%NOTFOUND;
     FETCH ZIP_CUR BULK COLLECT INTO ZIP_REC LIMIT 1000;
          FOR I IN ZIP_REC.FIRST..ZIP_REC.LAST
          LOOP
END LOOP
END LOOP
If there is no data in cusor then the looping after bulk collect is throughing VALUE_ERROR
but why EXIT WHEN C1%NOTFOUND not terminating procedure??
now i am using the same select statement in cursor to find the data and raise user defined exception..
is there any other way to handle in execption??
Many thanks,
Kalinga..

Answer 1

You can try something like this -
satyaki>
satyaki>declare
  2   CURSOR c_emp
  3   IS
  4     SELECT *
  5     FROM emp_s
  6     WHERE deptno in (
  7                       SELECT deptno
  8                       from emp_s
  9                       where job = 'ANALYST'
10                     );
11               
12   type emp_tt is table of emp_s%rowtype index by pls_integer;
13  
14   emp_rec emp_tt;
15  begin
16     
17   OPEN c_emp;
18   LOOP
19    EXIT WHEN c_emp%NOTFOUND;
20    FETCH c_emp BULK COLLECT INTO emp_rec LIMIT 1000;
21    FOR I IN 1..emp_rec.COUNT
22    LOOP
23      dbms_output.put_line('Empno: '||emp_rec(I).empno);
24      dbms_output.put_line('Ename: '||emp_rec(I).ename);
25      dbms_output.put_line('Mgr: '||emp_rec(I).mgr);
26    END LOOP;
27   END LOOP;
28  exception
29    when others then
30      dbms_output.put_line(sqlerrm);
31  end;
32  /
Empno: 7902
Ename: FORD
Mgr: 7566
Empno: 7839
Ename: KING
Mgr: 7839
Empno: 7788
Ename: SCOTT
Mgr: 7566
Empno: 7698
Ename: BLAKE
Mgr: 7839
PL/SQL procedure successfully completed.
satyaki>Regards.
Satyaki De.