Re: Extract number from character field

From: Jim Langston <jlangston@conexfreight.com>
> Actually, I've never found the need for a %value BIF, since all I have
> to do is create a DS of type A and type S.  I move the number string
> to the string variable, and pull the value out of the number variable.
>
> Although I agree a %value BIF would make things simpler, it is not
> absolutely necessary.
>
> D                        DS
> D NumberString                   15 A
> D NumberValue                   15 S
>
> C*** NumberString contains '12345'
> C                  EVAL NumberString = SomeString
> C                  EVAL SomeNumber = NumberVal
> C*** Now SomeNumber contains the value 12345

But what if the source string was "12,435"?

-Jeff
jlcrosby@fwi.com
Voice: 219-422-7531  Fax: 219-426-0212


+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---