ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/branches/journaling/fbintf/client/3.0/FB30ClientAPI.pas
(Generate patch)

Comparing ibx/branches/journaling/fbintf/client/3.0/FB30ClientAPI.pas (file contents):
Revision 362 by tony, Tue Dec 7 13:27:39 2021 UTC vs.
Revision 363 by tony, Tue Dec 7 13:30:05 2021 UTC

# Line 111 | Line 111 | type
111      function CreateDatabase(sql: AnsiString; aSQLDialect: integer; RaiseExceptionOnError: boolean=true): IAttachment; overload;
112      {Start Transaction against multiple databases}
113      function StartTransaction(Attachments: array of IAttachment;
114 <             TPB: array of byte; DefaultCompletion: TTransactionCompletion): ITransaction; overload;
114 >             TPB: array of byte; DefaultCompletion: TTransactionCompletion; aName: AnsiString=''): ITransaction; overload;
115      function StartTransaction(Attachments: array of IAttachment;
116 <             TPB: ITPB; DefaultCompletion: TTransactionCompletion): ITransaction; overload;
116 >             TPB: ITPB; DefaultCompletion: TTransactionCompletion; aName: AnsiString=''): ITransaction; overload;
117  
118      {Service Manager}
119      function AllocateSPB: ISPB;
# Line 473 | Line 473 | begin
473   end;
474  
475   function TFB30ClientAPI.StartTransaction(Attachments: array of IAttachment;
476 <  TPB: array of byte; DefaultCompletion: TTransactionCompletion): ITransaction;
476 >  TPB: array of byte; DefaultCompletion: TTransactionCompletion; aName: AnsiString): ITransaction;
477   begin
478 <  Result := TFB30Transaction.Create(self,Attachments,TPB,DefaultCompletion);
478 >  Result := TFB30Transaction.Create(self,Attachments,TPB,DefaultCompletion,aName);
479   end;
480  
481   function TFB30ClientAPI.StartTransaction(Attachments: array of IAttachment;
482 <  TPB: ITPB; DefaultCompletion: TTransactionCompletion): ITransaction;
482 >  TPB: ITPB; DefaultCompletion: TTransactionCompletion; aName: AnsiString): ITransaction;
483   begin
484 <  Result := TFB30Transaction.Create(self,Attachments,TPB,DefaultCompletion);
484 >  Result := TFB30Transaction.Create(self,Attachments,TPB,DefaultCompletion,aName);
485   end;
486  
487   function TFB30ClientAPI.AllocateSPB: ISPB;

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines