
  PROCEDURE [XREF] iop$job_tape_mounts_active
    (    job_name: jmt$system_supplied_name;
     VAR job_tape_mounts_active: boolean;
     VAR status: ost$status);

*copyc jmt$system_supplied_name
*copyc ost$status
