
  PROCEDURE [INLINE] pfp$begin_system_authority;

?? PUSH (LISTEXT := ON) ??

    pfv$system_authority := pfv$system_authority + 1;
  PROCEND pfp$begin_system_authority;

*copyc pfv$system_authority
?? POP ??
