create or replace trigger ASSISTENZ_INSERT before insert on assistenz for each row declare Eingabe_nicht_zulaessig exception; pragma exception_init (Eingabe_nicht_zulaessig, -20001); antwort integer; begin antwort := pruef_operation(:new.persnr,:new.opnummer); if antwort = 0 then raise Eingabe_nicht_zulaessig; end if; exception when Eingabe_nicht_zulaessig then raise_application_error (-20001, 'Chirurg ' || :new.persnr || ' leitet diese Operation!'); end; /