Re: Redefining Arrays

>I have an array of months in a records to store amounts.  To
>process the array, I have defined in DS as follows:
>
>D DS
>D month01
>D month02
>D month03
>...
>D month12
>D mthary 1     120   2     DIM(12)
>
>Assuming 10.2 definition for the month fields.
>Is there a better way (perhaps dynamically) to define this?
>
>I have tried the overlay keyword: 
>D mthary        10   2     DIM(12)  OVERLAY(month01)
>
>but will not compile because the array is larger than month01.
>
>Any suggestions would be appreciated.

I am assuming that the fields month01, month02, etc are
fields that are in a file. If so, I would define your table using
a D-spec and then rename the fields as array elements.

D mthary        10   2     DIM(12)

IRCDFMT
I               MONTH01                  mthary(1)
                .
                .
I               MONTH12                  mthary(12)

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---