Когда отлаживаю процедуру возникает ошибка :

1)Error Message:
----------------------------------------
Arithmetic overflow or division by zero has occurred.
arithmetic exception, numeric overflow, or string truncation.
2)Error Message:
----------------------------------------
Unsuccessful execution caused by system error that does not preclude successful execution of subsequent statements.
Integer overflow. The result of an integer operation caused the most significant bit of the result to carry.

Никаког опереполнения или деления на ноль конечно же нету.... т.к. сам просматривал входные данные... в чем причина данных ошибок незнаю.. Может ктото с этим сталкивался?
С уважением, спасибо!

Собственно конечно могу привести вырезку из процедуры врядли это как то поможет...

if (komkv=komls) then
begin
IF (OP/GP>=2) THEN (!!!!!!!!!!!!Ошибка 1 возникает тут !!!!!!!!!!!)
if ((komkv=1 AND GP>18) OR (komkv<>1 AND vdop<>0)) then KOEF=1.5;
end
oplg=0;
if (((K_PLOSHAD=3)or(K_PLOSHAD=4)or(K_PLOSHAD=5))AND((PRIVAT<>1)AND(PRIVAT<>4))) then
K_TEHOB=0;
tehob=((ROSN_PL+RDOP_PL)*gos_stavka+RIZL_PL*IZL_STAVKA)*KOEF*K_TEHOB;
(!!!!!!!!!!!!!!!!!!!!!!!!!!!Ошибка 2 возникает тут!!!!!!!!!!!!!!!!!!!!!!)
/*END TEHOB+OPLG*/
IF (TEHOB>=MAX_TEHOB) THEN
BEGIN
MAX_TEHOB=TEHOB;
MAX_PLOSHAD=PLOSHAD;
MAX_NOMLG=NOMLG;
MAX_NPP=NPP;
MAX_DOPLG=DOPLG;
MAX_ROSN_PL=ROSN_PL;
MAX_RDOP_PL=RDOP_PL;
MAX_RIZL_PL=RIZL_PL;
END

Чтото принципиально меняющие ответ на вопрос произошло?
Да кстати сразу чтобы отбросить... процедура компилируется и работает ... но нужно быть уверенным, что она работает верно... как говорится коли чтото делаешь делай это качественно ;-)

автор
Продолжаем выяснять. Как объявлены OP и GP ? Какие значения лежат в них ? Перед этой проверкой поставь следующее :
If (OP Is Null) Then OP=0;
If ((GP Is Null) Or (GP=0)) Then GP=1;
Если заработает, всё ясно, если нет, будем копать дальше.


Попробовал... ничего не изменилось... причем ошибки нету при работе процедуры.. она рабочая и компилируется.. ошибка только когда пробегаюсь отладчиком процедур... пошагово...