RE: Character to Numeric

["Stone, Brad V (TC)" <bvstone@xxxxxxxxxxxxxx>]

See source samples at http://www.netshare400.com.  There's one there.

Brad


> -----Original Message-----
> From: boldt@ca.ibm.com [mailto:boldt@ca.ibm.com]
> Sent: Tuesday, February 29, 2000 7:56 AM
> To: RPG400-L@midrange.com
> Subject: Re: Character to Numeric
> 
> 
> 
> 
> >Ken wrote:
> >>
> >>Does RPG/Anything have a way of evaluating a character string to a
> numeric
> >>result?
> >>
> >>Imbedded decimal point would exist and imbedded thousands 
> separator may
> or
> >>may not exist.  Negative sign may be placed on either left 
> or right of
> >>value. If one or more non-supported characters exist the 
> result should be
> >>Zero.
> >>
> >>Visual Basic has a function named Val and is coded: X = 
> Val(somestring)
> 
> Eurrat wrote:
> >Hey!  I has heard this request before.  Hans, I still feel 
> that it would
> be
> >a great function to add to RPG.
> 
> Great!  Are you volunteering to write a procedure that
> can do this?
> 
> (As I've noted before, if we added a new BIF to the RPG
> language, programmers wouldn't get to use it for years.
> But if someone wrote a procedure to do it and shared it
> with others, programmers would benefit from it now.)
> 
> Cheers!  Hans
> 
> Hans Boldt, ILE RPG Development, IBM Toronto Lab, boldt@ca.ibm.com
> 
> 
> +---
> | This is the RPG/400 Mailing List!
> | To submit a new message, send your mail to RPG400-L@midrange.com.
> | To subscribe to this list send email to RPG400-L-SUB@midrange.com.
> | To unsubscribe from this list send email to 
> RPG400-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: 
> david@midrange.com
> +---
> 
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---