Truncate

[Matt Sherrill]

With the help of Ken White, Kenneth Brody and Robert T. Repko, I was able to find a solution to my problem.


>>>Problem>>
If I have a calculated number of 46949.5, I need it to round the nearest hundreds "after" dropping the decimal.

So the steps would proceed like this:
1. 46,949.5 becomes 46,949
2. 46,949 rounds to the nearest hundreds to become 46,900>>>>>

Solution (works for 46949.500 & 46959.500)

::wa(12,.5)="46949.500"
::wa=wa+50                    '46959.5
::wu(8,.0)=int(wa)/"100"    '469
::51=wu * "100"                '46900

::wa(12,.5)="46959.500"
::wa=wa+50                    '47009.5
::wu(8,.0)=int(wa)/"100"    '470
::51=wu * "100"                '47000

Thanks Everyone!!

Matt Sherrill
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mailman.celestial.com/pipermail/filepro-list/attachments/20131212/5b98db01/attachment.html