Batch job · 1 steps · CBADMCDJ.jcl:1CBADMCDJ

CLASS=A MSGCLASS=H MSGLEVEL=(1,1) NOTIFY=&SYSUID TIME=1440

SET / PROC

Symbols

&HLQ

AWS.M2.CARDDEMO

CBADMCDJ.jcl:25

Steps in order

Job stream

STEP1

runs DFHCSDUP observed — CICS CSD batch update utilityPARM=CSD(READWRITE),PAGESIZE(60),NOCOMPATCBADMCDJ.jcl:27

DD	Dataset	DISP	Use	Basis	At
STEPLIB	OEM.CICSTS.V05R06M0.CICS.SDFHLOAD	SHR	read inferred	DISP=(SHR)	CBADMCDJ.jcl:29
DFHCSD	OEM.CICSTS.DFHCSD	SHR	read inferred	DISP=(SHR)	CBADMCDJ.jcl:30
OUTDD	SYSOUT=*		write derived	SYSOUT=*	CBADMCDJ.jcl:31
SYSPRINT	SYSOUT=*		write derived	SYSOUT=*	CBADMCDJ.jcl:32
SYSIN	in-stream (129 lines)		read derived	in-stream data	CBADMCDJ.jcl:33

SYSIN control cards · in-stream app/jcl/CBADMCDJ.jcl:34-162

  … 9 comment lines

  DEFINE LIBRARY(COM2DOLL) GROUP(CARDDEMO)
                DSNAME01(&HLQ..LOADLIB)

  … 2 comment lines

  DEFINE MAPSET(COSGN00M)   GROUP(CARDDEMO)
         DESCRIPTION(LOGIN SCREEN)

  DEFINE MAPSET(COSGN00M)   GROUP(CARDDEMO)
         DESCRIPTION(LOGIN SCREEN)

  DEFINE MAPSET(COACT00S)   GROUP(CARDDEMO)
         DESCRIPTION(ACCOUNT MENU)
  DEFINE MAPSET(COACTVWS)   GROUP(CARDDEMO)
         DESCRIPTION(VIEW ACCOUNT)
  DEFINE MAPSET(COACTUPS)   GROUP(CARDDEMO)
         DESCRIPTION(UPDATE ACCOUNT)
  DEFINE MAPSET(COACTDES)   GROUP(CARDDEMO)
         DESCRIPTION(DEACTIVATE ACCOUNT)

  DEFINE MAPSET(COACT00S)   GROUP(CARDDEMO)
         DESCRIPTION(CARD MENU)
  DEFINE MAPSET(COACTVWS)   GROUP(CARDDEMO)
         DESCRIPTION(VIEW CARD)
  DEFINE MAPSET(COACTUPS)   GROUP(CARDDEMO)
         DESCRIPTION(UPDATE CARD)
  DEFINE MAPSET(COACTDES)   GROUP(CARDDEMO)
         DESCRIPTION(DEACTIVATE CARD)

…