
  VAR
    pfv$p_locked_catalog: [XREF] ^pft$catalog_locator;

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