/* tr-c-fbp.p - Update trigger for fringe-period */ TRIGGER PROCEDURE FOR WRITE OF fringe-period NEW fringe-period OLD old-fringe-period. /* Include Commons */ {common.i} /* Override triggers for now */ ON WRITE OF fringe-period OVERRIDE DO: END. /* Assign user, date & time of update */ ASSIGN fringe-period.upd-date = TODAY fringe-period.upd-time = STRING(TIME, "HH:MM:SS") fringe-period.upd-user-name = menu-user. IF old-fringe-period.end-date <> fringe-period.end-date OR old-fringe-period.end-pay-id <> fringe-period.end-pay-id OR old-fringe-period.start-date <> fringe-period.start-date OR old-fringe-period.start-pay-id <> fringe-period.start-pay-id OR old-fringe-period.savings-period <> fringe-period.savings-period OR old-fringe-period.release-period <> fringe-period.release-period OR old-fringe-period.num-release-periods <> fringe-period.num-release-periods OR old-fringe-period.last-release-period <> fringe-period.last-release-period THEN ASSIGN fringe-period.needs-recalc = TRUE fringe-period.needs-repush = TRUE. /* Go back */ RETURN.