/* tr-c-dep.p - Update trigger for dept-code */ TRIGGER PROCEDURE FOR WRITE OF dept-code. /* Include Commons */ {common.i} /* Assign user, date & time of update */ ASSIGN dept-code.upd-date = TODAY dept-code.upd-user-name = menu-user. /* Go back */ RETURN.