LotusScript Floor and Ceiling function

Since LotusScript does not contain a Floor and Ceiling function, as most languages do, we had to come up with our own. I hope it helps!

 
 Function floor(num As Double)
 As Double
 
 If (num*100) Mod 100 > 50 
Then
  floor = Round(num,0) - 1
 Else 
  floor = Round(num,0)
 End If
 
End Function

Do you have comments on this tip? Let us know.

This tip was submitted to the SearchDomino.com tip exchange by member Clayton McDaniel. Please let others know how useful it is via the rating scale at the end of the tip. Do you have a useful Notes/Domino tip or code to share? Submit it to our monthly tip contest and you could win a prize and a spot in our Hall of Fame.