ArchiveCountOff

> [HTML Version](archivecountoff.html)

Важно\! Перед началом работы с архивными процедурами, обязательно ознакомьтесь [с примером их использования](work-with-arch-procedures.md).

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

````
procedure ArchiveCountOff(AArcVar, AResVar: TM\_Variable; AFrom, ATo: TDateTime; const ALayer: Byte = 0);

````
**Описание**

Вычисляет количество "выключений" (т.е. переходов от любого значения переменной отличного от нуля к нулю). Вычисляется из архивных данных переменной AArcVar за период от AFrom до ATo. Результат записывается в переменную AResVar. ALayer - необязательный параметр(по-умолчанию равен нулю), который определяет слой архива: 0 - основной; 1 - минутный; 2 - часовой; 3 - суточный.

**Пример кода**

````
var  
  DateStart, DateEnd: TDateTime;  
begin  
  DateEnd:= Now;                     // текущие дата и время  
  DateStart:= IncDay(DateEnd, -1);   // уменьшить дату на 1 день  
   
  // вычислить количество "выключений" переменной "MyVariable" за период   
  // от "DateStart" до "DateEnd" и записать результат в переменную "MyVariableRes"  
  ArchiveCountOff(MyVariable, MyVariableRes, DateStart, DateEnd);  
end.
````