Re: Arrays and Fields

How long is MESSGE?  If it is 78, add a %trim like this:

C                   EVAL      MESSAGE = %trim(ARMSG01(6)) + ' ' + %CHAR(TOTALHOURS)




fkany@averittexpress.com wrote:

I want MESSAGE field to be populated with "Excluded Time Exceeds Hours:
12".
Only "Excluded Time Exceeds Hours:" is populating the MESSAGE field.
Can anyone see why this line of code will not work?  I've been looking at this too long and
can't see the problem.  Need a fresh pair of eyes =).

=============================================================================
D ARMSG01         S             78    DIM(6) CTDATA PERRCD(1)

C                   EVAL      MESSAGE = ARMSG01(6) + ' ' + %CHAR(TOTALHOURS)

** ARMSG01
You Must Enter a Valid Service Center
You Have Entered an Invalid Service Center
You Must Enter a Valid Date
You Have Entered an Invalid Date
You Must Use .00, .25, .50, or .75 -> Example: 1.50 NOT 1.30 for 1 hour 30 min
Excluded Time Exceeds Hours:
==============================================================================

TIA,

Frank

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