Re: Need OCCURS when defining data structures

["Albert York" <albertyork@xxxxxxxxx>]

You shouldn't have to move anything. 

Just keep pointers to the first valid data element and the next available slot.

Instead of moving the array elements just increment the pointers and allow for wrap around.

Albert
           


> ----- Original Message -----
> From: "Charles Wilt" <charles.wilt@xxxxxxxxx>
> To: "RPG programming on the IBM i / System i" <rpg400-l@xxxxxxxxxxxx>
> Subject: Re: Need OCCURS when defining data structures
> Date: Tue, 3 Feb 2009 16:17:39 -0500
>
>
> Also note it you want better performance, consider using the C Library
> function, memmove directly from RPG.  Serach the archives for more
> info.
>
> ***NOTE: do not use memcpy as your source and destinations will be
> overlapping which is not supported by memcpy.  But is supported by
> memmove.
>
> http://archive.midrange.com/rpg400-l/200101/msg00068.html
>
>
> 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.
> --
> 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.

>