/* tr-c-sit.p - Create trigger for state-item */
TRIGGER PROCEDURE FOR CREATE OF state-item.

/* Include commons */
{common.i}

/* Assign the ID and creation info */
ASSIGN
  state-item.state-item-id = NEXT-VALUE(record-id)
  state-item.cre-date      = TODAY
  state-item.cre-time      = STRING(TIME, "HH:MM:SS")
  state-item.cre-user-name = menu-user
  state-item.upd-date      = state-item.cre-date
  state-item.upd-time      = state-item.cre-time
  state-item.upd-user-name = state-item.cre-user-name.

/* Go Back */
RETURN.