Jos, haven't tested this but something like:

* to find the NEXT higher number to meet the criteria
FUNCTION Blah
LPARAM   tnNum

lnNum = tnNum

If MOD( lnNum, 5) <> 0
    Do while not llFound
      lnNum = lnNum + 1
      If CEILING( MOD( lnNum, 5) = 0
          llFound = .T.
      Endif
    EndDO
endif
Return lnNum

HTH but Sergey will probably come up with a one-liner later! :-)

Terry

>Hi All,
>
>Having a bit of a brain freeze here...I have an integer between 0 and 100. I want to round it to the nearest integer wholly divisible by 5 i.e. 0,5,10,15,...95,100
>
>Sorry for the low quality challenge :)