*DECK DLFPDEF 
PROC DLFPDEF; 
BEGIN 
CONTROL STEXT;
*CALL CYBERDEFS 
*CALL AWLDEFS 
#*CALL ASCIIDEF#
*CALL DIRDEFS 
*CALL NP$CODE 
*CALL MISCOM
*CALL MISDEF
*CALL MISDEFX 
END 
TERM