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

/* Include commons */
{common.i}

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

/* That's It */
RETURN.