Rational Developer for System z
Enterprise COBOL for z/OS, Version 4.1, Language Reference


Fixed-length tables

Fixed-length tables are specified using the OCCURS clause. Because seven subscripts or indexes are allowed, six nested levels and one outermost level of the format-1 OCCURS clause are allowed. The format-1 OCCURS clause can be specified as subordinate to the OCCURS DEPENDING ON clause. In this way, a table of up to seven dimensions can be specified.

Read syntax diagramSkip visual syntax diagram
Format 1: fixed-length tables

>>-OCCURS--integer-2--+-------+--------------------------------->
                      '-TIMES-'   

   .------------------------------------------------------.   
   V                                                      |   
>----+--------------------------------------------------+-+----->
     |                                  .-------------. |     
     |                                  V             | |     
     '-+-ASCENDING--+--+-----+--+----+----data-name-2-+-'     
       '-DESCENDING-'  '-KEY-'  '-IS-'                        

>--+-----------------------------------+-----------------------><
   |                  .--------------. |   
   |                  V              | |   
   '-INDEXED--+----+----index-name-1-+-'   
              '-BY-'                       

integer-2
The exact number of occurrences. integer-2 must be greater than zero.

Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)