
      PROCEDURE [XREF] cmp$get_subsys_equipment_desc (
                      pp_number: iot$pp_number;
                      logical_unit: iot$logical_unit;
                  VAR equipment_description: cmt$subsystem_equip_description;
                  VAR status: ost$status);
?? PUSH (LISTEXT := ON) ??
*copyc iot$pp_number
*copyc iot$logical_unit
*copyc cmt$subsystem_equip_description
*copyc ost$status
?? POP ??
