  TYPE
    cmt$subsystem_equip_description = record
           pp_number: iot$pp_number,
           physical_unit: iot$physical_unit_number,
           physical_channel: iot$channel_number,
           equipment: cmt$physical_equipment_number,
           unit_type: iot$unit_type,
           controller_type: cmt$controller_type,
           logical_unit: iot$logical_unit,
    recend;

?? PUSH (LISTEXT := ON) ??
*copyc cmt$controller_type
*copyc cmt$physical_equipment_number
*copyc iot$channel_number
*copyc iot$pp_number
*copyc iot$logical_unit
*copyc iot$unit_type
?? POP ??
