Пожалуйста, включите JavaScript для просмотра этого сайта.

Скрипты Simple-Scada

Важно! Перед началом работы с архивными процедурами, обязательно ознакомьтесь с примером их использования.

Синтаксис

procedure ArchiveCountOn(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" }
  ArchiveCountOn(MyVariable, MyVariableRes, DateStart, DateEnd);
end.