MFmainframe-rea
WS carddemo · 26f629ef

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

CLASS=A MSGCLASS=0 NOTIFY=&SYSUID
Steps in order

Job stream

STEP05

runs IDCAMS observed — VSAM access method services (define/delete/copy datasets)DISCGRP.jcl:22
DDDatasetDISPUseBasisAt
SYSPRINTSYSOUT=*write derivedSYSOUT=*DISCGRP.jcl:23
SYSINin-stream (3 lines)read derivedin-stream dataDISCGRP.jcl:24
SYSIN control cards · in-stream app/jcl/DISCGRP.jcl:25-27
   DELETE AWS.M2.CARDDEMO.DISCGRP.VSAM.KSDS -
          CLUSTER
   SET    MAXCC = 0

IDCAMS: DELETE deletes AWS.M2.CARDDEMO.DISCGRP.VSAM.KSDS

STEP10

runs IDCAMS observed — VSAM access method services (define/delete/copy datasets)DISCGRP.jcl:33
DDDatasetDISPUseBasisAt
SYSPRINTSYSOUT=*write derivedSYSOUT=*DISCGRP.jcl:34
SYSINin-stream (14 lines)read derivedin-stream dataDISCGRP.jcl:35
SYSIN control cards · in-stream app/jcl/DISCGRP.jcl:36-49
   DEFINE CLUSTER (NAME(AWS.M2.CARDDEMO.DISCGRP.VSAM.KSDS) -
          CYLINDERS(1 5) -
          VOLUMES(AWSHJ1 -
          ) -
          KEYS(16 0) -
          RECORDSIZE(50 50) -
          SHAREOPTIONS(2 3) -
          ERASE -
          INDEXED -
          ) -
          DATA (NAME(AWS.M2.CARDDEMO.DISCGRP.VSAM.KSDS.DATA) -
          ) -
          INDEX (NAME(AWS.M2.CARDDEMO.DISCGRP.VSAM.KSDS.INDEX) -
          )

IDCAMS: DEFINE CLUSTER defines AWS.M2.CARDDEMO.DISCGRP.VSAM.KSDS, defines AWS.M2.CARDDEMO.DISCGRP.VSAM.KSDS.DATA, defines AWS.M2.CARDDEMO.DISCGRP.VSAM.KSDS.INDEX

STEP15

runs IDCAMS observed — VSAM access method services (define/delete/copy datasets)DISCGRP.jcl:54
DDDatasetDISPUseBasisAt
SYSPRINTSYSOUT=*write derivedSYSOUT=*DISCGRP.jcl:55
DISCGRPAWS.M2.CARDDEMO.DISCGRP.PSSHRread derivedIDCAMS REPRO INPUT (in-stream app/jcl/DISCGRP.jcl:61)DISCGRP.jcl:56
DISCVSAMAWS.M2.CARDDEMO.DISCGRP.VSAM.KSDSOLDwrite derivedIDCAMS REPRO OUTPUT (in-stream app/jcl/DISCGRP.jcl:61)DISCGRP.jcl:58
SYSINin-stream (1 lines)read derivedin-stream dataDISCGRP.jcl:60
SYSIN control cards · in-stream app/jcl/DISCGRP.jcl:61
   REPRO INFILE(DISCGRP) OUTFILE(DISCVSAM)

IDCAMS: REPRO input DD DISCGRP, output DD DISCVSAM