1 2 /* begin include file ... cobol_OCCURS.incl.pl1 */ 3 /* Last modified on 12/28/76 by FCH */ 4 5 2 keyed fixed bin, 6 2 key_number fixed bin, 7 2 dimensions fixed bin, 8 2 level (3), 9 3 indexedno fixed bin, 10 3 min fixed bin, 11 3 max fixed bin, 12 3 struclength fixed bin, 13 3 cswdx fixed bin, 14 3 cswd fixed bin(24); 15 16 /* end include file ... cobol_OCCURS.incl.pl1 */ 17