According to the IBM LRM, "A group item includes all group and elementary items that follow it until a level-number less than or equal to the level-number of that group is encountered."
Why you want to do that escapes me at the moment, but the LRM goes on with an example where the 05 and 04 variables are at the same level, as are the 10 and 08: "You can also define groups with subordinate items that have different level-numbers for the same level in the hierarchy. For example, 05 EMPLOYEE-NAME and 04 EMPLOYEE-ADDRESS in EMPLOYEE-RECORD below define the same level in the hierarchy. The compiler renumbers the levels in a relative fashion, as shown in the MAP output. 01 EMPLOYEE-RECORD. 05 EMPLOYEE-NAME. 10 FIRST-NAME PICTURE X(10). 10 LAST-NAME PICTURE X(10). 04 EMPLOYEE-ADDRESS. 08 STREET PICTURE X(10). 08 CITY PICTURE X(10)." ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
