//JCABJESR  JOB                                                                 
//   EXEC    FORTCLG,RG=4000K,LIBB='APP1.C370IBMN.LIBRARY'                      
//* ********************************************************                    
//* THIS IS A TEST JOB TO TEST THE DFP  LOAD MODULE FROM FORTRAN                
//* ********************************************************                    
//FORT.SYSIN   DD  DISP=OLD,DSN=JCABJES.HDF.TO.PALETTE.FORT                     
//LKED.HDF DD  DISP=SHR,DSN=JCABJES.HDF3.LOAD                                   
//LKED.SYSIN  DD  *                                                             
 INCLUDE  HDF(DFF,DFPF)                                                         
//GO.HDF DD  DISP=SHR,DSN=JCABJES.TESTFILE.PAL