Execution JCL › One-Step and Five-Step JCL › One-Step z/OS JCL— Central Version

One-Step z/OS JCL— Central Version

Here is sample one-step z/OS JCL to execute CA Culprit batch jobs, when running central version:

CA Culprit One-Step (Central Version) (z/OS)

//CULPRIT  EXEC PGM=CULPRIT,REGION=1024K
//STEPLIB  DD   DSN=idms.dba.loadlib,DISP=SHR
//         DD   DSN=idms.loadlib,DISP=SHR
//SORTLIB  DD   DSN=sys1.sortlib,DISP=SHR
//SYSOUT   DD   SYSOUT=A
//SYSPRINT DD   SYSOUT=A
//SORTPRNT DD   SYSOUT=A
//SORTMSG  DD   SYSOUT=A
//SYS004   DD   SYSOUT=A,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330)
//SYS005   DD   DSN=&&sprmwork,DISP=(NEW,DELETE),

//             UNIT=disk,SPACE=(CYL,(5,2)),
//             DCB=(RECFM=FB,LRECL=320,BLKSIZE=1600)
//SYS006   DD   DSN=&.&sextwork.,DISP=(NEW,DELETE),
//             UNIT=disk,SPACE=(CYL,(5,2)),
//             DCB=(RECFM=VB,LRECL=2044,BLKSIZE=4628)
//SYS007   DD   DSN=&&srtpwork.,DISP=(NEW,DELETE),
//             UNIT=disk,SPACE=(TRK,(1,1)),
//             DCB=(RECFM=F,LRECL=80,BLKSIZE=80)
//SYS008   DD   DSN=&&nsrtwork.,DISP=(NEW,DELETE),
//             UNIT=disk,SPACE=(CYL,(5,2)),
//             DCB=(RECFM=VB,LRECL=512,BLKSIZE=4628)
//SORTWK01 DD   UNIT=disk,SPACE=(CYL,(5,2))
//SORTWK02 DD   UNIT=disk,SPACE=(CYL,(5,2))
//SORTWK03 DD   UNIT=disk,SPACE=(CYL,(5,2))
//SORTWK04 DD   UNIT=disk,SPACE=(CYL,(5,2))
//CULSRT1I DD   DSN=yourHLQ.CAGJSRC(SORT1),DISP=SHR
//SYSIN4   DD   DUMMY,DCB=BLKSIZE=80

//VSAMCTRL DD   DUMMY
//CULLIB   DD   DSN=yourHLQ.CAGJSRC,DISP=SHR
//SYSPCH   DD   SYSOUT=B,DCB=BLKSIZE=80
//SYS002   DD   DSN=user.keyfile,DISP=SHR
//SYS010   DD   DSN=user.inputfil,DISP=OLD,
//             UNIT=tape,VOL=SER=vvvvvv
//SYS011   DD   DSN=user.matchfil,DISP=OLD,
//             UNIT=tape,VOL=SER=vvvvvv
//SYS020   DD   DSN=user.nonprint,DISP=(NEW,CATLG),
//             UNIT=tape,VOL=SER=vvvvvv,
//             DCB=(DSORG=PS,LRECL=llll,BLKSIZE=bbbb)

//SYS030   DD   SYSOUT=(s,,form),DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330)
//sysctl   DD   DSN=idms.sysctl,DISP=SHR
//dcmsg    DD   DSN=idms.sysmsg.ddldcmsg,DISP=SHR
//SYSIDMS  DD   *
DMCL=dmcl-name
Put other SYSIDMS parameters, as appropriate, here
/*
//SYSIN    DD   *
Put CA Culprit parameter statements here
/*
//*

For the description of the previous variables see the following table in One-Step z/OS JCL - Local Mode.