IPivot.LocalExecuting

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

Sub UserProc;
Var
    MB: IMetabase;
    Express: IEaxAnalyzer;
    Pivot: IPivot;
Begin
    MB := MetabaseClass.Active;
    // Получим экспресс-отчёт
    Express := MB.ItemById("EXPRESS").Edit As IEaxAnalyzer;
    // Получим настройки отображения таблицы данных отчёта
    Pivot := Express.Pivot;
    // Определим состояние вычисления отчёта
    Pivot.LocalExecuting := TriState.OnOption;
    // Проверим, готова ли таблица к расчёту данных
    If Pivot.IsReadyToExecute Then
        Debug.WriteLine("Таблица готова к расчёту");
        Else
            Debug.WriteLine("Таблица не готова к расчёту");
    End If;
    Debug.WriteLine ("Состояние вычислений:");
    Debug.WriteLineIf(Pivot.LocalExecuting = -2, " Вычислять на сервисах");
    Debug.WriteLineIf(Pivot.LocalExecuting = -1, " Вычислять локально");
    Debug.WriteLineIf(Pivot.LocalExecuting = 0, " Не вычислять");
End Sub UserProc;