ISecurityConnection2.Clone

Синтаксис Fore

Clone(Type : DalConnectionType): ISecurityConnection;

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

Clone(Prognoz.Platform.Interop.Dal.DalConnectionType): Prognoz.Platform.Interop.Metabase.ISecurityConnection;

Параметры

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

Описание

Метод Clone создает специализированную копию соединения.

Пример Fore

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

Sub UserProc;
Var
    MB: IMetabase;
    DB: IDatabaseInstance;
    Connect: ISecurityConnection;
    CloneConnect: ISecurityConnection;
    Connect2: ISecurityConnection2;
    Command: IDalCommand;
Begin
    MB := MetabaseClass.Active;
    DB := MB.ItemById("BD").Open(NullAs IDatabaseInstance;
    Connect := DB.Connection;
    Connect2 := Connect As ISecurityConnection2;
    debug.WriteLine(Connect2.Type);
    CloneConnect := Connect2.Clone(DalConnectionType.FastInsert);
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;
    Command: IDalCommand;
Begin
    MB := Params.Metabase;
    DB := MB.ItemById["BD"].Open(NullAs IDatabaseInstance;
    Connect := DB.Connection;
    Connect2 := Connect As ISecurityConnection2;
    System.Diagnostics.Debug.WriteLine(Connect2.Type);
    CloneConnect := Connect2.Clone(DalConnectionType.dctFastInsert);
End Sub;

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

См. также:

IDalConnection2