subtype WERT_T is INTEGER range 0..100; for WERT_T'SIZE use 8; exception when CONSTRAINT_ERROR => -- Fehlerbehandlung