Execution JCL › One-Step and Five-Step JCL › One-Step z/VSE JCL—Local Mode

One-Step z/VSE JCL—Local Mode

Here is sample one-step z/VSE JCL to execute CA Culprit batch jobs in local mode:

CA Culprit one-step (local mode) (z/VSE)

// JOB    CULP1STP
// DLBL   idmslib,'idms.library'
// EXTENT sysxxx,vvvvvv,,,ssss,tttt
// ASSGN  sysxxx,DISK,VOL=vvvvvv,SHR
// LIBDEF *,SEARCH=CA-IDMS libraries
// EXEC PROC=idmslbls
// ASSGN  SYS004,SYSLST
// DLBL   SYS005,'sprmwork',0
// EXTENT SYS005,vvvvvv,,,ssss,tttt
// ASSGN  SYS005,DISK,VOL=vvvvvv,SHR
// DLBL   SYS006,'sextwork',0
// EXTENT SYS006,vvvvvv,,,ssss,tttt

// ASSGN  SYS006,DISK,VOL=vvvvvv,SHR
// DLBL   SYS007,'srtpwork',0
// EXTENT SYS007,vvvvvv,,,ssss,tttt
// ASSGN  SYS007,DISK,VOL=vvvvvv,SHR
// DLBL   SYS008,'nsrtwork',0
// EXTENT SYS008,vvvvvv,,,ssss,tttt
// ASSGN  SYS008,DISK,VOL=vvvvvv,SHR
// DLBL   SORTWK1,'sortwk1.fileid',0
// EXTENT sysxxx,vvvvvv,,,ssss,tttt
// ASSGN  sysxxx,DISK,VOL=vvvvvv,SHR
// DLBL   SORTWK2,'sortwk2.fileid',0
// EXTENT sysxxx,vvvvvv,,,ssss,tttt
// ASSGN  sysxxx,DISK,VOL=vvvvvv,SHR
// DLBL   SORTWK3,'sortwk3.fileid',0
// EXTENT sysxxx,vvvvvv,,,ssss,tttt
// ASSGN  sysxxx,DISK,VOL=vvvvvv,SHR
// DLBL   IJSYSPH,'syspch.dsn'

// EXTENT SYSPCH,vvvvvv,,,ssss,tttt
// ASSGN  SYSPCH,DISK,VOL=vvvvvv,SHR
// DLBL   SYS002,'user.keyfile'
// EXTENT SYS002,vvvvvv,,,ssss,tttt
// ASSGN  SYS002,DISK,VOL=vvvvvv,SHR
// ASSGN  sysxxx,IGN                        *This is for SYSJRNLS*
// TLBL   SYS010,'user.inputfil'
// ASSGN  SYS010,cuu
// TLBL   SYS011,'user.matchfil'
// ASSGN  SYS011,cuu
// TLBL   SYS020,'user.nonprint'
// ASSGN  SYS020,cuu
// DLBL   SYSIDMS,'sysidms.parms'
// EXTENT sysxxx,vvvvvv,,,ssss,tttt
// ASSGN  sysxxx,DISK,VOL=vvvvvv,SHR
// EXEC   Culprit,SIZE=1024K
  Put CA Culprit commands here
/*
  Put user input here if on cards
/*
  Restart parameter
/*
/&