RE: Arrays

["DeLong, Eric" <EDeLong@xxxxxxxxxxxxxxx>]

Rick,

I've pondered that question myself.  I find myself picking the DS-Array over
MODS in most cases, simply because it has fewer limitations (can compare two
rows directly, no OCCUR to set, more supporting opcodes, searching
capability, etc).  Never say never, but I can't easily think of a reason to
use MODS over the DS-Array.  Anyone care to comment?

Eric DeLong
Sally Beauty Company
MIS-Project Manager (BSG)
940-898-7863 or ext. 1863



> -----Original Message-----
> From: Richard B Baird [mailto:rbaird@esourceconsulting.com]
> Sent: Thursday, July 25, 2002 9:00 AM
> To: rpg400-l@midrange.com
> Subject: RE: Arrays
>
>
>
> Eric,
>
> If this is the case, what would be the point of ever using a
> mult occur
> data structure ever again?
>
> it would seem that doing it this way is a lot more flexible
> than a MODS.
> Can you think of any instances where a MODS would be more appropriate?
>
> thanks,
>
> rick
>
> -----Original Message-----
> Rick,
>
> Yes, you can access each overlay field as an array (with
> subscripting).
> Better yet, SORTA Array2 will sort the contents on $CTData in
> Array2 order.
> That means you can sort a datastructure dynamically on any subfield.
> Pretty
> nifty for Subfile displays.  Oh, make sure to add an
> "INZ(*All'9')" and
> "Ascend" to $CTData (base array) if you intend to have a
> varying number of
> rows in the data-set.  That keeps unused records in the array
> at the end
> (and out of the way) after you SORTA.
>
> Eric DeLong
> Sally Beauty Company
> MIS-Project Manager (BSG)
> 940-898-7863 or ext. 1863
> -------------------------
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>