//JCABJESR JOB // EXEC CCLG,OPTIONS='SHOW,NOSEQ,MAR(1,80),SOURCE,EXP',LEVEL=N, // PARM.LKED='LIST,MAP',RG=2000K //* ******************************************************** //* THIS IS A TEST JOB TO TEST THE DFP LOAD MODULE //* ******************************************************** //C.USERLIB DD DSN=JCABJES.HDF3.HEADER,DISP=SHR //C.SYSIN DD DISP=OLD,DSN=JCABJES.HDF.TO.PALETTE //LKED.HDF DD DISP=SHR,DSN=JCABJES.HDF3.LOAD //LKED.SYSIN DD * INCLUDE HDF(DF,DFP) //GO.HDF DD DISP=SHR,DSN=JCABJES.TESTFILE.PAL