RE: Array index is not valid

[leszek.gruszczynski@xxxxxx]

Index of array that You set is to low , or set to high.

Example:

This is array
D PMS             S             78    DIM(05) CTDATA PERRCD(1)
and my index:
D XX                 S              2 0

Field XX must be have value from 1 to 5.

When field XX was value 0 or greater then 5:

This is wrong code!!!

    eval aa = PMS(0)
or
    eval aa = PMS(6)

Regards

Leszek  Gruszczynski




-----Oryginalna wiadomooeæ-----
Od: sas [mailto:sas@toto.co.id]
Wys³ano: 11 lipca 2002 08:39
Do: rpg400-l@midrange.com
Temat: Array index is not valid


> Dear all ,
> I am very start learning RPG, I get message  " array index is not valid"
> many times , below the joblog
> Message ID . . . . . . :   RPG0121       Severity . . . . . . . :   99
> Message type . . . . . :   Inquiry
> Date sent  . . . . . . :   07/11/02      Time sent  . . . . . . :
14:07:24
>
> Message . . . . :   The PGM1 144100 array index is not valid (C G S D F).
> Cause . . . . . :   The RPG program PGM1 in library TEST tried to use the
>   array index at statement 144100 which was less than one or greater than
> the
>   number of elements in the array.
> Please advise , how to solve the problem
> Thank you
> Regards
> sas
>
>


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