Oracle PL/SQL Einzel-Tipp ansehen

OPEN FETCH CLOSE CURSOR mit Parametern

Tipp 20

DECLARE
 CURSOR c1 (v_comm IN emp.comm%TYPE)
 IS SELECT ename,sal,job
    FROM emp
    WHERE comm=v_comm
    OR (comm IS null AND v_comm IS NULL);
 rec_c1  c1%rowtype; -- übernehme Spaltenstruktur des Cursor
BEGIN

 OPEN c1 (0); -- Parameter 0 in Cursor übergeben
 LOOP
  FETCH c1 INTO rec_c1;
  EXIT WHEN c1%notfound;
  dbms_output.put_line(rec_c1.ename||'  '||rec_c1.sal||'   '||rec_c1.job);
 END LOOP;
 CLOSE c1;
END;
/