IPrxReportRecalcContext.RecalcEaxObject

Копировать пример

Sub UserProc;
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    Report: IPrxReport;
    Context: IPrxReportRecalcContext;
    DataArea: IEaxDataArea;
    EaxObj: IEaxObject;
Begin
    // Получаем репозиторий
    MB := MetabaseClass.Active;
    // Получаем отчёт
    Report := MB.ItemById("REPORT").Edit As IPrxReport;
    // Получаем контекст для вычисления
    Context := Report.CreateRecalcContext;
    Context.Clear;
    //Получаем аналитическую область данных
    DataArea := Report.DataArea;
    //Получаем объект аналитической области
    EaxObj := DataArea.Slices.Item(0).Views.Item(0);
    //Вычисляем объект
    Context.RecalcEaxObject(EaxObj) := TriState.OnOption;
    Report.RecalcC(Context);
    //Сохраняем результат вычисления
    (Report As IMetabaseObject).Save;
End Sub UserProc;