DECLARE
CURSOR cur1 IS
SELECT
empno,
ename,
sal
FROM
scott.emp
FOR UPDATE;
BEGIN
FOR emp_satz IN cur1 LOOP
IF emp_satz.ename = 'KING' THEN -- der wird aus der Firma geworfen
DELETE FROM scott.emp
WHERE
CURRENT OF cur1;
dbms_output.put_line('Ein Stelle als Chef ist frei, denn der ist weg: ' || emp_satz.ename);
END IF;
END LOOP;
END;
/
Ausgabe: Ein Stelle als Chef ist frei, denn der ist weg: KING