
  PROCEDURE [XREF] iop$get_position_of_tape_file (
        lun: iot$logical_unit;
        VAR position: iot$tape_position;
        VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc iot$logical_unit
*copyc iot$tape_position
*copyc ost$status
?? POP ??
