/* tr-c-acb.p - Create trigger for aca-coverage-code */
TRIGGER PROCEDURE FOR CREATE OF aca-coverage-code.

/* Include Commons */
{common.i}

/* Assign an ID, creation info and any initial defaults */
ASSIGN
  aca-coverage-code.coverage-code-id = NEXT-VALUE(primary-misc)
  aca-coverage-code.primary-key      = NEXT-VALUE(primary-misc)
  aca-coverage-code.cre-date         = TODAY
  aca-coverage-code.cre-user-name    = menu-user
  aca-coverage-code.upd-date         = TODAY
  aca-coverage-code.upd-user-name    = menu-user
  aca-coverage-code.upd-time         = STRING(TIME, "HH:MM AM")
  aca-coverage-code.cre-time         = STRING(TIME, "HH:MM AM").

/* Go back */
RETURN.