PROCEDURE PC_DELETE (v_nr IN NUMBER) IS v_row NUMBER; BEGIN DELETE FROM pc_test WHERE index2 < v_nr; v_row := SQL%ROWCOUNT; IF v_row = 0 THEN DBMS_OUTPUT.put_line ('Kein Datensatz gefunden!'); ELSE DBMS_OUTPUT.put_line (v_row || ' Datensätze gelöscht.'); END IF; END;