IPivotFilterSource.Enable

Enable: Boolean;

Enable: boolean;

Sub UserProc;
Var
    Mb: IMetabase;
    Eax: IEaxAnalyzer;
    Pvt: IPivot;
    Filter: IPivotFilterSettings;
    FltrSources: IPivotFilterSources;
    FltrSource: IPivotFilterSource;
Begin
    // Получим репозиторий
    Mb := MetabaseClass.Active;
    // Получим экспресс-отчёт
    Eax := MB.ItemById("EXPRESS").Edit As IEaxAnalyzer;
    // Получим настройки отображения таблицы данных отчёта
    Pvt := Eax.Pivot;
    // Определим параметры фильтрации
    Filter := Pvt.Filter As IPivotFilterSettings;
    // Зададим использование внешнего фильтра
    FltrSources := Filter.FilterSources;
    // Получим подключенный фильтр
    FltrSource := FltrSources.Item(0);
    // Отключим использование фильтра
    FltrSource.Enable := False;
    // Сохраним отчёт
    (Eax As IMetabaseObject).Save;
End Sub UserProc;

Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Pivot;
…
Public Shared Sub Main(Params: StartParams);
Var
    Mb: IMetabase;
    Eax: IEaxAnalyzer;
    Pvt: IPivot;
    Filter: IPivotFilterSettings;
    FltrSources: IPivotFilterSources;
    FltrSource: IPivotFilterSource;
Begin
    // Получим репозиторий
    Mb := Params.Metabase;
    // Получим экспресс-отчёт
    Eax := MB.ItemById["EXPRESS"].Edit() As IEaxAnalyzer;
    // Получим настройки отображения таблицы данных отчёта
    Pvt := Eax.Pivot;
    // Определим параметры фильтрации
    Filter := Pvt.Filter As IPivotFilterSettings;
    // Зададим использование внешнего фильтра
    FltrSources := Filter.FilterSources;
    // Получим подключенный фильтр
    FltrSource := FltrSources.Item[0];
    // Отключим использование фильтра
    FltrSource.Enable := False;
    // Сохраним отчёт
    (Eax As IMetabaseObject).Save();
End Sub;