--- ibx/branches/journaling/fbintf/client/FBClientAPI.pas 2021/12/07 13:27:39 362 +++ ibx/branches/journaling/fbintf/client/FBClientAPI.pas 2021/12/07 13:30:05 363 @@ -245,7 +245,15 @@ type function GetImplementationVersion: AnsiString; function GetClientMajor: integer; virtual; abstract; function GetClientMinor: integer; virtual; abstract; -end; + end; + + IJournallingHook = interface + ['{7d3e45e0-3628-416a-9e22-c20474825031}'] + procedure TransactionStart(Tr: ITransaction); + function TransactionEnd(TransactionID: integer; Action: TTransactionAction): boolean; + procedure TransactionRetained(Tr: ITransaction; OldTransactionID: integer; Action: TTransactionAction); + procedure ExecQuery(Stmt: IStatement); + end; implementation