Вычисление разницы между двумя датами
Прототип
void SUBDATE (
  DECIMAL D1,  /* уменьшаемая дата */
  DECIMAL D2,  /* вычитаемая дата */
  DECIMAL D3); /* разность дат */
Описание
 

Функция SUBDATE вычисляет разность дат D1 и D2, представленных в виде числа тиков от начала н.э., и помещает результат в переменную D3.

Пример
DECIMAL D1, D2, D3;
…
/* Первая дата:         */
STRTOTICK ("01.01.0001:00:00:00.00", D1);
/* Вторая дата:         */
STRTOTICK ("02.01.0001:00:00:00.00", D2);
/* Длина суток в тиках: */
SUBDATE (D2, D1, D3);
…