Batch job · 5 steps · TRANEXTR.jcl:1TRANEXTR

CLASS=A MSGCLASS=0 NOTIFY=&SYSUID

SET / PROC

Symbols

&HLQ

AWS.M2.CARDDEMO

TRANEXTR.jcl:25

Steps in order

Job stream

STEP10

runs IEBGENER observed — sequential copy SYSUT1 -> SYSUT2TRANEXTR.jcl:31

DD	Dataset	DISP	Use	Basis	At
SYSPRINT	SYSOUT=*		write derived	SYSOUT=*	TRANEXTR.jcl:32
SYSIN	DUMMY		reference unknown	no DISP, program file declaration or utility convention	TRANEXTR.jcl:33
SYSUT1	AWS.M2.CARDDEMO.TRANTYPE.PS	SHR	read derived	IEBGENER convention for DD SYSUT1	TRANEXTR.jcl:34
SYSUT2	AWS.M2.CARDDEMO.TRANTYPE.BKUPGDG +1	NEW,CATLG	write derived	IEBGENER convention for DD SYSUT2	TRANEXTR.jcl:35

STEP20

runs IEBGENER observed — sequential copy SYSUT1 -> SYSUT2COND=(0,NE)TRANEXTR.jcl:42

DD	Dataset	DISP	Use	Basis	At
SYSPRINT	SYSOUT=*		write derived	SYSOUT=*	TRANEXTR.jcl:43
SYSIN	DUMMY		reference unknown	no DISP, program file declaration or utility convention	TRANEXTR.jcl:44
SYSUT1	AWS.M2.CARDDEMO.TRANCATG.PS	SHR	read derived	IEBGENER convention for DD SYSUT1	TRANEXTR.jcl:45
SYSUT2	AWS.M2.CARDDEMO.TRANCATG.PS.BKUPGDG +1	NEW,CATLG	write derived	IEBGENER convention for DD SYSUT2	TRANEXTR.jcl:46

STEP30

runs IEFBR14 observed — no-op; used to allocate or delete datasets through DD DISPCOND=(0,NE)TRANEXTR.jcl:53

DD	Dataset	DISP	Use	Basis	At
DD01	AWS.M2.CARDDEMO.TRANTYPE.PS	MOD,DELETE,DELETE	appenddelete inferred	DISP=(MOD,DELETE,DELETE)	TRANEXTR.jcl:54
DD02	AWS.M2.CARDDEMO.TRANCATG.PS	MOD,DELETE,DELETE	appenddelete inferred	DISP=(MOD,DELETE,DELETE)	TRANEXTR.jcl:58

STEP40

runs DSNTIAUL derived SYSTSIN RUN PROGRAM in in-stream app/app-transaction-type-db2/jcl/TRANEXTR.jcl:87-90 — DB2 unload programCOND=(0,NE)TRANEXTR.jcl:65

DD	Dataset	DISP	Use	Basis	At
STEPLIB	OEM.DB2.DAZ1.RUNLIB.LOAD	SHR	read inferred	DISP=(SHR)	TRANEXTR.jcl:66
+1	OEMA.DB2.VERSIONA.SDSNLOAD	SHR	read inferred	DISP=(SHR)	TRANEXTR.jcl:67
SYSTSPRT	SYSOUT=*		write derived	SYSOUT=*	TRANEXTR.jcl:68
SYSPRINT	SYSOUT=*		write derived	SYSOUT=*	TRANEXTR.jcl:69
SYSUDUMP	SYSOUT=*		write derived	SYSOUT=*	TRANEXTR.jcl:70
SYSPUNCH	DUMMY		reference unknown	no DISP, program file declaration or utility convention	TRANEXTR.jcl:71
SYSREC00	AWS.M2.CARDDEMO.TRANTYPE.PS	NEW,CATLG,DELETE	createwrite inferred	DISP=(NEW,CATLG,DELETE)	TRANEXTR.jcl:72
SYSIN	in-stream (9 lines)		read derived	in-stream data	TRANEXTR.jcl:75
SYSTSIN	in-stream (4 lines)		read derived	in-stream data	TRANEXTR.jcl:86

SYSIN control cards · in-stream app/app-transaction-type-db2/jcl/TRANEXTR.jcl:76-84

 SELECT CAST(CONCAT(CONCAT(
   TR_TYPE
  ,CAST(TR_DESCRIPTION AS CHAR(50))
   )
  ,REPEAT('0',8)
 ) AS CHAR(60))
  FROM
  CARDDEMO.TRANSACTION_TYPE
  ORDER BY TR_TYPE;

SYSTSIN control cards · in-stream app/app-transaction-type-db2/jcl/TRANEXTR.jcl:87-90

  DSN SYSTEM(DAZ1)
  RUN PROGRAM(DSNTIAUL) -
  PLAN(DSNTIAUL) -
  PARMS('SQL')

STEP50

runs DSNTIAUL derived SYSTSIN RUN PROGRAM in in-stream app/app-transaction-type-db2/jcl/TRANEXTR.jcl:118-121 — DB2 unload programCOND=(4,LT)TRANEXTR.jcl:95

DD	Dataset	DISP	Use	Basis	At
STEPLIB	OEM.DB2.DAZ1.RUNLIB.LOAD	SHR	read inferred	DISP=(SHR)	TRANEXTR.jcl:96
+1	OEMA.DB2.VERSIONA.SDSNLOAD	SHR	read inferred	DISP=(SHR)	TRANEXTR.jcl:97
SYSTSPRT	SYSOUT=*		write derived	SYSOUT=*	TRANEXTR.jcl:98
SYSPRINT	SYSOUT=*		write derived	SYSOUT=*	TRANEXTR.jcl:99
SYSUDUMP	SYSOUT=*		write derived	SYSOUT=*	TRANEXTR.jcl:100
SYSPUNCH	DUMMY		reference unknown	no DISP, program file declaration or utility convention	TRANEXTR.jcl:101
SYSREC00	AWS.M2.CARDDEMO.TRANCATG.PS	NEW,CATLG,DELETE	createwrite inferred	DISP=(NEW,CATLG,DELETE)	TRANEXTR.jcl:102
SYSIN	in-stream (10 lines)		read derived	in-stream data	TRANEXTR.jcl:105
SYSTSIN	in-stream (4 lines)		read derived	in-stream data	TRANEXTR.jcl:117

SYSIN control cards · in-stream app/app-transaction-type-db2/jcl/TRANEXTR.jcl:106-115

  SELECT CAST(
        TRC_TYPE_CODE
     || TRC_TYPE_CATEGORY
     || CAST(TRC_CAT_DATA AS CHAR(50))
     || REPEAT('0',4)
                      AS CHAR(60))
  FROM  CARDDEMO.TRANSACTION_TYPE_CATEGORY
  ORDER BY
        TRC_TYPE_CODE
      , TRC_TYPE_CATEGORY;

SYSTSIN control cards · in-stream app/app-transaction-type-db2/jcl/TRANEXTR.jcl:118-121

  DSN SYSTEM(DAZ1)
  RUN PROGRAM(DSNTIAUL) -
  PLAN(DSNTIAUL) -
  PARMS('SQL')