Re: Is this the simplest way to define corresponding arrays in D-specs

[Rory Hewitt <rory.hewitt@xxxxxxxxx>]

As a slight alternative, how about this:

      D               ds
      D ARRAYS                  28    inz('hheaderHHEADERffooterFFOOTER')
      D ARRAY                         dim(4) Overlay(ARRAYS)
      D   ARRAYA                 1    overlay(ARRAY)
      D   ARRAYB                 6    overlay(ARRAY:*next)

Basically the same thing, but it intersperses the 1-char lookup values with
the 6-char return values.

This also allows slightly easier-to-view formatting of the ARRAYS string,
to show each ARRAY element on its own line:

      D ARRAYS                  28    inz('hheader+
      D                                    HHEADER+
      D                                    ffooter
      D                                    FFOOTER')

Rory


On Wed, Aug 7, 2013 at 1:14 PM, Booth Martin <booth@xxxxxxxxxxxx> wrote:

> Is this responsive to your request?
>
>       D               ds
>       D ARRAYS                  28 inz('hHfFheaderHEADERfooterFOOTER')
>       D ARRAYA                    1    dim(4) overlay(ARRAYS)
>       D ARRAYB                    6    dim(4) overlay(ARRAYS: *next)
>
> The simplest way seemed to me to be using an ALT array, but that can not
> be done entirely inside the D-specs; leastways, I couldn't do it.
>
>
> --
> This is the RPG programming on the IBM i (AS/400 and iSeries) (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.