PROC FSETABL;
  BEGIN


#
***       FSETABL - COMPILE THE *COMFTAB* COMMON BLOCK.
*
*         FSETABL IS THE ONLY COMPILATION IN SINGLE THAT USES
*         CONTROL PRESET WITH THE COMFTAB COMMON BLOCK.  IN THE MULTI-
*         USER SUBSYSTEM, THE SMFEX MONITOR WILL DO THIS JOB.
#

  DEF LISTCON #1#;

CONTROL PRESET;              # UNIVERSL DECLARES #

*IFCALL SINGLE,COMFSGL
*IFCALL ONLY,COMFONL
*IFCALL MULTI,COMFMLT
*CALL COMFFSE


*CALL COMFTAB


  END TERM