RE: What is syntax for arrays within array?

[Joel Fritz <JFritz@xxxxxxxxxxxxxxxx>]

This is even better.  It's also shockingly obvious in the clear light of
hindsight.  The handprint on my forehead is just starting to go away.

The behavior of *next is probably documented, but it's more fun to learn it
by "discovery." <g>

> -----Original Message-----
> From: Jon Paris [mailto:Jon.Paris@Partner400.com]
> Sent: Friday, February 22, 2002 8:22 AM
> To: rpg400-l@midrange.com
> Subject: What is syntax for arrays within array?
>
>
>  >> This doesn't quite work in the way I expected.
>
> Yes - you're right Joel, I didn't test it just modified the
> original until
> the Code/400 verifier liked it!  In fact when you reverse the
> sequence,
> neither the Overlay keyword or *Next is required on the 25
> element arrays.
> So the simple version is:
>
>      D Arrays          DS
>      D  QtyOHS                        5S 0  Dim(25)
>      D  QtyOHN                        5S 0  Dim(25)
>      D  QtyOHM                        5S 0  Dim(25)
>      D  QtyOHW                        5S 0  Dim(25)
>      D  QtyOHWW                     5S 0  Dim(25)
>      D QtyOH                            5S 0  Dim(125) Overlay(Arrays)
>
> Jon Paris
> Partner400
>
>
> _______________________________________________
> 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.
>