This type is used for the TDATransaction.OnError event. 
Unit
DBAccess
 Syntax
TDATransactionErrorEvent = procedure (Sender: TObject; E: EDAError; var Fail: boolean) of object;
Parameters
Sender
An object that raised the event. 
E
The error code. 
Fail
False, if an error dialog should be prevented from being displayed and EAbort exception to cancel the current operation should be raised.