Прототип

INT DecToDLong (
   DECIMAL Id,   /* исходное вещественное число */
   L_DLONG *Ol,  /* преобразованное целое */
   Int Round);   /* признак округления */

Описание

Функция DecToDLong преобразует вещественное число с фиксированной точкой, заданное переменной Id типа DECIMAL, в длинное целое число типа L_DLONG.

Если преобразуемое вещественное число имеет целочисленное значение, то параметр Round игнорируется;

Если Round = 0, выполняется округление до целого значения.

Если вещественное число содержит дробную часть и значение Round = 1, то функция возвращает ошибку преобразования

Возвращаемое значение

Код завершения (0 или 1). При успешном завершении – целая часть вещественного числа (без округления) в переменной Ol типа L_DLONG.

Пример

…
if ((ok =DecToDLong(vdec,&LStr ,1)) == 0)
   {   /* Ошибка преобразования с округлением*/
   printf('\n Ошибка:  переполнение при преобразовании');
   goto lend;
   } /* Ifthen */
…