Вычисление разницы между двумя датами
Прототип
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);
...