DEB$JLOG  - Trap generated job output

To trap all output JES messages, SYSIN or SYSOUT data of a JOB.  This tool works under ESA - z/OS. It dynamically allocates each output file (JES) and writes it to a print of any other sequential file. This may be beneficial for users who have no output management system or simply wanna keep their own generated sysout files in other flat files i.e. as GDG files.
The program DEB$JLOG normally will be the last job step. Another advantage would be that you could stuff the output of DEB$JLOG into a PDF document and mail it. Such programs are freely available under More details about options(PARM=) can be found in the SAMPLIB.

The basic idea behind this program was to keep e.g. the output of the last 255 RACF batch related jobs for reference purposes. To save space a user could utilize the IBM terse program called TRSMAIN. Space savings are around >80%.

//             DISP=(,CATLG,DELETE),
//             DCB=(XRZP001.ARCHIVE.MODEL),
//             SPACE=(TRK,(1,150),RLSE)
//            DSN=XRZP001.ARCHIVE.COMPILE.TERSE(+1),
//            SPACE=(TRK,(5,150),RLSE),

Required GDG definitions and model DSCB(s):
//             DCB=(RECFM=VB,LRECL=137,DSORG=PS),
//             DSN=XRZP001.ARCHIVE.MODEL
//             DCB=(RECFM=FB,LRECL=1024,DSORG=PS),
//SYSIN    DD    *
             LIMIT(255) -
             NOEMPTY -
             LIMIT(255) -
             NOEMPTY -