 CONST
    ioc$max_channel_number = 31;

  TYPE
    iot$channel_interlock_table = RECORD
      channel_table: ALIGNED [0 MOD 512]  ARRAY [0 .. ioc$max_channel_number] OF
             iot$table_lock_entry,
      channel_characteristics: ARRAY [0 .. ioc$max_channel_number] OF
             iot$channel_characteristics,
    recend,

    iot$table_lock_entry = PACKED RECORD
        channel_locked : BOOLEAN,
        fill_1 : 0 .. 7fff(16),       { 15 bits }
        ve_need_channel : BOOLEAN,
        fill_2 : 0 .. 3fff(16),       { 14 bits }
        maintenance_need_channel : BOOLEAN,
        fill_3 : 0 .. 0ffff(16),      { 16 bits }
        locking_pp : 0 .. 0ffff(16),
      recend,

{ The following type could be expanded in the future to include information
{ contained in the Mainframe_Reconfiguration_Table (MRT) that a PP might
{ be interested in.

    iot$channel_characteristics = PACKED RECORD
        concurrent_channel : BOOLEAN,
        fill : 0 .. 7fffffff(16),     { 31 bits }
        fill1 : 0 .. 0ffffffff(16),   { 32 bits }
      recend;
