ILE COBOL 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 may be specified as subordinate to the OCCURS DEPENDING ON clause. In this way, a table of up to seven dimensions may be specified.

OCCURS Clause - 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
Specifies the exact number of occurrences, and must be greater than zero.

In the ILE COBOL language, integer-2 must be between 1 and 16 711 568 bytes.


[ Top of Page | Previous Page | Next Page | Table of Contents | Index ]