
  PROCEDURE [XREF] cmp$acquire_deadstart_resources
    (    channel: cmt$physical_channel;
         iou_number: dst$iou_number;
         equipment_number: 0 .. cmc$null_equipment_number;
         unit_number: 0 .. cmc$null_unit_number;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc cmd$null_equipment_number
*copyc cmt$channel_type
*copyc cmt$element_name
*copyc cmt$logical_pp_table
*copyc cmt$physical_channel
*copyc cmt$physical_equipment_number
*copyc cmt$physical_unit_number
*copyc dst$iou_number
*copyc ost$hardware_subranges
*copyc ost$status
?? POP ??
