/* tr-u-srp.p - Write trigger for verify-error */
TRIGGER PROCEDURE FOR WRITE OF verify-error.

/* Include commons */
{common.i}

/* Assign the update info */
ASSIGN
  verify-error.upd-date      = TODAY
  verify-error.upd-time      = STRING(TIME, "HH:MM:SS")
  verify-error.upd-user-name = menu-user.

/* That's It */
RETURN.