SetSourceMessageParams

> [HTML Version](setsourcemessageparams.html)

**Синтаксис**

````
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.
````