DECLARE
TYPE
prac_tab_typ IS TABLE of pracownicy%ROWTYPE;
prac_tablica prac_tab_typ;
v_id_zesp zespoly.id_zesp%TYPE := &id_zesp;
BEGIN
EXECUTE IMMEDIATE 'SELECT * FROM pracownicy WHERE id_zesp=:1'
BULK COLLECT INTO prac_tablica USING v_id_zesp;
FOR
i IN 1..prac_tablica.last LOOP
DBMS_OUTPUT.PUT_LINE
('Pracownik
'||prac_tablica(i).nazwisko ||
' zarabia '||to_char(prac_tablica(i).placa_pod));
END
LOOP;
END;