
 TYPE
    rmt$mass_storage_class = char;

*copyc rmc$mass_storage_class
*copyc rmc$unspecified_file_class
