JCL Session 2

ISPF EDIT REVIEW The TSO Edit Screen is divided into special functional areas

Primary command area

            profile,
            recovery on,
            num,
            unnum,
            renum,
            reset,
            save,
            end,
            cancel,
            undo,
            find,
            change,
            copy (member),
            create (member),
            replace(member),
            edit(member),
            exclude all 'string',
            delete all 'x',
            hex on/off,
            sort

Line command area

                    (         - 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)

Differences between TSO profiles for CNTL and COBOL libraries

PROCESSING MODES

Real-time mode processing

Interactive, foreground, TSO.
(Job is already started, ready and waiting)

Batch mode processing

Non-interactive, background, JCL
(You submit jobs but do not control when job starts)

PRINT Options

1) SDSF – Spool Display and Search Facility

2) PF23 / PF24 -- at DePaul

PF23 . . prt odsn csc.printout; prt; prt close

PF24 . . tso sub csc.cntl(plist)

3) Option 3.1

DATA ACCESS - Direct or sequential

Direct Access - find and read one record within a file.

Records contain "key" data fields that can be used to
control their location in a file and as references by indices.

The use of Indices will be covered during the VSAM session.

Sequential Access -- read all records from the beginning of a file.

till the end or until the program stops. Records may or may not possess
"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.

Sequential access
Stored on tape or disk. MVS disk storage is a minimum of one track.

(How much data can a track hold?

Record update requires complete file replacement -- a new file is created. Old file space can be reused by MVS.

Partitioned data sets (PDS) – Contains a directory and files.

Sequential access
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 DATA.

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 --

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.

Procedures available to compress a PDS are:

ISPF Utility option 3.4 'Z'

ISPF Utility option 3.1.

Backup and restore procedures for CNTL and COBOL

Why JCL? 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)

Example:

//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.
i.e. C STUDENT CCP?## ALL

3) Any time you want to make a backup of your COBOL and/or
CNTL files, save your work and issue the following command from any screen:

TSO SUB CSC.CNTL(BACKUP) You can issue this command as often as necessary to save the most recent
changes to the CNTL and COBOL files.

4) If your CNTL library is damaged, recover the CNTL library with the
following command.

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 / pine

Print output using an ISPF utility 5 points
Run BACKUP AND RESTORE procedures 10 points
Send an email message to jpetlick@condor 10 points

Write about the following:
Your background, work experience, education goals,
and anything you want me to know.