//JCABJESA  JOB                                                                 
//  EXEC CCLG,OPTIONS='SHOW,NOSEQ,MAR(1,80),SOURCE,EXP',LEVEL=N,                
//     PARM.LKED='LIST,MAP',RG=8000K                                            
//* ********************************************************                    
//* THIS IS A TEST JOB TO TEST THE DFAN LOAD MODULE                             
//* ********************************************************                    
//C.USERLIB DD  DSN=JCABJES.HDF3.HEADER,DISP=SHR                                
//C.SYSIN   DD  DISP=OLD,DSN=JCABJES.ANN.TO.HDF                                 
//LKED.HDF  DD  DISP=SHR,DSN=JCABJES.HDF3.LOAD                                  
//LKED.SYSIN  DD  *                                                             
 INCLUDE  HDF(DF,DFR8,DFAN)                                                     
//GO.OUTPUT  DD  DISP=(NEW,CATLG),DSN=JCABJES.TESTFILE.JES1,                    
//   UNIT=DATA,DCB=(RECFM=F,BLKSIZE=512),SPACE=(TRK,(1,1),RLSE)