
  FUNCTION [INLINE] nap$system_id: nat$system_identifier;

?? PUSH (LISTEXT := ON) ??
*copy nah$system_id

    nap$system_id := nav$system_id;
  FUNCEND nap$system_id;

*copyc nav$system_id
?? POP ??

