Item(Index: Integer): IDimensionModel;
Index - индекс измерения куба.
Свойство Item возвращает справочник репозитория, используемый в качестве измерения куба.
Для выполнения примера предполагается наличие куба с идентификатором "CUBE_1".
Sub Main;
Var
MB: IMetabase;
MObj: IMetabaseObject;
CuModel: ICubeModel;
DiModel: ICubeModelDimensions;
i: Integer;
Begin
MB := MetabaseClass.Active;
MObj := Mb.ItemById("CUBE_1").Bind;
CuModel := MObj As ICubeModel;
DiModel := CuModel.Destinations.DefaultDestination.Dimensions;
For i := 0 To DiModel.Count - 1 Do
Debug.WriteLine((DiModel.Item(i) As IMetabaseObject).Id);
End For;
End Sub Main;
После выполнения примера в консоль будут выведены идентификаторы всех справочников, являющихся измерениями в кубе "CUBE_1".
См. также: