Re: Testing An Array

n = %LOOKGT(' ':arrayname);

If n > 0;

"Found one and "n" is the element where found"

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Robert Munday
Sent: Thursday, July 14, 2011 10:05 AM
To: RPG400
Subject: Testing An Array


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
--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing
list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.