Cursors

CREATE TABLE EMP (EMPNO NUMBER(4) NOT NULL,
                  ENAME VARCHAR2(10),
                  JOB VARCHAR2(9),
                  SAL NUMBER(7, 2),
                  DEPTNO NUMBER(2));

INSERT INTO EMP VALUES (1, 'SMITH', 'CLERK',     800,    20);
INSERT INTO EMP VALUES (2, 'ALLEN', 'SALESMAN', 1600,    30);
INSERT INTO EMP VALUES (3, 'WARD',  'SALESMAN', 1250,    30);
INSERT INTO EMP VALUES (4, 'JONES', 'MANAGER',  2975,    20);
INSERT INTO EMP VALUES (5, 'MARTIN','SALESMAN', 1250,    30);
INSERT INTO EMP VALUES (6, 'BLAKE', 'MANAGER',  2850,    30);
INSERT INTO EMP VALUES (7, 'CLARK', 'MANAGER',  2850,    10);
INSERT INTO EMP VALUES (8, 'SCOTT', 'ANALYST',  3000,    20);
INSERT INTO EMP VALUES (9, 'KING',  'PRESIDENT',3000,    10);
INSERT INTO EMP VALUES (10,'TURNER','SALESMAN', 1500,    30);
INSERT INTO EMP VALUES (11,'ADAMS', 'CLERK',    1500,    20);

SQL> SET SERVEROUTPUT ON
SQL>
SQL> DECLARE
  2      
  3      v_id emp.empno%TYPE;
  4      
  5      CURSOR v_cursor IS SELECT empno FROM emp ORDER BY empno;
  6  BEGIN
  7      
  8      OPEN v_cursor;
  9      LOOP
 10          
 11          FETCH v_cursor INTO v_id;
 12          
 13          EXIT WHEN v_cursor%NOTFOUND;
 14          DBMS_OUTPUT.PUT_LINE('v_id = ' || v_id );
 15      END LOOP;
 16      CLOSE v_cursor;
 17  END;
 18  /
v_id = 1
v_id = 2
v_id = 3
v_id = 4
v_id = 5
v_id = 6
v_id = 7
v_id = 8
v_id = 9
v_id = 10
v_id = 11

PL/SQL procedure successfully completed.

SQL>