
{ DECK: IOT$TAPE_JOB_STATISTIC_DATA

  TYPE
    iot$statistic_data_p_array = array [ * ] of iot$statistic_data_pointers;

  TYPE
    iot$unit_type_case_selector = (ioc$non_ipi_reel, ioc$ipi_reel, ioc$ccc_cart);

  TYPE
    iot$statistic_data_pointers = record
      slot_in_use: boolean,
      logical_unit: iot$logical_unit,
      p_tape_job_unit_descriptor: ^iot$tape_job_unit_descriptor,
      case unit_type: iot$unit_type_case_selector of
      = ioc$non_ipi_reel =
        p_failure_data: ^iot$tape_failure_data,
      = ioc$ipi_reel =
        p_ipi_failure_data: ^iot$ipi_tape_failure_data,
      = ioc$ccc_cart =
        p_ccc_cart_failure_data: ^iot$ccc_cart_tape_failure_data,
      casend
    recend;

?? PUSH (LISTEXT := ON) ??
*copyc iot$logical_unit
*copyc iot$pp_interface_table
*copyc iot$tape_failure_statistic_data
*copyc iot$tape_job_unit_descriptor
?? POP ??
