CREATE OR REPLACE TYPE typ_Osrodki_Obj AS OBJECT(Id NUMBER(5), Nazwa VARCHAR2(30));
DECLARE
  TYPE typ_NT_Osrodki IS TABLE OF typ_Osrodki_Obj;
  NT_Osrodki typ_NT_Osrodki := typ_NT_Osrodki();
  CURSOR cOsrodki IS SELECT ID_OSRODEK, NAZWA_O FROM OSRODKI;
BEGIN
  FOR vOsrodki IN cOsrodki LOOP
    NT_Osrodki.EXTEND;
    NT_Osrodki(cOsrodki%ROWCOUNT) := typ_Osrodki_Obj(vOsrodki.ID_OSRODEK, vOsrodki.NAZWA_O);
    DBMS_OUTPUT.PUT_LINE('Dodano ośrodek o ID ' || NT_Osrodki(cOsrodki%ROWCOUNT).Id || ' i nazwie ' || NT_Osrodki(cOsrodki%ROWCOUNT).Nazwa);
  END LOOP;
END;