Re: Need OCCURS when defining data structures

RPG has supported Muli-Occurance Data Structures (MODS) for a long time:

d myMods ds occurs(10)
d fld1 10a
d fld2 20a

for x = 1 to 10;
occur(x);
fld1 = 'HI';
endfor;


RPG IV added support for arrays
d myArray ds dim(10)
d fld1 10a
d fld2 20a

for x = 1 to 10;
fld1(x) = 'HI';
endfor;

HTH,
Charles

On Tue, Feb 3, 2009 at 3:23 PM, James Newman, CDP <newmanas400@xxxxxxxxx> wrote:

I'm on a V5R2 machine and rewriting a program that currently uses 60 element
arrays when processing records. As part of the processing I have to move
element 59 to element 60, 58 to 59, etc and put the newly read record in
element 1. A friend (thanks Marshall) suggested that instead of using
arrays, define the arrays as data structures and move the data structure
instead. This should be much faster. But do I have to define each element
as part of the larger data structure? I guess there's no "OCCURS X TIMES"
in RPG, eh?

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