Batch job · 3 steps · TRANTYPE.jcl:1TRANTYPE
CLASS=A MSGCLASS=0 NOTIFY=&SYSUID
Job stream
STEP05
runs IDCAMS observed — VSAM access method services (define/delete/copy datasets)TRANTYPE.jcl:22| DD | Dataset | DISP | Use | Basis | At |
|---|---|---|---|---|---|
| SYSPRINT | SYSOUT=* | write derived | SYSOUT=* | TRANTYPE.jcl:23 | |
| SYSIN | in-stream (3 lines) | read derived | in-stream data | TRANTYPE.jcl:24 |
SYSIN control cards · in-stream app/jcl/TRANTYPE.jcl:25-27
DELETE AWS.M2.CARDDEMO.TRANTYPE.VSAM.KSDS -
CLUSTER
SET MAXCC = 0IDCAMS: DELETE deletes AWS.M2.CARDDEMO.TRANTYPE.VSAM.KSDS
STEP10
runs IDCAMS observed — VSAM access method services (define/delete/copy datasets)TRANTYPE.jcl:33| DD | Dataset | DISP | Use | Basis | At |
|---|---|---|---|---|---|
| SYSPRINT | SYSOUT=* | write derived | SYSOUT=* | TRANTYPE.jcl:34 | |
| SYSIN | in-stream (14 lines) | read derived | in-stream data | TRANTYPE.jcl:35 |
SYSIN control cards · in-stream app/jcl/TRANTYPE.jcl:36-49
DEFINE CLUSTER (NAME(AWS.M2.CARDDEMO.TRANTYPE.VSAM.KSDS) -
CYLINDERS(1 5) -
VOLUMES(AWSHJ1 -
) -
KEYS(2 0) -
RECORDSIZE(60 60) -
SHAREOPTIONS(1 4) -
ERASE -
INDEXED -
) -
DATA (NAME(AWS.M2.CARDDEMO.TRANTYPE.VSAM.KSDS.DATA) -
) -
INDEX (NAME(AWS.M2.CARDDEMO.TRANTYPE.VSAM.KSDS.INDEX) -
)IDCAMS: DEFINE CLUSTER defines AWS.M2.CARDDEMO.TRANTYPE.VSAM.KSDS, defines AWS.M2.CARDDEMO.TRANTYPE.VSAM.KSDS.DATA, defines AWS.M2.CARDDEMO.TRANTYPE.VSAM.KSDS.INDEX
STEP15
runs IDCAMS observed — VSAM access method services (define/delete/copy datasets)TRANTYPE.jcl:54| DD | Dataset | DISP | Use | Basis | At |
|---|---|---|---|---|---|
| SYSPRINT | SYSOUT=* | write derived | SYSOUT=* | TRANTYPE.jcl:55 | |
| TRANTYPE | AWS.M2.CARDDEMO.TRANTYPE.PS | SHR | read derived | IDCAMS REPRO INPUT (in-stream app/jcl/TRANTYPE.jcl:61) | TRANTYPE.jcl:56 |
| TTYPVSAM | AWS.M2.CARDDEMO.TRANTYPE.VSAM.KSDS | OLD | write derived | IDCAMS REPRO OUTPUT (in-stream app/jcl/TRANTYPE.jcl:61) | TRANTYPE.jcl:58 |
| SYSIN | in-stream (1 lines) | read derived | in-stream data | TRANTYPE.jcl:60 |
SYSIN control cards · in-stream app/jcl/TRANTYPE.jcl:61
REPRO INFILE(TRANTYPE) OUTFILE(TTYPVSAM)
IDCAMS: REPRO input DD TRANTYPE, output DD TTYPVSAM