Re: Removing a dash from a phone number

[Peter_Vidal@xxxxxxxx]

"The number is 445-1234. I need to remove the '-'. So it reads 4451234. Can I
use %SUBST to do this? If so how?"

You can do this:
Eval Phone_Suf=%SUBST(Phone:5:4)
Phone=%SUBST(Phone:4:Phone_Suf)


Peter Vidal
Programmer Analyst
PALL Aeropower Corp.




                    "Justin Houchin"
                    <jhouchin9@charte        To:     <rpg400-l@midrange.com>
                    r.net>                   cc:
                    Sent by:                 Subject:     Removing a dash from 
a phone number
                    rpg400-l-admin@mi
                    drange.com


                    01/22/2002 12:28
                    PM
                    Please respond to
                    rpg400-l






This is a multi-part message in MIME format.
--
[ Picked text/plain from multipart/alternative ]
Hello,
I have a little problem. I have a phone Number that is in a character field. The
number is 445-1234. I need to remove the '-'. So it reads 4451234. Can I use
%SUBST to do this? If so how?

Justin Houchin
Lead Programmer
Reliatek,Inc
--

_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.