[USflag] The American Programmer [USflag]


Home
Books on Mainframe Programming
Mainframe Manuals and Tutorials
System Abend codes, Sqlcodes, VSAM/QSAM codes
Everything about the IBM AS/400 Midrange Computer - iSeries
Everything about CICS
Everything about COBOL
Everything about DB2 and SQL
Everything about IMS
Everything about Java and JavaScript
Everything about JCL and JES
Everything about REXX
Everything about zOS, VSAM, Tivoli, Assembler
Everything about TSO, ISPF, Spufi
  TSO/ISPF: Just enough to get you started
  Running ISPF in batch. Tutorial.
  ISPF variables. Tutorial.
  TSO Line Mode Commands (such as DELETE, HRECALL, ALLOCATE, Line Mode EDIT)
  Executing SQL in Spufi. Tutorial.
  Comparison of REXX and CLIST
  Writing ISPF Editor macros
  Manuals for TSO
  Books on TSO, ISPF and CLIST
Site Map and Site Search

           Home   > TSO, ISPF, SPUFI   > Just Enough ISPF
TSO/ISPF Tutorial

The purpose of this tutorial is to get you started with TSO/ISPF when there is no other way - you donít have time to go to a class, donít want to buy a complete book on it and try to find the things you need to know, youíre in a class on JCL, COBOL, JCL or SQL and it has a requirement that you know ISPF, which you donít...

This is nowhere near being complete. It just gets you going I canít show you how to log on to TSO at your company. I will show you what to do after you log on.

Iíll show you how to create a PDS or Library to contain JCL. If you need a library to contain COBOL, SQL, or DATA, just do what is shown here, changing the last part of the PDS or Library name to COBOL, SQL, or DATA instead of CNTL for JCL.

I assume you have the ISPF Version with all those extra intrusive things that you donít really need. Iíll show you how to disable them so you can get on with your work. If you donít have that Version, you can ignore the things that your system doesnít have.

Iíll show you just a few of the features of the ISPF Editor.

Iíll show you the essential features of SDSF, an IBM product used to view the printed output of submitted jobs.

Wherever it says Ďuseridí, replace it with your TSO userid. Be aware that some companies have messed around with normal naming conventions, and so youíll have to follow their standards.

So log on. Then get to the main menu or Primary Option Panel of ISPF. Iíll guide you from there.


Creating a PDS/Library

Option 3, Utility, from the main menu

                      Menu  Utilities  Compilers  Options  Status  Help
                    ------------------------------------------------------------------------------
                                               ISPF Primary Option Menu
                    Option ===> 3
                    0  Settings      Terminal and user parameters            User ID . : userid
                    1  View          Display source data or listings         Time. . . : 06:49
                    2  Edit          Create or change source data            Terminal. : 3278
                    3  Utilities     Perform utility functions               Screen. . : 1
                    4  Foreground    Interactive language processing         Language. : ENGLISH
                    5  Batch         Submit job for language processing      Appl ID . : ISR
                    6  Command       Enter TSO or Workstation commands       TSO logon : TRAINING
                    7  Dialog Test   Perform dialog testing                  TSO prefix: userid
                    8  LM Facility   Library administrator functions         System ID : SYS1

                    Enter X to Terminate using log/list defaults



Then option 2 from Utility menu, ďdataset utilityĒ Menu Help ------------------------------------------------------------------------------ Utility Selection Panel Option ===> 2 1 Library Compress or print data set. Print index listing. Print, rename, delete, browse, edit or view members 2 Data Set Allocate, rename, delete, catalog, uncatalog, or display information of an entire data set 3 Move/Copy Move, copy, or promote members or data sets 4 Dslist Print or display (to process) list of data set names. Print or display VTOC information 5 Reset Reset statistics for members of ISPF library
Choose M for enhanced allocate (if there is no M, use A) Menu RefList Utilities Help ------------------------------------------------------------------------------ Data Set Utility Option ===> M A Allocate new data set C Catalog data set R Rename entire data set U Uncatalog data set D Delete entire data set S Data set information (short) blank Data set information M Enhanced data set allocation V VSAM Utilities ISPF Library: Project . . Group . . . Type . . . . Other Partitioned, Sequential or VSAM Data Set: Data Set Name . . . 'userid.CLASS.CNTL' Press ENTER
Menu RefList Utilities Help Allocate New Data Set ----------------------------. Command ===> Data Set Name . . . . : userid.CLASS.CNTL Management class. . . . (Blank for default management class) Storage class . . . . . (Blank for default storage class) Volume serial . . . . (Blank for authorized default volume) Data class . . . . . . (Blank for default data class) Space units . . . . . TRACK (BLKS, TRKS, CYLS, KB, MB or BYTES) Primary quantity. . . 10 (In above units) Secondary quantity. . 5 (In above units) Directory blocks. . . 10 (Zero for sequential data set) * Record format . . . . FB Record length . . . . 80 Block size . . . . . 0 Data Set Name type. . PDS (LIBRARY, HFS, PDS, or blank) * Expiration date . . . (YY/MM/DD, YYYY/MM/DD Enter "/" to select option DDDD for retention period in days Type in attributes like the ones shown in bold. If your installation has other standards, use them. Then go to the Editor type =2, then ENTER
Menu RefList RefMode Utilities LMF Workstation Help ------------------------------------------------------------------------------ Edit Entry Panel Command ===> ISPF Library: Project . . . Group . . . . . . . . . . . . . Type . . . . Member . . . (Blank or pattern for member selection list) Other Partitioned or Sequential Data Set: Data Set Name . . . 'userid.CLASS.CNTL(NEWMEMB)' Volume Serial . . . (If not cataloged) Initial Macro . . . . Options Profile Name . . . . . / Confirm Cancel/Move/Replace Format Name . . . . . Mixed Mode Data Set Password . . Edit on Workstation Type in the name of your new library, as well as a member name as shown. Then press ENTER You have to do it this way on this screen, if itís the first time youíre editing this PDS/Library.
File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.00 Columns 00001 00072 Command ===> Scroll ===> CSR ****** ***************************** Top of Data ****************************** ==MSG> -Warning- The UNDO command is not available until you change ==MSG> your edit profile using the command RECOVERY ON. ''''''
Before typing anything in, check your profile File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.00 Columns 00001 00072 Command ===> PROFILE Scroll ===> CSR ****** ***************************** Top of Data ****************************** ==MSG> -Warning- The UNDO command is not available until you change ==MSG> your edit profile using the command RECOVERY ON. ''''''RECOVERY OFF NULLS OFF CAPS ON '''''' '''''' ''''''
To adjust your profile: you can't go wrong with these commands: for CNTL, DATA, use these:. RECOVERY ON;RENUM;UNNUM;NULLS ON ALL for COBOL, use these: RECOVERY ON;RENUM;UNNUM;RENUM COB;NULLS ON ALL Line numbers are recommended for COBOL, cause trouble with all other types. ****** **************************** Bottom of Data **************************** File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.00 Columns 00001 00072 Comman ===> RECOVERY ON;RENUM;UNNUM;NULLS ON ALL: (see note above) Scroll ===> CSR ****** ***************************** Top of Data ****************************** ****** **************************** Bottom of Data ****************************
RESET will remove the PROFILE display File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.00 Columns 00001 00072 Command ===> RESET Scroll ===> CSR
Now insert some lines of jcl or data. I8 will open up 8 blank lines for you to type in. File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.00 Columns 00001 00072 Command ===> Scroll ===> CSR I8 ***************************** Top of Data ****************************** ****** **************************** Bottom of Data ****************************
File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.00 Columns 00001 00072 Command ===> Scroll ===> CSR ****** ***************************** Top of Data ****************************** '''''' '''''' '''''' '''''' '''''' '''''' '''''' '''''' ****** **************************** Bottom of Data ****************************
File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.00 Columns 00001 00072 Command ===> Scroll ===> CSR _ ****** ***************************** Top of Data ****************************** '''''' //useridA JOB (xxxx),íSAL MONELLAí,CLASS=c,MSGCLASS=m, '''''' // NOTIFY=userid,TIME=(,5) '''''' //STEP1 EXEC PGM=IEFBR14 '''''' Replace userid by your userid xxxx by your companyís accounting information, c by the proper testing class, and m by the proper held print class used in testing
File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.00 Columns 00001 00072 Command ===> SUBMIT Scroll ===> CSR ****** ***************************** Top of Data ****************************** '''''' //useridA JOB (xxxx),íSAL MONELLAí,CLASS=c,MSGCLASS=m, '''''' // NOTIFY=userid,TIME=(,5) '''''' //STEP1 EXEC PGM=IEFBR14 '''''' '''''' If itís JCL youíre doing, you may submit it. Save and exit by pressing PF3 Then get into SDSF to view JCL job's output Use the menu numbers in use at your company.
Display Filter View Print Options Help ------------------------------------------------------------------------------- V1R6M0 ------------------ SDSF PRIMARY OPTION MENU -------------------------- COMMAND INPUT ===> H SCROLL ===> PAGE Type an option or command and press Enter. DA - Display active users in the sysplex I - Display jobs in the JES2 input queue O - Display jobs in the JES2 output queue H - Display jobs in the JES2 held output queue ST - Display status of jobs in the JES2 queues TUTOR - Short course on SDSF (ISPF only) END - Exit SDSF Display Filter View Print Options Help ------------------------------------------------------------------------------- SDSF HELD OUTPUT DISPLAY ALL CLASSES LINES 36,115 LINE 1-13 (29) COMMAND INPUT ===> PREFIX userid* SCROLL ===> PAGE NP JOBNAME JOBID OWNER PRTY C ODISP DEST TOT-REC TOT-
Tell SDSF to display jobs starting with your userid, only. Display Filter View Print Options Help ------------------------------------------------------------------------------- SDSF HELD OUTPUT DISPLAY ALL CLASSES LINES 36,115 LINE 1-13 (29) COMMAND INPUT ===> SCROLL ===> PAGE NP JOBNAME JOBID OWNER PRTY C ODISP DEST TOT-REC TOT- ? useridW JOB00669 userid 144 H HOLD LOCAL 664 useridX JOB00648 userid 144 H HOLD LOCAL 240 ? next to the job name breaks the job down into separate print files
Display Filter View Print Options Help ------------------------------------------------------------------------------- SDSF JOB DATA SET DISPLAY - JOB useridW (JOB00669) LINE 1-6 (6) COMMAND INPUT ===> SCROLL ===> PAGE NP DDNAME STEPNAME PROCSTEP DSID OWNER C DEST REC-CNT PAGE JESMSGLG JES2 2 userid H LOCAL 17 JESJCL JES2 3 userid H LOCAL 51 JESYSMSG JES2 4 userid H LOCAL 110 SYSPRINT STEP1 COB2 103 userid H LOCAL 97 SYSPRINT STEP1 LKED 104 userid H LOCAL 387 SYSOUT STEP1 GO 109 userid H LOCAL 2
Display Filter View Print Options Help ------------------------------------------------------------------------------- SDSF JOB DATA SET DISPLAY - JOB useridW (JOB00669) LINE 1-6 (6) COMMAND INPUT ===> SCROLL ===> PAGE NP DDNAME STEPNAME PROCSTEP DSID OWNER C DEST REC-CNT PAGE JESYSMSG JES2 4 userid Q LOCAL 110 SYSPRINT STEP1 COB2 103 userid Q LOCAL 97 SYSPRINT STEP1 LKED 104 userid Q LOCAL 387 S SYSOUT STEP1 GO 109 userid Q LOCAL 2 Select the print file you want with S
Display Filter View Print Options Help ------------------------------------------------------------------------------- SDSF OUTPUT DISPLAY useridC JOB00985 DSID 109 LINE 0 COLUMNS 02- 81 COMMAND INPUT ===> SCROLL ===> PAGE ********************************* TOP OF DATA ********************************** THIS IS PROGRAM ABCDEF WRITTEN BY MOE SCHMOE ******************************** BOTTOM OF DATA ******************************** Display Filter View Print Options Help ------------------------------------------------------------------------------- SDSF HELD OUTPUT DISPLAY ALL CLASSES LINES 662 LINE 1-1 (1) COMMAND INPUT ===> SCROLL ===> PAGE NP JOBNAME JOBID OWNER PRTY C ODISP DEST TOT-REC TOT- P useridC JOB00985 userid 144 Q HOLD LOCAL 662 If you have finished, Purge the print file
The list of files, and a few Editing features Have ISPF show you a list of your files =3;4, then ENTER Menu RefList RefMode Utilities Help ------------------------------------------------------------------------------ Data Set List Utility Option ===> blank Display data set list P Print data set list V Display VTOC information PV Print VTOC information Enter one or both of the parameters below: Dsname Level . . . userid Volume serial . . Data set list options Initial View . . . 1 1. Volume Enter "/" to select option 2. Space / Confirm Data Set Delete 3. Attrib / Confirm Member Delete 4. Total The following actions will be available when the list is displayed: Enter a "/" on the data set list command field for command prompt pop-up. Enter TSO commands, CLIST, REXX execs, or "=" to execute previous command. Type in your userid Then press ENTER
Menu Options View Utilities Compilers Help ------------------------------------------------------------------------------ DSLIST - Data Sets Matching userid Row 1 of 26 Command ===> Scroll ===> CSR Command - Enter "/" to select action Message Volume ------------------------------------------------------------------------------- E userid.CLASS.CNTL TSO001 userid.CLASS.COBOL TSO001 userid.ISPF.PROFILE TSO001 Type E, to edit your PDS/Library
File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL Member List Command ===> S NEWMEMB Scroll ===> CSR ****** ***************************** Top of Data ****************************** MEMBER1 MEMBER2 MEMBER3 A list of members appears. (There may be none in the list) Type S next to the name of the member you wish to edit If the name does not appear on the list, type S membername on the command line
File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.01 Columns 00001 00072 Command ===> Scroll ===> CSR ****** ***************************** Top of Data ****************************** HELLO THIS IS A TEST THIS IS LINE 2 THIS IS LINE 3 ****** **************************** Bottom of Data **************************** For the sake of example, type in these three lines
File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.01 Columns 00001 00072 Command ===> Scroll ===> CSR _ ****** ***************************** Top of Data ****************************** M HELLO THIS IS A TEST 000002 THIS IS LINE 2 A THIS IS LINE 3 ****** **************************** Bottom of Data **************************** Moving the first line after the last. Press ENTER
File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.01 Columns 00001 00072 Command ===> Scroll ===> CSR ****** ***************************** Top of Data ****************************** 000001 THIS IS LINE 2 000002 THIS IS LINE 3 000003 HELLO THIS IS A TEST ****** **************************** Bottom of Data ****************************
File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.01 Columns 00001 00072 Command ===> Scroll ===> CSR ****** ***************************** Top of Data ****************************** C THIS IS LINE 2 000002 THIS IS LINE 3 A HELLO THIS IS A TEST ****** **************************** Bottom of Data **************************** Now copy the first line after the last. ENTER
File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.01 Columns 00001 00072 Command ===> Scroll ===> CSR ****** ***************************** Top of Data ****************************** 000001 THIS IS LINE 2 000002 THIS IS LINE 3 000003 HELLO THIS IS A TEST 000004 THIS IS LINE 2 ****** **************************** Bottom of Data ****************************
File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.01 Columns 00001 00072 Command ===> Scroll ===> CSR ****** ***************************** Top of Data ****************************** 000001 THIS IS LINE 2 000002 THIS IS LINE 3 R HELLO THIS IS A TEST 000004 THIS IS LINE 2 ****** **************************** Bottom of Data **************************** Now repeat the third line. ENTER
File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.01 Columns 00001 00072 Command ===> Scroll ===> CSR ****** ***************************** Top of Data ****************************** 000001 THIS IS LINE 2 000002 THIS IS LINE 3 000003 HELLO THIS IS A TEST 000004 HELLO THIS IS A TEST 000005 THIS IS LINE 2 ****** **************************** Bottom of Data ****************************
File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.01 Columns 00001 00072 Command ===> Scroll ===> CSR ****** ***************************** Top of Data ****************************** 000001 THIS IS LINE 2 000002 THIS IS LINE 3 D HELLO THIS IS A TEST 000004 HELLO THIS IS A TEST 000005 THIS IS LINE 2 ****** **************************** Bottom of Data **************************** Delete a line. ENTER
File Edit Confirm Menu Utilities Compilers Test Help ------------------------------------------------------------------------------- EDIT userid.CLASS.CNTL(NEWMEMB) - 01.01 Columns 00001 00072 Command ===> Scroll ===> CSR ****** ***************************** Top of Data ****************************** MM THIS IS LINE 2 MM THIS IS LINE 3 000003 HELLO THIS IS A TEST A THIS IS LINE 2 ****** **************************** Bottom of Data **************************** move the first two lines after the last. ENTER
Removing Key Captions Command ===> PFSHOW OFF Scroll ===> PAGE Another suggestion: Get rid of the key captions from the bottom of your screen. since scrolling is unaware of the key captions (which means they hide important information!) Type PFSHOW OFF on any command line.


























































































































































List of books on Mainframe topics

[Books Computer]

Home Books for Computer Professionals Privacy Terms |
Site Map and Site Search Programming Manuals and Tutorials The REXX Files Top of Page |