
  PROCEDURE [XREF] pfp$report_invalid_free
    (    p_path: ^pft$complete_path;
         p_cycle_number: ^fst$cycle_number;
         free_object: string ( * <= osc$max_string_size);
         file_or_catalog: string ( * <= osc$max_string_size);
         prevalidate_free_result: ost$prevalidate_free_result;
         catalog_offset: ost$halfword);

?? PUSH (LISTEXT := ON) ??
*copyc fst$cycle_number
*copyc ost$halfword
*copyc ost$prevalidate_free_result
*copyc ost$string
*copyc pft$complete_path
?? POP ??
