/* tr-c-rtc.p - Update trigger for retire-code */
TRIGGER PROCEDURE FOR WRITE OF retire-code.

/* Include Commons */
{common.i}

/* Assign user, date & time of update */
ASSIGN.

/* Go back */
RETURN.