/* tr-c-pac.p - Update trigger for pay-acct */
TRIGGER PROCEDURE FOR WRITE OF pay-acct.

/* Include Commons */
{common.i}

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

/* Go back */
RETURN.