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

Comparing ibx/trunk/fbintf/IB.pas (file contents):
Revision 87 by tony, Mon Jan 1 11:31:26 2018 UTC vs.
Revision 154 by tony, Tue Feb 27 16:51:42 2018 UTC

# Line 127 | Line 127 | uses
127   const
128    {Interface version information}
129    FBIntf_Major = 1;
130 <  FBIntf_Minor = 0;
131 <  FBIntf_Release = 2;
132 <  FBIntf_Version = '1.0.2';
130 >  FBIntf_Minor = 1;
131 >  FBIntf_Release = 1;
132 >  FBIntf_Version = '1.1.1';
133  
134   {These include files are converted from the 'C' originals in the Firebird API
135   and define the various constants used by the API}
# Line 773 | Line 773 | type
773      function getAsInteger: integer;
774      procedure DecodeIDCluster(var ConnectionType: integer; var DBFileName, DBSiteName: AnsiString);
775      function getAsBytes: TByteArray;
776 +    function getAsDateTime: TDateTime;
777      procedure DecodeVersionString(var Version: byte; var VersionString: AnsiString);
778      function getOperationCounts: TDBOperationCounts;
779      procedure DecodeUserNames(UserNames: TStrings);
# Line 799 | Line 800 | type
800      property Items[index: integer]: IDBInfoItem read getItem; default;
801    end;
802  
803 +  {The Database Information Request Block is used to pass requests for
804 +   database information where at least one item requested has a parameter.
805 +   At present, this is only fb_info_page_contents which has a single
806 +   integer parameter.}
807 +
808 +  IDIRBItem = interface(IParameterBlockItem)
809 +    ['{d34a7511-8435-4a24-81a7-5103d218d234}']
810 +  end;
811 +
812 +  IDIRB = interface(IParameterBlock<IDIRBItem>)
813 +    ['{1010e5ac-0a8f-403b-a302-91625e9d9579}']
814 +  end;
815 +
816 +
817    {The Database Parameter Block (DPB).
818  
819     The DPB provides the parameters used when connecting to a database. It is allocated
# Line 849 | Line 864 | type
864      ['{466e9b67-9def-4807-b3e7-e08a35e7185c}']
865      function getDPB: IDPB;
866      function AllocateBPB: IBPB;
867 +    function AllocateDIRB: IDIRB;
868      procedure Connect;
869      procedure Disconnect(Force: boolean=false);
870      function IsConnected: boolean;
# Line 911 | Line 927 | type
927      function GetArrayMetaData(Transaction: ITransaction; tableName, columnName: AnsiString): IArrayMetaData;
928      function GetDBInformation(Requests: array of byte): IDBInformation; overload;
929      function GetDBInformation(Request: byte): IDBInformation; overload;
930 +    function GetDBInformation(Requests: IDIRB): IDBInformation; overload;
931 +    function GetConnectString: AnsiString;
932 +    function GetRemoteProtocol: AnsiString;
933 +    function GetAuthenticationMethod: AnsiString;
934 +    function GetODSMajorVersion: integer;
935 +    function GetODSMinorVersion: integer;
936      function HasActivity: boolean;
937  
938      {Character Sets}
939 +    function HasDefaultCharSet: boolean;
940 +    function GetDefaultCharSetID: integer;
941      function GetCharsetName(CharSetID: integer): AnsiString;
942      function CharSetID2CodePage(CharSetID: integer; var CodePage: TSystemCodePage): boolean;
943      function CodePage2CharSetID(CodePage: TSystemCodePage; var CharSetID: integer): boolean;
# Line 923 | Line 947 | type
947        AllowReverseLookup:boolean; out CharSetID: integer);
948    end;
949  
950 <  TProtocol = (TCP, SPX, NamedPipe, Local);
950 >  TProtocolAll = (TCP, SPX, NamedPipe, Local, inet, wnet, xnet, unknownProtocol);
951 >  TProtocol = TCP..xnet;
952  
953    {Service Parameter Block (SPB).
954  
# Line 1077 | Line 1102 | type
1102      {Service Manager}
1103      function HasServiceAPI: boolean;
1104      function AllocateSPB: ISPB;
1105 <    function GetServiceManager(ServerName: AnsiString; Protocol: TProtocol; SPB: ISPB): IServiceManager;
1105 >    function GetServiceManager(ServerName: AnsiString; Protocol: TProtocol; SPB: ISPB): IServiceManager; overload;
1106 >    function GetServiceManager(ServerName: AnsiString; Port: AnsiString; Protocol: TProtocol; SPB: ISPB): IServiceManager; overload;
1107  
1108      {Information}
1109      function GetStatus: IStatus;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines