create or replace TYPE BODY KSIAZKA AS OBJECT
MEMBER FUNCTION up_cena RETURN NUMBER IS
BEGIN
IF (EXTRACT (YEAR FROM CURRENT_DATE) - EXTRACT(YEAR FROM d_wyd)) >= 1 THEN
        cena := cena * 0.95;
        RETURN cena;
END IF;

END up_cena;
END;