COMPILE Insert AUDIT * Equates for COA table EQU AUDIT_TABLENAME$ TO 0.1 EQU AUDIT_USERNAME$ TO 0.2 EQU AUDIT_DATE_TIME$ TO 0.3 ;* Record key is in parts 0.4 through 0.n EQU AUDIT_ACTION$ TO 1 ;* New,Read, Write, Delete EQU AUDIT_FIELDS$ TO 2 ;* Field name EQU AUDIT_OLD_VALS$ TO 3 ;* Old values for each field EQU AUDIT_NEW_VALS$ TO 4 ;* New values for each field EQU AUDIT_ORG_RECORD TO 5 ;* complete record stored here on DELETE action