Quellcode Trigger per_trg_u_deny

Das DB-Objekt selbst

create trigger "demoadm".per_trg_u_deny update of er_id
    on "demoadm".dwe_perskto referencing old as o new as n
    for each row
    when ((n.er_id != o.er_id ) )
      (
      -- $Archive: /DB/Proc/per_ddl.sql $ $Revision: 3 $
      -- $Author: Rohloff $ $Modtime: 9.12.98 16:16 $
      execute procedure "informix".n_v_error('Kein Aendern per-Id erlaubt!'
    ));