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

/* Include commons */
{common.i}

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

/* Go back */
RETURN.