IDynamicInstance.AttributeCount

Синтаксис Fore

AttributeCount: Integer;

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

AttributeCount: integer;

Описание

Свойство AttributeCount возвращает количество атрибутов справочника.

Пример Fore

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

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

Sub UserProc;
Var
    MB: IMetabase;
    Dim: IDynamicInstance;
    DimInst: IDimInstance;
    DimElementArr: IDimElementArray;
Begin
    MB := MetabaseClass.Active;
    Dim := MB.ItemById("DYNDIM").Open(NullAs IDynamicInstance;
    // Выведем наименование справочника
    DimInst := Dim.DimInstance;
    Debug.WriteLine("Наименование справочника: " + DimInst.Name);
    // Получим массив всех элементов справочника
    DimElementArr := Dim.CreateDimElementArray;
    // Выведем количество элементов в справочнике
    Debug.WriteLine("Элементов в справочнике: " + DimElementArr.Count.ToString);
    // Выведем количество атрибутов справочника
    Debug.WriteLine("Количество атрибутов: " + Dim.AttributeCount.ToString);
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;
    DimInst: IDimInstance;
    DimElementArr: IDimElementArray;
Begin
    MB := Params.Metabase;
    Dim := MB.ItemById["DYNDIM"].Open(NullAs IDynamicInstance;
    // Выведем наименование справочника
    DimInst := Dim.DimInstance;
    System.Diagnostics.Debug.WriteLine("Наименование справочника: " + DimInst.Name);
    // Получим массив всех элементов справочника
    DimElementArr := Dim.CreateDimElementArray();
    // Выведем количество элементов в справочнике
    System.Diagnostics.Debug.WriteLine("Элементов в справочнике: " + DimElementArr.Count);
    // Выведем количество атрибутов справочника
    System.Diagnostics.Debug.WriteLine("Количество атрибутов: " + Dim.AttributeCount);
End Sub;

См. также:

IDynamicInstance