//JCABJESC  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 DF24 LOAD MODULE                             
//* ********************************************************                    
//C.USERLIB DD  DSN=JCABJES.HDF3.HEADER,DISP=SHR                                
//C.SYSIN   DD  DISP=OLD,DSN=JCABJES.HDF.TO.RASTER24                            
//LKED.HDF  DD  DISP=SHR,DSN=JCABJES.HDF3.LOAD                                  
//LKED.SYSIN  DD  *                                                             
 INCLUDE  HDF(DF,DFR8,DF24)                                                     
//GO.INPUT  DD  DISP=SHR,DSN=JCABJES.TESTFILE.HEAD                              
//GO.OUTPUT DD  DISP=(NEW,CATLG),DSN=JCABJES.TESTFILE.HEAD.RLE,                 
//   UNIT=DATA,SPACE=(TRK,(5,5),RLSE),DCB=(RECFM=F,BLKSIZE=512)