Re: Array question

[THarteau@xxxxxxxxxxxxxxxxxx]

Hi,
     The array index is getting set to 1 just before the lookup. He is
using the index so he can move the element number into a field to be used
later in the program. When writing the file, he is just using a MOVEA to
move the array to a 26 character field.  My question is why is the array
blank sometimes? If it is a compile time array, shouldn't it always be
there?
>      D ALP             S              1    DIM(26) CTDATA PERRCD(26)
>      ** ALP
>      ABCDEFGHIJKLMNOPQRSTUVWXYZ

> Parent         Child        ALP
> AM-3088-0098   WF10VG200    ABCDEFGHIJKLMNOPQRSTUVWXYZ
> AM-3088-0098   WF10GR200    ABCDEFGHIJKLMNOPQRSTUVWXYZ
> AM-3088-0100   PP308813     ABCDEFGHIJKLMNOPQRSTUVWXYZ
> AM-3088-0100   WF10SF200    ABCDEFGHIJKLMNOPQRSTUVWXYZ
> AM-3088-0100   WF10PC200    ABCDEFGHIJKLMNOPQRSTUVWXYZ
> AM-3088-0100   WF10VG200
> AM-3088-0100   WF10GR200
> AM-3088-0100   H01B6200
> AM-3088-0102   WF10GR200    ABCDEFGHIJKLMNOPQRSTUVWXYZ
> AM-3088-0102   WF10VG200    ABCDEFGHIJKLMNOPQRSTUVWXYZ
> AM-3088-0102   WF10PC200    ABCDEFGHIJKLMNOPQRSTUVWXYZ
> AM-3088-0102   WF10SF200    ABCDEFGHIJKLMNOPQRSTUVWXYZ
> AM-3088-0102   PP308813     ABCDEFGHIJKLMNOPQRSTUVWXYZ
> AM-3088-0102   H01B6200     ABCDEFGHIJKLMNOPQRSTUVWXYZ
<===================================================>

Terri Harteau
****************
"There's no point in being grown up if you can't be childish sometimes."
- Dr. Who
****************