ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/fbintf/IB.pas
(Generate patch)

Comparing ibx/trunk/fbintf/IB.pas (file contents):
Revision 154 by tony, Tue Feb 27 16:51:42 2018 UTC vs.
Revision 209 by tony, Wed Mar 14 12:48:51 2018 UTC

# Line 632 | Line 632 | type
632                  psRealTime, psUserTime, psBuffers,
633                  psReads, psWrites, psFetches,psDeltaMemory);
634  
635 <  TPerfCounters = array[TPerfStats] of comp;
635 >  TPerfCounters = array[TPerfStats] of Int64;
636  
637    {The IStatement interface provides access to an SQL Statement once it has been
638     initially prepared. The interface is returned from the IAttachment interface.
# Line 931 | Line 931 | type
931      function GetConnectString: AnsiString;
932      function GetRemoteProtocol: AnsiString;
933      function GetAuthenticationMethod: AnsiString;
934 +    function GetSecurityDatabase: AnsiString;
935      function GetODSMajorVersion: integer;
936      function GetODSMinorVersion: integer;
937      function HasActivity: boolean;
# Line 1066 | Line 1067 | type
1067      ['{905b587d-1e1f-4e40-a3f8-a3519f852e48}']
1068      function getSPB: ISPB;
1069      function getServerName: AnsiString;
1070 +    function getProtocol: TProtocol;
1071 +    function getPortNo: AnsiString;
1072      procedure Attach;
1073      procedure Detach(Force: boolean=false);
1074      function IsAttached: boolean;
1075      function AllocateSRB: ISRB;
1076      function AllocateSQPB: ISQPB;
1077 <    procedure Start(Request: ISRB);
1078 <    function Query(SQPB: ISQPB; Request: ISRB) :IServiceQueryResults; overload;
1079 <    function Query(Request: ISRB) :IServiceQueryResults; overload;
1077 >    function Start(Request: ISRB; RaiseExceptionOnError: boolean=true): boolean;
1078 >    function Query(SQPB: ISQPB; Request: ISRB; RaiseExceptionOnError: boolean=true) :IServiceQueryResults; overload;
1079 >    function Query(Request: ISRB; RaiseExceptionOnError: boolean=true) :IServiceQueryResults; overload;
1080    end;
1081  
1082    {The Firebird API.
# Line 1250 | Line 1253 | end;
1253   initialization
1254    FFirebirdAPI := nil;
1255  
1256 + finalization
1257 +  FFirebirdAPI := nil;
1258  
1259   end.
1260  

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines