//JCABJESF 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.RASTER24.TO.HDF.FORT //LKED.HDF DD DISP=SHR,DSN=APP1.HDF3.LOAD //LKED.HDF2 DD DISP=SHR,DSN=JCABJES.HDF3.LOAD //LKED.SYSIN DD * INCLUDE HDF(DFR8F) INCLUDE HDF2(DFF,DF24F) //GO.RLE24 DD DISP=SHR,DSN=JCABJES.TESTFILE.HEAD.RLE //GO.OUTPUT DD DISP=(NEW,CATLG),DSN=JCABJES.TESTFILE.HEAD.HDF3, // UNIT=DATA,SPACE=(TRK,(10,5)),DCB=(RECFM=F,BLKSIZE=512)