*DECK NP$VALF 
*IF DEF,XFR 
USETEXT AIPDEF
 PROC NP$VALF ; 
 BEGIN
   RETURN ; 
 END
TERM
*ENDIF