MFmainframe-rea
WS carddemo · 26f629ef

Batch job · 4 steps · DUSRSECJ.jcl:1DUSRSECJ

REGION=8M CLASS=A MSGCLASS=H NOTIFY=&SYSUID
Steps in order

Job stream

PREDEL

runs IEFBR14 observed — no-op; used to allocate or delete datasets through DD DISPDUSRSECJ.jcl:23
DDDatasetDISPUseBasisAt
DD01AWS.M2.CARDDEMO.USRSEC.PSMOD,DELETE,DELETEappenddelete inferredDISP=(MOD,DELETE,DELETE)DUSRSECJ.jcl:25

STEP01

runs IEBGENER observed — sequential copy SYSUT1 -> SYSUT2DUSRSECJ.jcl:32
DDDatasetDISPUseBasisAt
SYSUT1in-stream (10 lines)read derivedin-stream dataDUSRSECJ.jcl:34
SYSUT2AWS.M2.CARDDEMO.USRSEC.PSNEW,CATLG,DELETEwrite derivedIEBGENER convention for DD SYSUT2DUSRSECJ.jcl:46
SYSPRINTSYSOUT=*write derivedSYSOUT=*DUSRSECJ.jcl:51
SYSINDUMMYreference unknownno DISP, program file declaration or utility conventionDUSRSECJ.jcl:52

STEP02

runs IDCAMS observed — VSAM access method services (define/delete/copy datasets)DUSRSECJ.jcl:58
DDDatasetDISPUseBasisAt
SYSPRINTSYSOUT=*write derivedSYSOUT=*DUSRSECJ.jcl:60
SYSINin-stream (12 lines)read derivedin-stream dataDUSRSECJ.jcl:61
SYSIN control cards · in-stream app/jcl/DUSRSECJ.jcl:62-73
 DELETE                  AWS.M2.CARDDEMO.USRSEC.VSAM.KSDS
 SET       MAXCC = 0
 DEFINE    CLUSTER (NAME(AWS.M2.CARDDEMO.USRSEC.VSAM.KSDS)    -
                    KEYS(8,0)                                 -
                    RECORDSIZE(80,80)                         -
                    REUSE                                     -
                    INDEXED                                   -
                    TRACKS(45,15)                             -
                    FREESPACE(10,15)                          -
                    CISZ(8192))                               -
           DATA    (NAME(AWS.M2.CARDDEMO.USRSEC.VSAM.KSDS.DAT)) -
           INDEX   (NAME(AWS.M2.CARDDEMO.USRSEC.VSAM.KSDS.IDX))

IDCAMS: DELETE deletes AWS.M2.CARDDEMO.USRSEC.VSAM.KSDSDEFINE CLUSTER defines AWS.M2.CARDDEMO.USRSEC.VSAM.KSDS, defines AWS.M2.CARDDEMO.USRSEC.VSAM.KSDS.DAT, defines AWS.M2.CARDDEMO.USRSEC.VSAM.KSDS.IDX

STEP03

runs IDCAMS observed — VSAM access method services (define/delete/copy datasets)DUSRSECJ.jcl:80
DDDatasetDISPUseBasisAt
INAWS.M2.CARDDEMO.USRSEC.PSSHRread derivedIDCAMS REPRO INPUT (in-stream app/jcl/DUSRSECJ.jcl:87)DUSRSECJ.jcl:82
OUTAWS.M2.CARDDEMO.USRSEC.VSAM.KSDSSHRwrite derivedIDCAMS REPRO OUTPUT (in-stream app/jcl/DUSRSECJ.jcl:87)DUSRSECJ.jcl:83
SYSOUTSYSOUT=*write derivedSYSOUT=*DUSRSECJ.jcl:84
SYSPRINTSYSOUT=*write derivedSYSOUT=*DUSRSECJ.jcl:85
SYSINin-stream (1 lines)read derivedin-stream dataDUSRSECJ.jcl:86
SYSIN control cards · in-stream app/jcl/DUSRSECJ.jcl:87
  REPRO INFILE(IN) OUTFILE(OUT)

IDCAMS: REPRO input DD IN, output DD OUT