IsLoadDatesSet: Boolean;
IsLoadDatesSet: boolean;
The IsLoadDatesSet property returns whether data loading period is set.
Available values:
True. Data loading period is set by the IValidationExecuteSettings.LoadStart and IValidationExecuteSettings.LoadEnd properties.
False. Data loading period is not set.
Executing the example requires a form containing the EaxDocumentViewerBox component with the EaxDocumentViewerBox1 identifier and the UiErAnalayzer component with the UiErAnalyzer1 identifier. UiErAnalyzer1 is a data source for EaxDocumentViewerBox1 and contains a loaded express report. The report uses data from the time series database with the TSDB identifier that contains a validation rule with the VALID_GROWTH_RATE identifier.
Add links to the Cubes, Metabase, Ms system assemblies.
Sub UserProc;
Var
mb: IMetabase;
TSDBKey: Integer;
ValidFilter: IValidationFilter;
ExecSett: IValidationExecuteSettings;
Analyzer: IEaxAnalyzer;
ExecRun: IValidationExecRun;
DiagRep: IDiagnosticReport;
Begin
Mb := MetabaseClass.Active;
// Get time series database
TSDBKey := Mb.GetObjectKeyById("TSDB");
// Get validation rule
ValidFilter := Mb.ItemByIdNamespace("VALID_GROWTH_RATE", TSDBKey).Bind As IValidationFilter;
// Create parameters of validation rule execution
ExecSett := ValidFilter.CreateExecuteSettings;
// Set data loading periods
If Not ExecSett.IsLoadDatesSet Then
ExecSett.LoadStart := DateTime.Parse("01.01.2000");
ExecSett.LoadEnd := DateTime.Parse("01.01.2010");
End If;
// Calculate rule
Analyzer := EaxDocumentViewerBox1.Analyzer.GetAnalyzer;
ExecSett.Laner := Analyzer.Laner;
ExecRun := ValidFilter.Execute(ExecSett);
DiagRep := New DiagnosticReport.Create;
DiagRep.Run := ExecRun;
DiagRep.EaxAnalyzer := Analyzer;
Analyzer.RefreshAll;
End Sub UserProc;
After executing the example validation rule with changed data loading parameters is calculated.
The requirements and result of the Fore.NET example execution match with those in the Fore example. Use Fore.NET analogs instead of Fore components.
Imports Prognoz.Platform.Interop.Cubes;
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Ms;
…
Sub UserProc();
Var
mb: IMetabase;
TSDBKey: uinteger;
ValidFilter: IValidationFilter;
ExecSett: ValidationExecuteSettings;
Analyzer: EaxAnalyzer;
ExecRun: IValidationExecRun;
DiagRep: IDiagnosticReport;
Begin
Mb := Self.Metabase;
// Get time series database
TSDBKey := Mb.GetObjectKeyById("TSDB");
// Get validation rule
ValidFilter := Mb.ItemByIdNamespace["VALID_GROWTH_RATE", TSDBKey].Bind() As IValidationFilter;
// Create parameters of validation rule execution
ExecSett := ValidFilter.CreateExecuteSettings();
// Set data loading periods
If Not ExecSett.IsLoadDatesSet Then
ExecSett.LoadStart := DateTime.Parse("01.01.2000");
ExecSett.LoadEnd := DateTime.Parse("01.01.2010");
End If;
// Calculate rule
Analyzer := eaxDocumentViewerBoxNet1.Analyzer.AnalyzerUi.ErAnalyzer;
ExecSett.Laner := Analyzer.Laner;
ExecRun := ValidFilter.Execute(ExecSett);
DiagRep := New DiagnosticReport.Create();
DiagRep.Run := ExecRun;
DiagRep.EaxAnalyzer := Analyzer;
Analyzer.RefreshAll();
End Sub UserProc;
See also: