FSEDATA 
PROC FSEDATA; 
BEGIN 
  
  
# 
***       FSEDATA -- COMPILE COMMON BLOCK *COMFDAT*.
* 
*         FSEDATA IS THE ONLY COMPILATION IN SINGLE THAT USES 
*         CONTROL PRESET WITH THE COMFDAT COMMON BLOCK.  IN MULTI-USER
*         VERSION, THE SMFEX MONITOR WILL INITIALIZE COMFDAT. 
# 
  
  DEF LISTCON #1#;
  
CONTROL PRESET;              # UNIVERSAL DECLARES          #
  
*IFCALL SINGLE,COMFSGL
*IFCALL ONLY,COMFONL
*IFCALL MULTI,COMFMLT 
  
*CALL COMFFSE 
  
*CALL COMFVDT 
  
*CALL COMFDS1 
*CALL COMFVD2 
*CALL COMFDS2 
  
END TERM
