To create reports directly to CDAM datasets the following JCL is required:
Direct Write to CDAM Method Sample JCL
//M90CDAM JOB ,CARD
//*
//STEP1 EXEC PGM=IEBGENER
//SYSUT1 DD DISP=SHR,DSN=IOAP.PROD.SAMPREPS(REPORT1)
//SYSUT2 DD SUBSYS=(CDAM,'SYSOUT=P')
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//*
//STEP2 EXEC PGM=IEBGENER
//SYSUT1 DD DISP=SHR,DSN=IOAP.PROD.SAMPREPS(REPORT2)
//SYSUT2 DD SUBSYS=(CDAM,'SYSOUT=D')
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
The allocation messages issued show the name of the CDAM file created and the volume on which it was created.
Direct Write to CDAM Allocation Messages
IEF236I ALLOC. FOR M90CDAM STEP1
IEF237I 192 ALLOCATED TO SYSUT1
IEF237I CDAM ALLOCATED TO SYSUT2
IEF237I DMY ALLOCATED TO SYSIN
IEF237I JES2 ALLOCATED TO SYSPRINT
IEF237I 254 ALLOCATED TO SYS00002
IEF237I 246 ALLOCATED TO SYS00001
IEF142I M90CDAM STEP1 - STEP WAS EXECUTED - COND CODE 0000
IEF285I IOAP.PROD.SAMPREPS KEPT
IEF285I VOL SER NOS= MVS002.
IEF285I SYS00125.T112043.RA000.M90CDAM.R0000001 SUBSYSTEM
IEF285I JES2.JOB04216.SO000101 SYSOUT
IEF285I CTDPDBV.PROD.UCAT KEPT
IEF285I VOL SER NOS= INST01.
IEF285I CTDP.U3.M90CDAM.J04216.D1251120.S01.N000100 CATALOGED
IEF285I VOL SER NOS= WORK02.
IEF373I STEP /STEP1 / START 00125.1120
IEF374I STEP /STEP1 / STOP 00125.1120 CPU 0MIN 00.44SEC SRB
Parent Topic |