
  PROCEDURE [XREF] pfp$convert_string_to_fs_path
    (    str: string ( * );
     VAR fs_path_string: string (fsc$max_path_size);
     VAR number_of_path_elements: fst$number_of_path_elements;
     VAR cycle_reference: fst$cycle_reference;
     VAR open_position: fst$open_position;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc cle$ecc_file_reference
*copyc cle$ecc_lexical
*copyc fsc$max_path_size
*copyc fst$cycle_reference
*copyc fst$number_of_path_elements
*copyc fst$open_position
*copyc ost$status
?? POP ??
