UseExtendedPeriod: Boolean;
UseExtendedPeriod: boolean;
Свойство UseExtendedPeriod определяет, используется ли период загрузки данных.
Возможные значения:
True. Используется период загрузки данных, заданный свойствами IEaxDataAreaSlice.ExtendedPeriodStart и IEaxDataAreaSlice.ExtendedPeriodEnd. Период загрузки данных учитывается при расчете валидаций и трансформаций;
False. Период загрузки данных не используется.
Для выполнения примера в репозитории предполагается наличие базы данных временных рядов с идентификатором «TSBD».
Добавьте ссылки на системные сборки: Dimensions, Express, Metabase, Pivot.
Sub UserProc;
Var
mb: IMetabase;
CrInf: IMetabaseObjectCreateInfo;
Analyzer: IEaxAnalyzer;
i: Integer;
SelSet: IDimSelectionSet;
Sel: IDimSelection;
AreaSlice: IEaxDataAreaSlice;
Begin
// Получаем правило валидации
Mb := MetabaseClass.Active;
// Создаем экспресс-отчет
CrInf := Mb.CreateCreateInfo;
CrInf.Permanent := True;
CrInf.KeepEdit := True;
CrInf.ClassId := MetabaseObjectClass.KE_CLASS_EXPRESSREPORT;
Analyzer := Mb.CreateObject(CrInf).Edit As IEaxAnalyzer;
// Задаем источник данных
Analyzer.DataSourceDescriptor := Mb.ItemById("TSDB");
Analyzer.Mode := EaxMode.MultiDimension;
// Задаем отметку
SelSet := Analyzer.Pivot.Selection;
For i := 0 To SelSet.Count - 1 Do
Sel := SelSet.Item(i);
Sel.DeselectAll;
Sel.SelectElement(0, True);
End For;
// Получаем срез данных
AreaSlice := Analyzer.Grid.Slice;
// Задаем период загрузки данных
AreaSlice.ExtendedPeriodStart := DateTime.Parse("01.01.1990");
AreaSlice.ExtendedPeriodEnd := DateTime.Parse("01.01.2020");
AreaSlice.UseExtendedPeriod := True;
// Сохраняем изменения
(Analyzer As IMetabaseObject).Save;
End Sub UserProc;
В результате выполнения примера будет создан экспресс-отчет с ограниченным периодом загрузки данных.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Dimensions;
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Pivot;
…
Public Shared Sub Main(Params: StartParams);
Var
mb: IMetabase;
CrInf: IMetabaseObjectCreateInfo;
Analyzer: IEaxAnalyzer;
i: Integer;
SelSet: IDimSelectionSet;
Sel: IDimSelection;
AreaSlice: IEaxDataAreaSlice;
Begin
// Получаем правило валидации
Mb := Params.Metabase;
// Создаем экспресс-отчет
CrInf := Mb.CreateCreateInfo();
CrInf.Permanent := True;
CrInf.KeepEdit := True;
CrInf.ClassId := MetabaseObjectClass.KE_CLASS_EXPRESSREPORT As integer;
Analyzer := Mb.CreateObject(CrInf).Edit() As IEaxAnalyzer;
// Задаем источник данных
Analyzer.DataSourceDescriptor := Mb.ItemById["TSDB"];
Analyzer.Mode := EaxMode.eaxMultiDimension;
// Задаем отметку
SelSet := Analyzer.Pivot.Selection;
For i := 0 To SelSet.Count - 1 Do
Sel := SelSet.Item[i];
Sel.DeselectAll();
Sel.SelectElement(0, True);
End For;
// Получаем срез данных
AreaSlice := Analyzer.Grid.Slice;
// Задаем период загрузки данных
AreaSlice.ExtendedPeriodStart := DateTime.Parse("01.01.1990");
AreaSlice.ExtendedPeriodEnd := DateTime.Parse("01.01.2020");
AreaSlice.UseExtendedPeriod := True;
// Сохраняем изменения
(Analyzer As IMetabaseObject).Save();
End Sub;
См. также: