RE: Concatenate text + numeric

[Scott Mildenberger <Smildenber@xxxxxxxxxxxx>]

Try

       EVAL   AlphaNum = Alpha + %editc(Number: 'X')

Scott Mildenberger

> -----Original Message-----
> From: Dave [mailto:dschopp@imt.net]
> Sent: Friday, October 18, 2002 9:33 AM
> To: rpg400-l@midrange.com
> Subject: Concatenate text + numeric
>
>
> I need to combine an alpha field with a numeric field to
> create a single
> alpha-numeric field (makes sense) like thus:
>
>     Alpha = "XX"
>    Number = 01234
>
> When I use the statement
>
>       EVAL   AlphaNum = Alpha + %char(Number)
>
> I end up with AlphaNum = "XX 1234".  I've tried
>
>       EVAL   AlphaNum = Alpha + %editw(Number: '0    ')
> and
>       EVAL   AlphaNum = Alpha + %editc(Number: '3')
>
> with similar results.  What's the secret to getting it to work?
>