A                                      UNIQUE
      A          R CTRREC                    TEXT('Country record')
      A            CTRNAM        30A         TEXT('Country name')
      A                                      COLHDG('Country name')
      A                                      CCSID(65535)
      A            CTRDAY         3S 0       TEXT('Delivery time in days')
      A                                      COLHDG('Delivery' 'days')
      A                                      DFT(10)
      A            CTREUR         5S 2       TEXT('Delivery cost in EUR')
      A                                      COLHDG('Delivery' 'cost')
      A                                      DFT(15)
      A          K CTRNAM