
  PROCEDURE [XREF] cmp$return_desc_data_by_lun_lpn (
      logical_unit_number: iot$logical_unit;
      logical_pp_number: iot$pp_number;
    VAR iou_number : dst$iou_number;
    VAR descriptor_data: ost$string;
    VAR physical_pp_number: 0 .. 31);

?? PUSH (LISTEXT := ON) ??
*copyc dst$iou_number
*copyc iot$logical_unit
*copyc iot$pp_number
*copyc ost$string
?? POP ??

