JCL Session 2
The TSO Edit Screen is divided into
special functional areas
exclude all 'string',
delete all 'x',
( - shift left 2 columns,
) - shift right 2 columns,
COL - display columns above this line,
I - insert,
D - delete,
R - repeat,
C - copy,
M - move,
X - exclude,
A - after (lines will be moved
or copied after this line)
B - before (lines will be moved
or copied before this line)
O - overlay (lines will be moved
on top of this line)
TSO profiles for CNTL and COBOL libraries
Interactive, foreground, TSO.
Real-time mode processing
(Job is already started, ready and
Non-interactive, background, JCL
(You submit jobs but do not
control when job starts)
SDSF – Spool Display and Search Facility
PF23 / PF24 -- at DePaul
PF23 . . prt odsn csc.printout; prt; prt close
PF24 . . tso sub csc.cntl(plist)
DATA ACCESS - Direct
Records contain "key" data fields that
can be used to
Direct Access - find and read one record
within a file.
control their location in a file and as
references by indices.
The use of Indices will be covered during
the VSAM session.
till the end or until the program stops.
Records may or may not possess
Sequential Access -- read all records
from the beginning of a file.
"key" fields. Records are in "relative
record order." To read the 1,000,000th
record, the previous 999,999 must be processed.
TWO TYPES OF SEQUENTIAL DATA SETS
Dataset -- another name for a file.
Sequential data set – Contains one file.
(How much data can a track hold?
Stored on tape or disk. MVS disk storage is
a minimum of one track.
Partitioned data sets (PDS) – Contains
a directory and files.
Record update requires complete file replacement
-- a new file is created. Old file space can be reused by MVS.
Stored on disk
Partitioned into a directory and files. Another
reference for PDS is library since this file system is used to organize
and collect files related to a common purpose. Frequently the last qualifier
name of the PDS reflects the content of the file, such as COBOL, JCL or
Unused file space occupied by outdated
members is not automatically available for reuse. Every update of a member
creates non-usable space in the PDS. This leads to storage space failures
when trying to save changed members. The programmer is responsible for
compressing the PDS as necessary.
directory -- contains a list of the
members in the PDS and points to start of member.
member -- the name of a file contained
in a PDS. The system completely replaces a member when there is any update
need compression --
Procedures available to compress a
ISPF Utility option 3.4 'Z'
Backup and restore procedures for CNTL and
The jobs in the computer are started
by using JCL and associated operations.
JCL operations are typically: JOB,
EXEC, or DD
JOB -- assigns a jobname
and marks the beginning of a unit of related JCL statements.
Each JOB contains one or more steps.
EXEC - Each EXEC is a step
that tels the system to run a program or procedure by name.
DD - connects program to a source
of input and destination for output
JCL - specifies the tasks and resources
required for MVS jobs.
JCL FORMAT --- //name operation operand(s)
//JPETLICJ JOB 1,'BIN 37',MSGCLASS=X,MSGLEVEL=(1,1),NOTIFY=JPETLIC
//STEP2 EXEC PGM=IEBGENER
<- program that should be run
//SYSUT1 DD DSN=JPETLIC.SAMPDATA,DISP=SHR
<- input dataset to be copied
//SYSUT2 DD SYSOUT=* <-
output Destination of dataset copied
//SYSPRINT DD SYSOUT=* <-
output Destination of messages from IEBGENER
//SYSIN DD DUMMY <-
input formatting instructions for IEBGENER
BACKUP AND RESTORE PROCEDURES
The following procedure
should be used by studentsto do your own backup and recovery.
1) Copy members BACKUP,
COBOL, and CNTL from JPETLIC.CSC.CNTL.
2) Edit each member to change
all occurrences of STUDENT to your userid.
C STUDENT CCP?## ALL
3) Any time you want to make
a backup of your COBOL and/or
TSO SUB CSC.CNTL(BACKUP)
You can issue this command as
often as necessary to save the most recent
files, save your work and issue the following command from any screen:
changes to the CNTL and
4) If your CNTL library is
damaged, recover the CNTL library with the
TSO SUB BACKUP.CNTL(CNTL)
If the COBOL library is damaged,
recover the COBOL library
with the following command.
TSO SUB BACKUP.CNTL(COBOL)
UNIX / elm
Print output using an ISPF
Run BACKUP AND RESTORE procedures
Send an email message to
jpetlick@condor 10 points
Write about the following:
Your background, work experience,
and anything you want me