Cacher is the code snippet organizer for pro developers

DECLARE
   TYPE t_type IS TABLE 
                  OF emp.emp_id%TYPE INDEX BY BINARY_INTEGER;
   len BINARY_INTEGER := 0;
   tab t_type;
   CURSOR c1 IS SELECT emp_id FROM emp ORDER BY emp_id;
BEGIN
   OPEN c1;
   LOOP
      FETCH c1 INTO tab(len+1);
      EXIT WHEN c1%NOTFOUND;
      len := len + 1;
      EXIT WHEN (c1%ROWCOUNT = 10);
   END LOOP;
   CLOSE c1;
END;>