sure

nocommas=strip(input,"b",",")

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IKJ4A390/4.3.55



On Fri, Jan 4, 2013 at 1:44 PM, Bill Ashton <bill00ash...@gmail.com> wrote:
> Now, on a related note...is there a simple way to remove commas from a
> number that is input as a string?
>
> For example, if a variable has "2,143,628" in it, how can I easily strip
> the commas to wind up with 2143628?
>
> Billy
>
> On Fri, Jan 4, 2013 at 1:58 PM, Lionel Dyck <lionel.d...@us.ibm.com> wrote:
>
>> The 'extra' comman before the .12 on the second example as just that the
>> code does not handle numbers with decimal but works well with pure numbers
>>
>>
>>
>> Lionel B. Dyck <><
>> z Client Architect
>> IBM Corporation - West IMT
>>
>> Mobile Phone: 1-925-207-4518
>> E-mail: lionel.d...@us.ibm.com
>> System z: www-03.ibm.com/systems/z/
>> Linux on z: http://www-03.ibm.com/systems/z/os/linux/
>> Destination z: http://www-03.ibm.com/systems/z/destinationz/index.html/
>>
>> "Think Inside the z Box"
>>
>>
>>
>>
>>
>>
>> From:   Mark Zelden <m...@mzelden.com>
>> To:     IBM-MAIN@listserv.ua.edu,
>> Date:   01/04/2013 10:54 AM
>> Subject:        Re: Formatting a Number with comma's
>> Sent by:        IBM Mainframe Discussion List <IBM-MAIN@listserv.ua.edu>
>>
>>
>>
>> On Fri, 4 Jan 2013 10:43:18 -0800, Lionel Dyck <lionel.d...@us.ibm.com>
>> wrote:
>>
>> >I ran across this code from Doug Nadel several years ago and hope that
>> >y'all will find it useful.
>> >
>> >
>> >          /* ----------------------------------------------------- */
>> >          /* number format code thanks to Doug Nadel               */
>> >          /* ----------------------------------------------------- */
>> >           str=strip(translate('0,123,456,789,abc,def', ,
>> >                           right(bytes,16,','), ,
>> >                           '0123456789abcdef'),'L',',')
>> >           bytes = strip(str)
>> >
>> >Here are two examples from oorexx under windows (this works well under
>> >z/OS and z/VM)
>> >
>> >C:\t\new>test.rex 12345678
>> >Bytes: 12,345,678
>> >
>> >C:\t\new>test.rex 12345678.12
>> >Bytes: 12,345,678,.12
>> >
>> >
>>
>> May need a tweak (or cut/paste does).  What's that extra comma before
>> the decimal point in the 2nd example?
>>
>> There was a recent thread on the TSO-REXX list that had some
>> nice examples - probably including this one (I don't follow TSO-REXX
>> too closely).
>>
>> --
>> Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
>> mailto:m...@mzelden.com
>> Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html
>> Systems Programming expert at http://expertanswercenter.techtarget.com/
>>
>> Mark
>>
>> ----------------------------------------------------------------------
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>
>>
>>
>> ----------------------------------------------------------------------
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>
>
>
>
> --
> Thank you and best regards,
> *Billy Ashton*
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
Maranatha! <><
John McKown

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to