Example 1
Some of the DD statements use CDAM; others simply write to the spool.
// EXEC PGM=XXXX
//PRINT DD SUBSYS=(CDAM,'SYSOUT=A,PREFIX=J01','OUTLIM=100000')
//OUT DD SUBSYS=(CDAM,'SYSOUT=X')
//SYSPRINT DD SYSOUT=X
Example 2
Keep CICS dumps on compressed datasets.
// EXEC CICS
//SYSUDUMP DD SUBSYS=(CDAM,'SYSOUT=X,PREFIX=CICSDMP,BLOCKS=1000')
Example 3
The following example shows how to use CMPEXT=YES in a SUBSYS parameter to store parameters that are defined in a JCL OUTPUT card.
//S1OUT OUTPUT ADDRESS=(‘ADR1,ADR2’,ADR),BUILDING=BLD,
// FORMS=ABCDEFGH,PAGEDEF=PGDEF,FORMDEF=FRMDEF
//SYSUT2 DD SUBSYS=CDAM,’CMPEXT=YES’),OUTPUT=(*.S1OUT)
Parent Topic |