Hi

the numeric variable data support only double type.

Result: many Currency >=$225179981368.5286 can be calculate to you in wrong way.

Attention to develop programs for customers with many moneies !!!

A short test program in order to amuse to you:

STORE NTOM(VAL(INPUTBOX("min value","Input", "225179981368.0000" ))) TO nMin
STORE NTOM(m.nMin+VAL(INPUTBOX("interval" ,"Input", "1.0000"))) TO nMax

LOCAL notEqual

?' Range : ',m.nMin,' To ',m.nMax
?'----------------------------------------------'
?' Start = : ',m.nMin
sEscape=SET("Escape")
SET ESCAPE ON
n=m.nMin
DO WHILE m.n<=m.nMax
IF (NTOM(MTON((m.n)))=m.n)=m.notEqual
IF m.notEqual
? ' Start = : ',m.n
ELSE
? ' Start # : ',m.n,TRANSFORM(NTOM(MTON((m.n)))-m.n)
ENDIF
STORE !m.notEqual TO notEqual
ENDIF
DOEVENTS
STORE m.n+$0.0001 TO n
ENDDO
SET ESCAPE &sEscape
?'----------------------------------------------'
RETURN


Fabio