  PROCEDURE [XREF] rmp$format_vol_classification
    (    max_message_line: ost$max_status_message_line;
         volume_classification: rmt$tape_volume_classification;
     VAR formatted_classification: ost$status_message;
     VAR status: ost$status);

*copyc ost$max_status_message_line
*copyc ost$status
*copyc ost$status_message
*copyc rmt$tape_volume_classification
