IDynamicInstance.CreateAttributes

Синтаксис Fore

CreateAttributes: IDimAttributes;

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

CreateAttributes(): Prognoz.Platform.Interop.Dimensions.IDimAttributes;

Описание

Метод CreateAttributes возвращает коллекцию атрибутов справочника.

Пример Fore

Для выполнения примера предполагается наличие в репозитории табличного справочника НСИ с настроенной динамической загрузкой элементов и с идентификатором «DYNDIM».

Добавьте ссылки на системные сборки: Dimensions и Metabase.

Sub UserProc;
Var
    MB: IMetabase;
    Dim: IDynamicInstance;
    Attributes: IDimAttributes;
    AttrsInst: IDimAttributesInstance;
Begin
    MB := MetabaseClass.Active;
    Dim := MB.ItemById("DYNDIM").Open(Null) As IDynamicInstance;
    // Получим коллекцию атрибутов справочника
    Attributes := Dim.CreateAttributes;
    // Получим коллекцию экземпляров атрибутов справочника
    AttrsInst := Dim.CreateAttributesInstance;
    // Выведем наименование атрибута и значение атрибута первого элемента
    Debug.WriteLine("Наименование атрибута: " + Attributes.Item(0).Name +
        "; Значение атрибута первого элемента: " + AttrsInst.Item(0).Value(0));
End Sub UserProc;

В результате выполнения примера в окно консоли будет выведено наименование атрибута и значение данного атрибута первого элемента.

Пример Fore.NET

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

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Dimensions;
…
Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    Dim: IDynamicInstance;
    Attributes: IDimAttributes;
    AttrsInst: IDimAttributesInstance;
Begin
    MB := Params.Metabase;
    Dim := MB.ItemById["DYNDIM"].Open(Null) As IDynamicInstance;
    // Получим коллекцию атрибутов справочника
    Attributes := Dim.CreateAttributes();
    // Получим коллекцию экземпляров атрибутов справочника
    AttrsInst := Dim.CreateAttributesInstance();
    // Выведем наименование атрибута и значение атрибута первого элемента
    System.Diagnostics.Debug.WriteLine("Наименование атрибута: " + Attributes.Item[0].Name +
        "; Значение атрибута первого элемента: " + AttrsInst.Item[0].Value[0]);
End Sub;

См. также:

IDynamicInstance