
  PROCEDURE [XREF] pup$get_file_password ALIAS 'puxgfpw'
    (    file_path: pft$path;
     VAR password: pft$password);

?? PUSH (LISTEXT := ON) ??
*copyc pft$password
*copyc pft$path
?? POP ??
