RE: Concatenate text + numeric

Not really an answer to your question, but I'm pretty sure '%char(number)'
didn't work on V4R3 last time I tried it.  %char is there but doesn't work
for ordinary numerics.


Martin

-----Original Message-----
From: Dave [mailto:dschopp@imt.net]
Sent: 18 October 2002 16:33
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?

Eventually I ended up coding

      MOVEL  Alpha      AlphaNum
      MOVE   Number     AlphaNum

but that kinda defeats moving forward.

I can't use free form 'cuz we have clients on V4R3 still.

TIA,
Dave


_______________________________________________
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.


********************************************************************************************
" This message contains information that may be privileged or confidential and
is the property of the Cap Gemini Ernst & Young Group. It is intended only for
the person to whom it is addressed. If you are not the intended recipient, you
are not authorized to read, print, retain, copy, disseminate, distribute, or use
this message or any part thereof. If you receive this message in error, please
notify the sender immediately and delete all copies of this message ".
********************************************************************************************