
  PROCEDURE [XREF] pfp$dm_create_file_entry
    (    path: pft$complete_path;
         cycle_number: fst$cycle_number;
         authority: pft$authority;
         usage_selections: pft$usage_selections;
         share_selections: pft$share_selections;
         p_mass_storage_request_info: {input} ^fmt$mass_storage_request_info;
     VAR system_file_id: gft$system_file_identifier;
     VAR global_file_name: ost$binary_unique_name;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc pfe$error_condition_codes
*copyc rme$request_mass_storage
*copyc fmt$mass_storage_request_info
*copyc fst$cycle_number
*copyc gft$system_file_identifier
*copyc ost$binary_unique_name
*copyc ost$status
*copyc pft$authority
*copyc pft$complete_path
*copyc pft$share_selections
*copyc pft$usage_selections
?? POP ??
