*DECK NIPDEF
PROC NIPDEF;
BEGIN 
CONTROL STEXT;
#CALL ASCIIDEF# 
*CALL AWLDEFS 
*CALL CYBERDEFS 
*CALL INPAR 
*CALL INPARU
*CALL MISCOM
*CALL KDEF
*CALL MISDEF
*CALL OVLNAME 
*CALL SCPDEF
*CALL STBLDEF 
*CALL SMDEF 
*CALL SMAPDEF 
*CALL SMPFC 
*CALL SMAPPFC 
END 
TERM