/* tr-c-efr.p - Delete trigger for emp-fringe */
TRIGGER PROCEDURE FOR DELETE OF emp-fringe.

/* Include Commons */
{common.i}

DEFINE BUFFER localPeriod FOR fringe-period.

FIND localPeriod EXCLUSIVE-LOCK
  WHERE localPeriod.payroll-year = emp-fringe.payroll-year
    AND localPeriod.fringe-period-id = emp-fringe.fringe-period-id.

ON WRITE OF fringe-period OVERRIDE DO: END.

IF localPeriod.benefits-calced THEN ASSIGN
  localPeriod.needs-recalc = TRUE
  localPeriod.needs-repush = TRUE.

/* Nothing much to do for deletes */

/* Go back */
RETURN.