Express > Интерфейсы сборки Express > IEaxAnalyzerOptions > IEaxAnalyzerOptions.UpdateSettings
UpdateSettings: IViewerUpdateSettings;
UpdateSettings: Prognoz.Platform.Interop.ForeSystem.ViewerUpdateSettings;
Свойство UpdateSettings возвращает настройки параметров автообновления отчета.
Для выполнения примера предполагается наличие в репозитории экспресс-отчета с идентификатором «EXPRESS».
Добавьте ссылки на системные сборки: Express и Metabase.
Sub UserProc;
Var
Metabase: IMetabase;
Express: IEaxAnalyzer;
ExpressOption: IEaxAnalyzerOptions;
UpdateOption: IViewerUpdateSettings;
Begin
Metabase := MetabaseClass.Active;
Express := Metabase.ItemById("EXPRESS").Edit As IEaxAnalyzer;
ExpressOption := Express.Options;
UpdateOption := ExpressOption.UpdateSettings;
// Настроим параметры автоматического обновления
UpdateOption.AutoUpdateByData := False;
UpdateOption.AutoUpdateIntervalUnits := TimeUnits.Minutes;
UpdateOption.AutoUpdateInterval := 10;
UpdateOption.UpdateByIntervalEnabled := True;
Debug.WriteLine("Параметры автоматического обновления отчета: " + UpdateOption.AsString);
(Express As IMetabaseObject).Save;
End Sub UserProc;
В результате выполнения примера будет отключено обновление отчета при смене отметки. Отчет будет обновляться автоматически с интервалом 10 минут. В окно консоли будут выведены параметры автоматического обновления отчета.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.ForeSystem;
…
Public Shared Sub Main(Params: StartParams);
Var
Metabase: IMetabase;
Express: IEaxAnalyzer;
ExpressOption: IEaxAnalyzerOptions;
UpdateOption: IViewerUpdateSettings;
Begin
Metabase := Params.Metabase;
Express := Metabase.ItemById["EXPRESS"].Edit() As IEaxAnalyzer;
ExpressOption := Express.Options;
UpdateOption := ExpressOption.UpdateSettings;
// Настроим параметры автоматического обновления
UpdateOption.AutoUpdateByData := False;
UpdateOption.AutoUpdateIntervalUnits := TimeUnits.tuMinutes;
UpdateOption.AutoUpdateInterval := 10;
UpdateOption.UpdateByIntervalEnabled := True;
System.Diagnostics.Debug.WriteLine("Параметры автоматического обновления отчета: " + UpdateOption.AsString);
(Express As IMetabaseObject).Save();
End Sub;
См. также: