
  PROCEDURE [XREF] pfp$r2_df_client_purge_catalog
    (   served_family_location: pft$served_family_locator;
        path: pft$path;
        system_privilege: boolean;
        delete_option: pft$delete_option;
    VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc ost$status
*copyc pft$delete_option
*copyc pft$path
*copyc pft$served_family_locator
?? POP ??
