Host structure indicator array in COBOL applications that use SQL

The following figure shows the syntax for valid indicator array declarations.

Host structure indicator array

Read syntax diagramSkip visual syntax diagram
>>-level-1--variable-name--+-PICTURE-+-------------------------->
                           '-PIC-----'   

                                    .-IS-.     
   .-IS-.                  .-USAGE--+----+-.   
>--+----+--picture-string--+---------------+-------------------->

                                           .-TIMES-.   
>--+-BINARY----------+--OCCURS--dimension--+-------+------------>
   +-COMPUTATIONAL-4-+                                 
   '-COMP-4----------'                                 

>--+-------------------------+--.------------------------------><
   |        .-IS-.           |      
   '-VALUE--+----+--constant-'      

Notes:
  1. Dimension must be an integer between 1 and 32767.
  2. level-1 must be an integer between 2 and 48.
  3. BINARY, COMPUTATIONAL-4, and COMP-4 are equivalent. A portable application should code BINARY because COMPUTATIONAL-4 and COMP-4 are IBM® extensions that are not supported in ISO/ANSI COBOL. The picture-string associated with these types must have the form S9(i) (or S9...9, with i instances of 9). i must be less than or equal to 4.