CREATE OR REPLACE PROCEDURE schülertestliste(snr NUMBER) AS
CURSOR c1 IS SELECT sn.note FROM schueler_note sn WHERE sn.snr = snr;
c1_rec c1%ROWTYPE;

BEGIN
    OPEN c1;
    FETCH c1 INTO c1_rec;
    WHILE c1%found LOOP
        dbms_out.put_line(c1_rec.note);
        FETCH c1 INTO c1_rec;
    END LOOP;
    CLOSE c1;
END;