Re: Testing An Array

["Lim Hock-Chai" <Lim.Hock-Chai@xxxxxxxxxxxxxxx>]

Using DS to overlay over the array and check if DS is <> blank would be
the easiest to understand.  But if you are looking for a one line wonder
then you could try below:

If %str(%addr(myArray) :%size(myArray :*all)) <> *blank;



"Robert Munday" <rwmunday@xxxxxxxxxxxxx> wrote in message
news:<mailman.2505.1310652313.2630.rpg400-l@xxxxxxxxxxxx>...
>    Greetings from the sunny south.
>
>
>
>    I need to test an array to determine if there are any non-blank
elements.
>    In fixed format I recall that I could test the whole array.  That
seems
>    not to work in /Free format.
>
>
>
>    What would I need to make this concept work:
>
>
>
>    If MyArray <> *Blanks;
>
>
>
>    I don't want to spin through the numerous individual elements.  Any
>    suggestions on how to make this happen?
>
>
>
>
>
>    Thanks,
>
>
>
>
>
>
>
>    Robert Munday
>
>    Munday Software Consultants
>
>    Montgomery, AL