/* tr-u-cev.p - Update trigger for call-event */
TRIGGER PROCEDURE FOR WRITE OF call-event.

/* Include commons */
{common.i}

/* Update the browser definition */
RUN callbrws.p (INPUT call-event.call-log-id).

ASSIGN
  call-event.upd-date      = TODAY
  call-event.upd-time      = STRING(TIME, 'HH:MM:SS')
  call-event.upd-user-name = menu-user.

RETURN.