Pies: IVZPiesArray;
Pies: Prognoz.Platform.Interop.Visualizators.IVZPiesArray;
Свойство Pies возвращает массив круговых показателей на слое карты.
Для получения массива столбиковых показателей на слое карты используйте IVZMapChartLayer.Bars.
Для выполнения примера в репозитории предполагается наличие экспресс-отчета с идентификатором «EXPRESS», содержащего карту. Измерение фактов имеет ключ «10124».
Добавьте ссылки на системные сборки: Dimensions, Express, Metabase, Pivot, Visualizators.
Sub UserProc;
Var
MB: IMetabase;
Express: IEaxAnalyzer;
Map: IVZMapChart;
Facts: IDimInstance;
Slice: IEaxDataAreaSlice;
Sel: IDimSelection;
Layer: IVZMapChartLayer;
PiesArray: IVZPiesArray;
Pie: IVZMapChartPie;
Begin
// Получим репозиторий
MB := MetabaseClass.Active;
// Получим экспресс-отчет
Express := MB.ItemById("EXPRESS").Edit As IEaxAnalyzer;
// Получим карту
Map := Express.MapChart.MapChart;
// Зададим измерение фактов в качестве измерения метрик
Facts := Express.Pivot.Dimensions.FindByKey(10124).DimInstance;
Slice := Express.DataArea.Slices.Item(0);
Slice.IndicatorsDimension := Facts;
// Включим тип метрики «Круговой» и в отметку добавим все элементы
Sel := Express.MapChart.IndicatorSelection(EaxMapChartIndicators.PieAngle);
Sel.SelectAll;
// Получим слой на карте
Layer := Map.RootLayer.SubLayers.Item(0);
// Получим коллекцию столбиковых показателей
PiesArray := Layer.Pies;
// Получим объект для работы с круговыми показателями
Pie := PiesArray.Item(0);
// Очистим коллекцию круговых показателей
PiesArray.Clear;
// Добавим ранее полученный объект для работы с круговыми показателями
PiesArray.Add(Pie);
// Обновим и сохраним отчет
Express.RefreshAll;
(Express As IMetabaseObject).Save;
End Sub UserProc;
После выполнения примера на карте экспресс-отчета появятся круговые показатели.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Dimensions;
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Pivot;
Imports Prognoz.Platform.Interop.Visualizators;
…
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
Express: IEaxAnalyzer;
Map: IVZMapChart;
Facts: IDimInstance;
Slice: IEaxDataAreaSlice;
Sel: IDimSelection;
Layer: IVZMapChartLayer;
PiesArray: IVZPiesArray;
Pie: VZMapChartPie;
Begin
// Получим репозиторий
MB := Params.Metabase;
// Получим экспресс-отчет
Express := MB.ItemById["EXPRESS"].Edit() As IEaxAnalyzer;
// Получим карту
Map := Express.MapChart.MapChart;
// Зададим измерение фактов в качестве измерения метрик
Facts := Express.Pivot.Dimensions.FindByKey(10124).DimInstance;
Slice := Express.DataArea.Slices.Item[0];
Slice.IndicatorsDimension := Facts;
// Включим тип метрики «Круговой» и в отметку добавим все элементы
Sel := Express.MapChart.IndicatorSelection[EaxMapChartIndicators.emciPieAngle As Integer];
Sel.SelectAll();
// Получим слой на карте
Layer := Map.RootLayer.SubLayers.Item[0];
// Получим коллекцию столбиковых показателей
PiesArray := Layer.Pies;
// Получим объект для работы с круговыми показателями
Pie := PiesArray.Item[0];
// Очистим коллекцию круговых показателей
PiesArray.Clear();
// Добавим ранее полученный объект для работы с круговыми показателями
PiesArray.Add(Pie);
// Обновим и сохраним отчет
Express.RefreshAll();
(Express As IMetabaseObject).Save();
End Sub;
См. также: