ISecurityConnection2.SupportsConnectionType

Синтаксис Fore

SupportsConnectionType(Type:DalConnectionType): Boolean;

Синтаксис Fore.NET

SupportsConnectionType(Prognoz.Platform.Interop.Dal.DalConnectionType): System.Boolean;

Параметры

Type. Параметр определяет тип соединения с базой данных.

Описание

Метод SupportsConnectionType определяет, поддерживается ли драйвером указанный в параметрах тип соединения.

Пример Fore

Для выполнения примера подключите к модулю системные сборки Metabase, Dal и Db.

Sub UserProc;
Var
    MB: IMetabase;
    DB: IDatabaseInstance;
    Connect: ISecurityConnection;
    CloneConnect: ISecurityConnection;
    Connect2: ISecurityConnection2;
Begin
    MB := MetabaseClass.Active;
    DB := MB.ItemById("BD").Open(Null) As IDatabaseInstance;
    Connect := DB.Connection;
    Connect2 := Connect As ISecurityConnection2;
    debug.WriteLine(Connect2.Type);
    if Connect2.SupportsConnectionType(DalConnectionType.FastInsert) then
        CloneConnect := Connect2.Clone(DalConnectionType.FastInsert);
    end if;
End Sub UserProc;

После выполнения примера в окно консоли будет выведен тип соединения, и будет создана копия установленного соединения (Соединения для быстрой вставки), если драйвером поддерживается данный тип соединения.

Пример Fore.NET

Для выполнения примера подключите к NET.модулю системные сборки Dal и Db.

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Dal;
Imports Prognoz.Platform.Interop.Db;

...

Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    DB: IDatabaseInstance;
    Connect: ISecurityConnection;
    CloneConnect: ISecurityConnection;
    Connect2: ISecurityConnection2;
Begin
    MB := Params.Metabase;
    DB := MB.ItemById["BD"].Open(Null) As IDatabaseInstance;
    Connect := DB.Connection;
    Connect2 := Connect As ISecurityConnection2;
    System.Diagnostics.Debug.WriteLine(Connect2.Type);
   if Connect2.SupportsConnectionType(DalConnectionType.dctFastInsert) then
        CloneConnect := Connect2.Clone(DalConnectionType.dctFastInsert);
    end if;
End Sub;

См. также:

ISecurityConnection2