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

Comparing ibx/branches/journaling/fbintf/client/2.5/FB25ClientAPI.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 186 | Line 186 | type
186      {Start Transaction against multiple databases}
187      function AllocateTPB: ITPB;
188      function StartTransaction(Attachments: array of IAttachment;
189 <             TPB: array of byte; DefaultCompletion: TTransactionCompletion): ITransaction; overload;
189 >             TPB: array of byte; DefaultCompletion: TTransactionCompletion; aName: AnsiString=''): ITransaction; overload;
190      function StartTransaction(Attachments: array of IAttachment;
191 <             TPB: ITPB; DefaultCompletion: TTransactionCompletion): ITransaction; overload;
191 >             TPB: ITPB; DefaultCompletion: TTransactionCompletion; aName: AnsiString=''): ITransaction; overload;
192  
193      {Service Manager}
194      function AllocateSPB: ISPB;
# Line 505 | Line 505 | begin
505   end;
506  
507   function TFB25ClientAPI.StartTransaction(Attachments: array of IAttachment;
508 <  TPB: array of byte; DefaultCompletion: TTransactionCompletion): ITransaction;
508 >  TPB: array of byte; DefaultCompletion: TTransactionCompletion; aName: AnsiString): ITransaction;
509   begin
510 <  Result := TFB25Transaction.Create(self,Attachments,TPB,DefaultCompletion);
510 >  Result := TFB25Transaction.Create(self,Attachments,TPB,DefaultCompletion,aName);
511   end;
512  
513   function TFB25ClientAPI.StartTransaction(Attachments: array of IAttachment;
514 <  TPB: ITPB; DefaultCompletion: TTransactionCompletion): ITransaction;
514 >  TPB: ITPB; DefaultCompletion: TTransactionCompletion; aName: AnsiString): ITransaction;
515   begin
516 <  Result := TFB25Transaction.Create(self,Attachments,TPB,DefaultCompletion);
516 >  Result := TFB25Transaction.Create(self,Attachments,TPB,DefaultCompletion, aName);
517   end;
518  
519   function TFB25ClientAPI.HasServiceAPI: boolean;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines