IMetabaseObjectDescriptor.Metabase

Синтаксис

Metabase: IMetabase;

Описание

Свойство Metabase возвращает репозиторий, в котором создан текущий объект.

Пример Fore

Подключите системную сборку Metabase.

Function GetMetabase(Descriptor: IMetabaseObjectDescriptor): IMetabase;
Begin
    If Descriptor.IsLink Then
        Return (Descriptor.Link.Open(Null) As IMetabaseLinkInstance).Metabase;
    Else
        Return Descriptor.Metabase;
    End If;
End Function GetMetabase;

Указанная функция может использоваться для получения репозитория по описанию объекта. Если описание соответствует ярлыку на объект из другого репозитория, то осуществляется открытие связи с репозиторием и получение контекста репозитория.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

Imports Prognoz.Platform.Interop.Metabase;

Public Shared Function GetMetabase(Descriptor: IMetabaseObjectDescriptor): IMetabase;
Begin
    If Descriptor.IsLink Then
        Return (Descriptor.Link.Open(Null) As IMetabaseLinkInstance).Metabase;
    Else
        Return Descriptor.Metabase;
    End If;
End Function;

См. также:

IMetabaseObjectDescriptor