CREATE OR REPLACE PACKAGE Pcg_Conversion AS
  PROCEDURE Cnv_Egzaminatorzy;
  PROCEDURE Cnv_Osrodki;
  PROCEDURE Cnv_Przedmioty;
  PROCEDURE Cnv_Studenci;
END Pcg_Conversion;



CREATE OR REPLACE PACKAGE BODY Pcg_Conversion AS

  PROCEDURE Cnv_Egzaminatorzy IS
    CURSOR crEgzaminatorzy IS
      SELECT id_egzaminator, nazwisko, imie, miasto, ulica, e_mail FROM egzaminatorzy FOR UPDATE OF id_egzaminator, nazwisko, imie, miasto, ulica, e_mail;
  BEGIN
    FOR dt IN crEgzaminatorzy LOOP
      UPDATE egzaminatorzy
        SET nazwisko = INITCAP(dt.nazwisko),
          imie = INITCAP(dt.imie),
          miasto = INITCAP(dt.miasto),
          ulica = INITCAP(dt.ulica),
          e_mail = LOWER(dt.e_mail)
        WHERE id_egzaminator=dt.id_egzaminator;
    END LOOP;
  END Cnv_Egzaminatorzy;

  PROCEDURE Cnv_Osrodki IS
    CURSOR crOsrodki IS
      SELECT id_osrodek, nazwa_o, miasto, ulica FROM osrodki FOR UPDATE OF id_osrodek, nazwa_o, miasto, ulica;
  BEGIN
    FOR dt IN crOsrodki LOOP
      UPDATE osrodki
        SET nazwa_o = INITCAP(dt.nazwa_o),
          miasto = INITCAP(dt.miasto),
          ulica = INITCAP(dt.ulica)
        WHERE id_osrodek=dt.id_osrodek;
    END LOOP;
  END Cnv_Osrodki;

  PROCEDURE Cnv_Przedmioty IS
    CURSOR crPrzedmioty IS
      SELECT id_przedmiot, nazwa_p FROM przedmioty FOR UPDATE OF id_przedmiot, nazwa_p;
  BEGIN
    FOR dt IN crPrzedmioty LOOP
      UPDATE przedmioty
        SET nazwa_p = INITCAP(dt.nazwa_p)
        WHERE id_przedmiot=dt.id_przedmiot;
    END LOOP;
  END Cnv_Przedmioty;

  PROCEDURE Cnv_Studenci IS
    CURSOR crStudenci IS
      SELECT id_student, nazwisko, imie, miasto, ulica, miejsce FROM studenci FOR UPDATE OF id_student, nazwisko, imie, miasto, ulica, miejsce;
  BEGIN
    FOR dt IN crStudenci LOOP
      UPDATE studenci
        SET nazwisko = INITCAP(dt.nazwisko),
          imie = INITCAP(dt.imie),
          miasto = INITCAP(dt.miasto),
          ulica = INITCAP(dt.ulica),
          miejsce = INITCAP(dt.miejsce)
        WHERE id_student=dt.id_student;
    END LOOP;
  END Cnv_Studenci;

END Pcg_Conversion;