begin
CheckAndLog('Table',:New.ID, 'FIELDx',
:Old.Fieldx, :New.Fieldx);
CheckAndLog('Table',:New.ID, 'FIELDx',
:Old.Fieldx, :New.Fieldx);
CheckAndLog('Table',:New.ID, 'FIELDx',
:Old.Fieldx, :New.Fieldx);
CheckAndLog('Table',:New.ID, 'FIELDx',
:Old.Fieldx, :New.Fieldx);
CheckAndLog('Table',:New.ID, 'FIELDx',
:Old.Fieldx, :New.Fieldx);
CheckAndLog('Table',:New.ID, 'FIELDx',
:Old.Fieldx, :New.Fieldx);
...
End;