CREATE OR REPLACE PACKAGE kadry IS
PROCEDURE
nowy_pracownik(p_nazwisko VARCHAR2);
FUNCTION
podatek(p_id_prac NUMBER) RETURN NUMBER;
bledny_pracownik
EXCEPTION;
END kadry;
CREATE OR REPLACE PACKAGE BODY kadry IS
v_liczba_pracownikow
NUMBER := 0;
PROCEDURE
nowy_pracownik(...) IS
BEGIN
...
END
nowy_pracownik;
FUNCTION
podatek(...) RETURN NUMBER IS
BEGIN
...
END
podatek;
END kadry;