The DIMENSION statement creates and names a static,  dynamic,  or  virtual
  array,  or redimensions an existing array.  The array subscripts determine
  the dimensions and size of the array.  You can specify the  data  type  of
  the array and associate the array with an I/O channel.

  Examples

  DIM STRING Name_list(100,100), BYTE Age(100)
  DIM #1%, STRING Emp_name_list(500), REAL Amount(500)
  DIM DOUBLE Inventory(Base, Markup)

1  –  Syntax

  Nonvirtual, Nonexecutable:

    {DIM      }
    {DIMENSION} {[data-type] array-name ([int-const1 TO]
    int-const2,...)},...

  Virtual:

      {DIM      }
      {DIMENSION} chnl-exp,{[data-type] array-name
           (int-const,...)[=int-const]},...

  Executable:

      {DIM      }
      {DIMENSION} {[data-type] array-name
           ([int-var1 TO] int-var2,...)},...