Скрипты Simple-Scada

Синтаксис

procedure SetSourceMessageParams(const ASourceName: string; AFrom, ATo: TDateTime; AGroupID: Int64; const AFilter: TM_MessagesFilter = mfAll);

Описание

Задаёт параметры источника данных с типом "сообщения". ASourceName - имя источника данных. AFrom - время начала, ATo - время конца. В источник попадут только те архивные данные, которые лежат между временем начала и временем конца. AGroupID - ID группы сообщений (в источник попадут все сообщения из указанной группы и вложенных в неё подгрупп). AFilter - фильтр сообщений, может принимать следующие значения:

•mfAll - все сообщения.

•mfAlarmsOnly - только аварийные.

•mfWarningsOnly - только предупредительные.

Пример кода

var
  aReport: TM_Report;
  aRepTo, aRepFrom: TDateTime;
begin
  // формируем время начала и время конца
  aRepTo := EncodeDateTime(YearOf(Now), MonthOf(Now), DayOf(Now), HourOf(Now), 0, 0, 0);
  aRepFrom := IncHour(aRepTo, -1);  
  
  aReport := ReportBuild('Периодический');
  aReport.SetSourceMessageParams('Данные', aRepFrom, aRepTo, 12, mfAlarmsOnly); // задаем параметры источника "сообщения" 
  aReport.View(GetClientName);
end.