/* tr-c-pgp.p - Update trigger for pay-group */ TRIGGER PROCEDURE FOR WRITE OF pay-group. /* Include Commons */ {common.i} /* Assign user, date & time of update */ ASSIGN. /* Go back */ RETURN.