Re: Array question

[Buck Calabro <Buck.Calabro@xxxxxxxxxxxx>]

Terri Harteau wondered:

>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?

CLEAR and RESET may be at work.  Try this code to see what I mean:

     D alp             s              1    dim(26) ctdata perrcd(26)
     D dsp             s             26

     c                   movea     alp           dsp
     c     dsp           dsply
     c                   clear                   alp
     c                   movea     alp           dsp
     c     dsp           dsply
     c                   reset                   alp
     c                   movea     alp           dsp
     c     dsp           dsply

     c                   eval      *inlr = *on
** CTDATA ALP
ABCDEFGHIJKLMNOPQRSTUVWXYZ

  --buck

"This box Rocks!" - related to 2002 NE IBM
Conference attendees by IBM's Stephanie Joy