DimItem(Index: Integer): IDimInstance;
Index - индекс измерения.
Свойство DimItem возвращает данные измерения источника данных.
Для выполнения примера предполагается наличие в репозитории экспресс-отчёта с идентификатором EXPRESS_REPORT.
Sub Main;
Var
MB: IMetabase;
Expr: IEaxAnalyzer;
Pivot: IPivot;
DimInst: IDimInstance;
i, j: Integer;
Begin
MB := MetabaseClass.Active;
Expr := MB.ItemById("EXPRESS_REPORT").Bind As IEaxAnalyzer;
Pivot := Expr.Pivot;
For i := 0 To Pivot.DimCount - 1 Do
DimInst := Pivot.DimItem(i);
Debug.WriteLine(DimInst.Name);
Debug.Indent;
For j := 0 To DimInst.Elements.Count - 1 Do
Debug.WriteLine(DimInst.Elements.Name(j));
End For;
Debug.Unindent;
End For;
End Sub Main;
После выполнения примера в консоль среды разработки будут выведены наименование и все элементы измерений, имеющихся в источниках данных экспресс-отчёта.
См. также: