/* tr-c-rac.p - Create trigger for rep-assign-code */
TRIGGER PROCEDURE FOR CREATE OF rep-assign-code.

/* Include commons */
{common.i}

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

/* Go Back */
RETURN.