*copyc osc$base_exception

  CONST
    ioc$disk_min_ecc = osc$base_exception + 2000,
    ioc$disk_max_ecc = ioc$disk_min_ecc + 999,
    ioc$tape_min_ecc = osc$base_exception + 3000,
    ioc$tape_max_ecc = ioc$tape_min_ecc + 999;

  CONST
    ioc$io_id = 'IO';
