RE: Round to the tenth

[CWilt@xxxxxxxxxxxx]

Problem with that is that 20 will round to 30.  Not what the original poster
had in mind.

How about 

eval nbr = ( %dech( ( origNbr + 4 / 10 ) : 5 : 1 )) * 10

HTH,
Charles


> -----Original Message-----
> From: Fisher, Don [mailto:Dfisher@xxxxxxxxxxxxxxxxx]
> Sent: Friday, October 22, 2004 3:42 PM
> To: 'Midrange Systems Technical Discussion'
> Subject: RE: Round to the tenth
> 
> 
> The trouble with that is a number like 21 would be rounded to 
> 20.  I believe
> the request was to round to the next higher ten so 21 would 
> round to 30. 
> 
> I can't think of any way to do this other than:
> EVAL TempNumber = 
>       ((YourNumber / 10) + 1) * 10
> 
> TempNumber would have 0 decimal positions.
> 
> Hope that helps. 
> 
> Donald R. Fisher, III
> Project Manager
> Roomstore Furniture Company
> (804) 784-7600 extension 2124
> DFisher@xxxxxxxxxxxxx
> 
> 
> <clip>
> c  Eval(h)  temp = YourNumber / 10
> c  Eval     YourNewNumber = temp * 10
> <clip>
> --
> This is the Midrange Systems Technical Discussion 
> (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.
>