z/OS JCL Tutorial Workshop 4.1

Exercise 1

As member EX1 in library data set &SYSUID.JCL.CNTL, construct the Job Control necessary to add the data listed in the requirements below to &SYSUID.JCL.CNTL. The details below offer guidance on the number and type of statements required, plus an indication of some of the parameters, which may be needed.

JOB Statement

Job name to be based on the TSO userid in use
Accounting information is not required.
Use your name as the programmer's name.
Memory requirement is for 4096K.
Job to run in a class 'A' initiator.
You are to be notified when the job ends.

EXEC statement

The program to be executed is IEBUPDTE.
Include a parameter MOD as input to the program.

DD statements

There should be four DD statements as follows:

SYSPRINT is a spooled print file
SYSUT1 is the input file (&SYSUID.JCL.CNTL).
SYSUT2 is the output file (&SYSUID.JCL.CNTL).
SYSIN should define an in-stream data set containing the following data.

Data (to follow the SYSIN DD statement.)

./ ADD NAME=GDGBASE
 DEFINE GDG(NAME(userid.MASTER) LIMIT(4) SCRATCH)
./ ADD NAME=KSDSDATA
 DSD OUTPUT=(SYSUT2)
 FD NAME=A,LENGTH=6,FORMAT=ZD,INDEX=1
 FD NAME=B,LENGTH=74,FORMAT=AL,ACTION=RP
 CREATE QUANTITY=100,NAME=(A,B)
 END
./ ADD NAME=RIPPLE
 DSD OUTPUT=(SYSUT2)
 FD NAME=A,LENGTH=80,FORMAT=AL,ACTION=RP
 CREATE QUANTITY=100,NAME=A
 END
./ ADD NAME=ODDS
 DSD OUTPUT=(SYSUT2)
 FD NAME=A,LENGTH=6,STARTLOC=1,PICTURE=6,P’000000’,INDEX=2
 FD NAME=B,LENGTH=74,FORMAT=AL,ACTION=RP
 CREATE QUANTITY=100,NAME=(A,B)
 END
./ ADD NAME=EVENS
 DSD OUTPUT=(SYSUT2)
 FD NAME=A,LENGTH=6,STARTLOC=1,PICTURE=6,P’000001’,INDEX=2
 FD NAME=B,LENGTH=74,FORMAT=AL,ACTION=RP
 CREATE QUANTITY=100,NAME=(A,B)
 END

Exercise 1

Click here for possible solutions.