Clear(Value: IDimSelection; Key: Integer);
Value. Отметка измерения, в котором находится альтернативная иерархия;
Key. Ключ измерения.
Метод Clear удаляет коллекцию альтернативных иерархий из указанного измерения.
Для очищения коллекции из аналитической области данных используйте IEaxDataAreaHierarchies.ClearAll.
Для добавления альтернативной иерархии в коллекцию используйте IEaxDataAreaHierarchies.Add.
Для выполнения примера в репозитории необходимо наличие экспресс-отчета с идентификатором «EXPRESS». Одно из измерений отчета должно содержать минимум одну альтернативную иерархию.
Добавьте ссылки на системные сборки: Dimensions, Express, Metabase.
Sub UserProc;
Var
MB: IMetabase;
Express: IEaxAnalyzer;
Hiers: IEaxDataAreaHierarchies;
Slice: IEaxDataAreaSlice;
DimSel: IDimSelection;
Begin
// Получим репозиторий
MB := MetabaseClass.Active;
// Получим экспресс-отчет
Express := MB.ItemById("EXPRESS").Edit As IEaxAnalyzer;
// Получим срез источника данных
Slice := Express.DataArea.Slices.Item(0);
//Получим отметку измерения
DimSel := Slice.Selection.Item(0);
// Удалим альтернативную иерархию из измерения
Hiers := Express.DataArea.Hierarchies;
Hiers.Clear(DimSel, DimSel.Dimension.Key);
(Express As IMetabaseObject).Save;
End Sub UserProc;
После выполнения примера из заданного измерения будут удалены все альтернативные иерархии.
См. также: