Batch job · 3 steps · PRTCATBL.jcl:1PRTCATBL

CLASS=A MSGCLASS=0 NOTIFY=&SYSUID

EXEC

PROCs expanded

REPROC

REPROC.prc:1

PRTCATBL.jcl:29

Steps in order

Job stream

DELDEF

runs IEFBR14 observed — no-op; used to allocate or delete datasets through DD DISPPRTCATBL.jcl:21

DD	Dataset	DISP	Use	Basis	At
THEFILE	AWS.M2.CARDDEMO.TCATBALF.REPT	MOD,DELETE	appenddelete inferred	DISP=(MOD,DELETE)	PRTCATBL.jcl:22

STEP05R.PRC001

runs IDCAMS observed — VSAM access method services (define/delete/copy datasets)from PROC REPROCREPROC.prc:21

DD	Dataset	DISP	Use	Basis	At
SYSPRINT	SYSOUT=*		write derived	SYSOUT=*	REPROC.prc:22
FILEIN	AWS.M2.CARDDEMO.TCATBALF.VSAM.KSDSoverride	SHR	read derived	IDCAMS REPRO INPUT (app/app-transaction-type-db2/ctl/REPROCT.ctl)	REPROC.prc:23
FILEOUT	AWS.M2.CARDDEMO.TCATBALF.BKUPGDG +1override	NEW,CATLG,DELETE	write derived	IDCAMS REPRO OUTPUT (app/app-transaction-type-db2/ctl/REPROCT.ctl)	REPROC.prc:25
SYSIN	AWS.M2.CARDDEMO.CNTL(REPROCT)	SHR	read inferred	DISP=(SHR)	REPROC.prc:27

SYSIN control cards · app/app-transaction-type-db2/ctl/REPROCT.ctl

  … 14 comment lines
    REPRO INFILE(FILEIN) OUTFILE(FILEOUT)

IDCAMS: REPRO input DD FILEIN, output DD FILEOUT

STEP10R

runs SORT observed — DFSORT sort/merge/copy SORTIN -> SORTOUTPRTCATBL.jcl:43

DD	Dataset	DISP	Use	Basis	At
SORTIN	AWS.M2.CARDDEMO.TCATBALF.BKUPGDG +1	SHR	read derived	SORT convention for DD SORTIN	PRTCATBL.jcl:44
SYMNAMES	in-stream (4 lines)		read derived	in-stream data	PRTCATBL.jcl:46
SYSIN	in-stream (5 lines)		read derived	in-stream data	PRTCATBL.jcl:51
SYSOUT	SYSOUT=*		write derived	SYSOUT=*	PRTCATBL.jcl:58
SORTOUT	AWS.M2.CARDDEMO.TCATBALF.REPT	NEW,CATLG,DELETE	write derived	SORT convention for DD SORTOUT	PRTCATBL.jcl:59

SYSIN control cards · in-stream app/jcl/PRTCATBL.jcl:52-56

 SORT FIELDS=(TRANCAT-ACCT-ID,A,TRANCAT-TYPE-CD,A,TRANCAT-CD,A)
 OUTREC FIELDS=(TRANCAT-ACCT-ID,X,
     TRANCAT-TYPE-CD,X,
     TRANCAT-CD,X,
     TRAN-CAT-BAL,EDIT=(TTTTTTTTT.TT),9X)