RE: Filling an array from the first occurrence on down

["Dennis Lovelady" <iseries@xxxxxxxxxxxx>]

Hi, Rory:

Sorry, I'm preoccupied with other matters, so I burned it and left it, so to
speak.  That's the ticket, Rory.  I hope it serves you well.

Dennis Lovelady
http://www.linkedin.com/in/dennislovelady
--
"I don't want to achieve immortality through my work, I want to achieve it
through not dying."
        -- Woody Allen 


> Dennis,
>
> Of course, you could pass the line length and DIM values into
> compressArray
> - then you wouldn't monkeying with global variables, you'd just be
> calling
> it as e.g.:
>
> compressArray( %addr(line) : %len(line) : %elem(line) );
>
> Frankly, that would be quite a nice little procedure - one to add to
> the ole
> toolkit...
>
> Rory
>
> On Tue, Apr 26, 2011 at 6:34 PM, Dennis Lovelady
> <iseries@xxxxxxxxxxxx>wrote:
>
> > OK, I had missed that.  Sorry.  But as promised....
> >
> > I did not get around the double loop as I had thought to do
> originally, but
> > I hope it demonstrates the possibilities and efficiencies of the
> approach.
> > Also, this violates my standard of not monkeying around with global
> > variables within a procedure without notice.  But for the sake of
> > demonstration, I give you: http://code.midrange.com/e38eb36856.html
> >
> > Dennis Lovelady
> > http://www.linkedin.com/in/dennislovelady
> --
> 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.