Name(Element: Integer): String;
Name[Element: uinteger]: string;
Element - индекс элемента справочника.
Свойство Name возвращает значение атрибута «Наименование» у элемента с индексом Element.
При получении значения данного свойства используется свойство IDimAttributeInstance.DisplayValue.
Если для справочника установлена альтернативная иерархия, данное свойство неактуально для получения наименования элемента.
Для выполнения примера предполагается наличие в репозитории справочника с идентификатором «D_TO».
Добавьте ссылки на системные сборки «Metabase» и «Dimensions».
Sub UserProc;
Var
MB: IMetabase;
Dimen: IDimInstance;
Elem: IDimElements;
s: String;
i: Integer;
Begin
MB := MetabaseClass.Active;
Dimen := MB.ItemById("D_TO").Open(Null) As IDimInstance;
Elem := Dimen.Elements;
For i := 0 To Elem.Count - 1 Do
s := Elem.Name(i) + "; ";
Debug.WriteLine(s);
End For;
End Sub UserProc;
После выполнения примера в окно консоли будет выведены значения атрибута «Наименование» элемента справочника.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Dimensions;
…
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
Dimen: IDimInstance;
Elem: IDimElements;
s: String;
i: UInt32;
Begin
MB := Params.Metabase;
Dimen := MB.ItemById["D_TO"].Open(Null) As IDimInstance;
Elem := Dimen.Elements;
For i := 0 To Elem.Count - 1 Do
s := Elem.Name[i];
System.Diagnostics.Debug.WriteLine(s + "; ");
End For;
End Sub;
См. также: