PHD Arrays

David Frederick (714)639-9951 x132 David_Frederick@WYCLIFFE.ORG
Wed, 20 May 1998 22:07:45 +0000 (GMT)


On 20-May-1998 owner-powerh-l@sphere.swau.edu wrote:

>
>I have Cobol program that creates the following data structure which has an
>OCCURS 12 TIMES. How would I mirror this in the PowerHouse dictionary?  I
>would to access the same datafile the the COBOL application does.  Is
>PowerHouse able to mirror arrays in the dictionary?
>
>  
>    05  WOS_TARGET                      PIC 9(4).
>    05  REQUIREMENTS                    OCCURS 12 TIMES.
>        10  MTH_OF_REQUIREMENTS         PIC 9(2).
>        10  QTY_LAST_YEAR_CURR_FLAG     PIC X.
>        10  QTY_LAST_YEAR_CURR          PIC 9(6).
>        10  QTY_PROJECTED_CURR          PIC 9(6).
>        10  QTY_LAST_YEAR_NEW_FLAG      PIC X.
>        10  QTY_LAST_YEAR_NEW           PIC 9(6).
>        10  QTY_LAST_YEAR_TOTAL         PIC 9(8).
>        10  QTY_PROJECTED_TOTAL         PIC 9(8).
>    05  MTD_USAGE_LY_CURR               PIC 9(8).
>
>Mark Stewart
>CTG Consultant
>Victoria's Secret Stores
>OpenVMS Alpha V7.1-1H1
>Oracle Rdb    V7.0-1
>PH 4GL        7.10.F4
>

The "Occ" column on the ITEM screen sets the number of occurrences for an item, 
thus creating an array (the "No. of Occurs" field on the ELEMENT screen sets the 
default for that element).  I'm not familiar with how you reference occurrences 
in the array, however.

David Frederick
Computer Systems Manager
Wycliffe Associates
Internet:  David_Frederick@wycliffe.org
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
This list is closed, thus to post to the list, you must be a subscriber.