SET TERM ^^ ;
CREATE TRIGGER CATEGORIE_SYSTEM FOR CATEGORIE ACTIVE BEFORE DELETE POSITION
0 AS
BEGIN
if (old.SYSTEEM = 'T')
then exception DELETE_NOT_ALLOWED;
END
^^
SET TERM ; ^^
CREATE EXCEPTION DELETE_NOT_ALLOWED 'Löschen ist hier nicht erlaubt.';