
  PROCEDURE [XREF] clp$get_path_name ALIAS 'clpgpn'
    (    local_file_name: fst$file_reference;
         format: ost$format_message_level;
     VAR file_reference: fst$path);

?? PUSH (LISTEXT := ON) ??
*copyc fst$file_reference
*copyc fst$path
*copyc ost$format_message_level
?? POP ??
