|
View previous topic :: View next topic
|
| Author |
Message |
Ragav86
New User
Joined: 27 Jan 2010
Posts: 37
Location: chennai
|
|
|
|
| Code: |
WS-MSG = 'UNKNOWN PARM TYPE READ - ' WS-PGM-REAL-NAME
*******B055 INVALID LENGTH, TYPE OR DECIMAL PLACES - WS-MSG
*******B038 MUST BE NUMERIC LITERAL - UNKNOWN PARM TYPE READ -
*******B180 ARITHMETIC OPERATOR IS MISSING - UNKNOWN PARM TYPE READ -
*******B055 INVALID LENGTH, TYPE OR DECIMAL PLACES - WS-PGM-REAL-NAME
|
Hi,
How to cocatenate strings with variables in easytrive.. |
|
| Back to top |
|
 |
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix
|
|
|
|
You can get away without "concatenation", as your first "string" is a literal, so has a fixed length.
Redefine W-MSG so that you can access something that is length-of-literal plus one long (I'm not going to count it) long, and have a second field after that.
Assign literal to first field. Assign WS-PGM-REAL-NAME to second field. Enjoy. |
|
| Back to top |
|
|
seagull
New User
Joined: 28 May 2007
Posts: 24
Location: Dublin
|
|
|
|
Redefine your WS-MSG variable so that it has a piece for the message text and a piece for the program name
| Code: |
WS-MSG 40 A
WS-MSG-TEXT WS-MSG 30 A
WS-PGM-NAME WS-MSG +30 10 A
|
Then you can have
| Code: |
WS-MSG-TEXT = 'UNKNOWN PARM TYPE READ - '
WS-PGM-NAME = WS-PGM-REAL-NAME
|
|
|
| Back to top |
|
|
|
|
