//JCABJESE  JOB  TIME=(,45)                                                     
//   EXEC    FORTCLG,RG=4000K,LIBB='APP1.C370IBMN.LIBRARY'                      
//* ********************************************************                    
//* THIS IS A TEST JOB TO TEST THE DF24 LOAD MODULE FROM FORTRAN                
//* ********************************************************                    
//FORT.SYSIN   DD  DISP=OLD,DSN=JCABJES.HDF.TO.RASTER24.FORT                    
//LKED.HDF  DD  DISP=SHR,DSN=JCABJES.HDF3.LOAD                                  
//LKED.SYSIN  DD  *                                                             
 INCLUDE  HDF(DFF,DF24F,DFR8F)                                                  
//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)