Type: DimCompoundDimensionType;
Свойство Type возвращает тип составного измерения.
Данное свойство доступно только для чтения.
Для выполнения примера в репозитории необходимо наличие виртуального куба с идентификатором «VIRT_CUBE».
Добавьте ссылки на системные сборки: Cubes, Dimensions, Metabase.
Sub UserProc;
Var
MB: IMetabase;
Cube: IVirtualCube;
CDim: ICompoundDimension;
Params: IMetabaseObjectParamValues;
CDimInst: ICompoundDimensionInstance;
Begin
// Получим репозиторий
MB := MetabaseClass.Active;
// Получим виртуальный куб
Cube := MB.ItemById("VIRT_CUBE").Edit As IVirtualCube;
// Получим данные составного измерения
CDim := Cube.FactDimension As ICompoundDimension;
Params := (CDim As IMetabaseObject).Params.CreateEmptyValues;
CDimInst := (CDim As IMetabaseObject).Open(Params) As ICompoundDimensionInstance;
Select Case (CDimInst.Type As Integer)
Case 1: Debug.WriteLine("Тип составного измерения - обычный");
Case 2: Debug.WriteLine("Тип составного измерения - метаиерархия");
End Select;
End Sub UserProc;
После выполнения примера в окно консоли выведется тип составного измерения виртуального куба.
См. также: