| 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} |
| 352 |
|
['{660822a5-3114-4c16-b6cb-c1a7b2aba70d}'] |
| 353 |
|
end; |
| 354 |
|
|
| 355 |
< |
IBPB = interface(IParameterBlock<IBPBItem>) |
| 355 |
> |
IBPB = interface (IParameterBlock<IBPBItem>) |
| 356 |
|
['{e0cb9eb5-17f7-4416-b7d1-3cddd1dfca76}'] |
| 357 |
|
end; |
| 358 |
|
|
| 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); |
| 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 |
| 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; |
| 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; |
| 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 |
|
|
| 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; |
