b referential systems
EZ-ISPF Intro
EZ-ISPF Overview
EZ-ISPF Examples
Our Philosophy
Request Free Trial
Contact Us

EZ-ISPF Examples


In the examples which follow, it is assumed that:

  • you have reviewed the EZ-ISPF overview
  • the EZ command which invokes EZ-ISPF has been equated to PF12

Here's a list of the examples which follow:


Target String In Form Of Cataloged Data Set Name

Suppose you are using ISPF Browse to review some test JCL contained in a PDS member named TEST in PDS RSC002.TSO.CNTL, as shown below: 

   Menu  Utilities  Compilers  Help                                       
 -------------------------------------------------------------------------
 BROWSE    RSC002.TSO.CNTL(TEST)                Line 00000000 Col 001 080
 Command ===>                                            Scroll ===> HALF
****************************** Top of Data *******************************
//RSC002A JOB (,A123),'J SMITH',MSGCLASS=X,
//            CLASS=A,NOTIFY=RSC002
//JS10   EXEC PGM=ACTYREND
//STEPLIB  DD DSN=MY.TEST.LINKLIB,
//            DISP=SHR
//SYSUT1   DD DSN=MY.INPUT.TESTDATA,
//            DISP=SHR
//SYSUT2   DD DSN=MY.OUTPUT.TESTDATA,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,VOL=SER=TEST01,
//            SPACE=(TRK,(200,100),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSIN    DD DSN=MY.TEST.CNTLCRDS(TESTCC),
//            DISP=SHR
//REPORT01 DD SYSOUT=*
***************************** Bottom of Data *****************************

Before you submit this JCL for execution, suppose you want to edit data set MY.INPUT.TESTDATA to ensure it contains the proper test data and, if necessary, to make any needed modifications. If you place the cursor under any character in data set name MY.INPUT.TESTDATA as shown below:

   Menu  Utilities  Compilers  Help                                       
 -------------------------------------------------------------------------
 BROWSE    RSC002.TSO.CNTL(TEST)                Line 00000000 Col 001 080
 Command ===>                                            Scroll ===> HALF
****************************** Top of Data *******************************
//RSC002A JOB (,A123),'J SMITH',MSGCLASS=X,
//            CLASS=A,NOTIFY=RSC002
//JS10   EXEC PGM=ACTYREND
//STEPLIB  DD DSN=MY.TEST.LINKLIB,
//            DISP=SHR
//SYSUT1   DD DSN=MY.INPUT.TESTDATA,
//            DISP=SHR
//SYSUT2   DD DSN=MY.OUTPUT.TESTDATA,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,VOL=SER=TEST01,
//            SPACE=(TRK,(200,100),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSIN    DD DSN=MY.TEST.CNTLCRDS(TESTCC),
//            DISP=SHR
//REPORT01 DD SYSOUT=*
***************************** Bottom of Data *****************************

and press PF12, then, because of the default processing defined for a target string in the form of a cataloged data set name, EZ-ISPF will invoke ISPF Edit against data set MY.INPUT.TESTDATA, as shown below: 

   File  Edit  Edit_Settings  Menu  Utilities  Compilers  Test  Help 
 -------------------------------------------------------------------------
 EDIT       MY.INPUT.TESTDATA                         Columns 00001 00072
 Command ===>                                            Scroll ===> HALF
 ****** ************************** Top of Data ***************************
 000001 19243854332 ACME PHOTO INC.    00005675
 000002 88564290110 BETA PUBLISHING    00002345
 000003 72692296799 CLIPPER INDUSTRIES 01676612
 000004 44332299123 CONE MILLS INC.    00013722
 000005 42001378732 DUPLIN FARMS       00015541
 ****** ************************* Bottom of Data *************************

When you are through reviewing and/or modifying MY.INPUT.TESTDATA and exit out of Edit, you will be returned to the Browse display of the test JCL in member TEST.


Target String In Form Of Non-Cataloged Data Set Name

Now suppose you want to verify that data set MY.OUTPUT.TESTDATA is not already cataloged (perhaps from an earlier test run). If you place the cursor under any character in data set name MY.OUTPUT.TESTDATA as shown below:

   Menu  Utilities  Compilers  Help                                       
 -------------------------------------------------------------------------
 BROWSE    RSC002.TSO.CNTL(TEST)                Line 00000000 Col 001 080
 Command ===>                                            Scroll ===> HALF
****************************** Top of Data *******************************
//RSC002A JOB (,A123),'J SMITH',MSGCLASS=X,
//            CLASS=A,NOTIFY=RSC002
//JS10   EXEC PGM=ACTYREND
//STEPLIB  DD DSN=MY.TEST.LINKLIB,
//            DISP=SHR
//SYSUT1   DD DSN=MY.INPUT.TESTDATA,
//            DISP=SHR
//SYSUT2   DD DSN=MY.OUTPUT.TESTDATA,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,VOL=SER=TEST01,
//            SPACE=(TRK,(200,100),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSIN    DD DSN=MY.TEST.CNTLCRDS(TESTCC),
//            DISP=SHR
//REPORT01 DD SYSOUT=*
***************************** Bottom of Data *****************************

and press PF12, then, if data set MY.OUTPUT.TESTDATA is cataloged, EZ-ISPF will invoke ISPF Edit against it. If MY.OUTOUT.TESTDATA is not cataloged, then, because of the default processing defined for a target string in the form of a non-cataloged data set name, EZ-ISPF will invoke ISPF Option 3.2 (the Data Set Utility) and give you the option of allocating or cataloging the indicated data set, as shown below: 

   Menu  RefList  Utilities  Help 
 -------------------------------------------------------------------------
                            Data Set Utility 
 Option ===> A                                                            
 XEZM011I - Data set not cataloged; you may allocate or catalog it here
     A Allocate new data set           C Catalog data set       
     R Rename entire data set          U Uncatalog data set     
     D Delete entire data set          S Short data set information
 blank Data set information            V VSAM Utilities         
    
 ISPF Library:
    Project  . .                  Enter "/" to select option
    Group  . . .                  /  Confirm Data Set Delete
    Type . . . .          

 Other Partitioned, Sequential or VSAM Data Set:
    Data Set Name . . 'MY.OUTPUT.TESTDATA'
    Volume Serial . .         (If not cataloged, required for option "C")
    
 Data Set Password  . .       (If password protected)

Whether the data set is cataloged or not, you will immediately know the status of MY.OUTPUT.TESTDATA. When you exit out of the resulting ISPF Edit or the resulting ISPF Option 3.2 panel, you will be returned to the Browse display of the test JCL in member TEST.


Target String In Form Of PDS Member Name

Now suppose you want to edit member TESTCC in PDS MY.TEST.CNTLCRDS to ensure it contains the proper test data and, if necessary, to make any needed modifications. If you place the cursor under any character in member name TESTCC as shown below:

   Menu  Utilities  Compilers  Help                                       
 -------------------------------------------------------------------------
 BROWSE    RSC002.TSO.CNTL(TEST)                Line 00000000 Col 001 080
 Command ===>                                            Scroll ===> HALF
****************************** Top of Data *******************************
//RSC002A JOB (,A123),'J SMITH',MSGCLASS=X,
//            CLASS=A,NOTIFY=RSC002
//JS10   EXEC PGM=ACTYREND
//STEPLIB  DD DSN=MY.TEST.LINKLIB,
//            DISP=SHR
//SYSUT1   DD DSN=MY.INPUT.TESTDATA,
//            DISP=SHR
//SYSUT2   DD DSN=MY.OUTPUT.TESTDATA,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,VOL=SER=TEST01,
//            SPACE=(TRK,(200,100),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSIN    DD DSN=MY.TEST.CNTLCRDS(TESTCC),
//            DISP=SHR
//REPORT01 DD SYSOUT=*
***************************** Bottom of Data *****************************

and press PF12, then, because of the default processing defined for a target string in the form of a member name shown on the screen in dsn(mbr) format, EZ-ISPF will invoke ISPF Edit against member TESTCC in PDS MY.TEST.CNTLCRDS, as shown below: 

   File  Edit  Edit_Settings  Menu  Utilities  Compilers  Test  Help 
 -------------------------------------------------------------------------
 EDIT       MY.TEST.CNTLCRDS(TESTCC)                  Columns 00001 00072
 Command ===>                                            Scroll ===> HALF
 ****** ************************** Top of Data ***************************
 000001 12/31/2007 YREND
 ****** ************************* Bottom of Data *************************

When you are through reviewing and/or modifying member TESTCC in MY.TEST.CNTLCRDS and exit out of Edit, you will be returned to the Browse display of the test JCL in member TEST.


Invocation Parameter With Assigned Data Set Id

Now suppose that TESTCC is supposed to be a modified copy of member YEAREND in the production control card data set, and that, for comparison purposes, you want to browse member YEAREND in the production control card data set, that this PDS is named SYS2.ACCNTING.CNTLCRDS, and that it has been assigned a data set id of 'AC'. If you type invocation parameter 'B AC YEAREND' in the command line (B for browse followed by the assigned data set id of the data set to be browsed followed by the name of the member to be browsed) as shown below:

   Menu  Utilities  Compilers  Help                                       
 -------------------------------------------------------------------------
 BROWSE    RSC002.TSO.CNTL(TEST)                Line 00000000 Col 001 080
 Command ===>  B AC YEAREND                              Scroll ===> HALF
****************************** Top of Data *******************************
//RSC002A JOB (,A123),'J SMITH',MSGCLASS=X,
//            CLASS=A,NOTIFY=RSC002
//JS10   EXEC PGM=ACTYREND
//STEPLIB  DD DSN=MY.TEST.LINKLIB,
//            DISP=SHR
//SYSUT1   DD DSN=MY.INPUT.TESTDATA,
//            DISP=SHR
//SYSUT2   DD DSN=MY.OUTPUT.TESTDATA,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,VOL=SER=TEST01,
//            SPACE=(TRK,(200,100),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSIN    DD DSN=MY.TEST.CNTLCRDS(TESTCC),
//            DISP=SHR
//REPORT01 DD SYSOUT=*
***************************** Bottom of Data *****************************

and press PF12, then EZ-ISPF will invoke ISPF Browse against PDS member name YEAREND in PDS SYS2.ACCNTING.CNTLCRDS, as shown below: 

   Menu  Utilities  Compilers  Help                                       
 -------------------------------------------------------------------------
 BROWSE    SYS2.ACCNTING.CNTLCRDS(YEAREND)      Line 00000000 Col 001 080
 Command ===>                                            Scroll ===> HALF
****************************** Top of Data *******************************
12/31/2007 YEAREND
***************************** Bottom of Data *****************************

When you are through reviewing member YEAREND in SYS2.ACCNTING.CNTLCRDS and exit out of Browse, you will be returned to the Browse display of the test JCL in member TEST.


Copy Operation With "From" and "To" Specification

Now suppose that, after looking at member YEAREND in the production control card data set, you decide that you need to replace member TESTCC in MY.TEST.CNTLCRDS with member YEAREND in SYS2.ACCNTING.CNTLCRDS. If you type invocation parameter 'F AC YEAREND' in the command line as shown below:

   Menu  Utilities  Compilers  Help                                       
 -------------------------------------------------------------------------
 BROWSE    RSC002.TSO.CNTL(TEST)                Line 00000000 Col 001 080
 Command ===>  F AC YEAREND                              Scroll ===> HALF
****************************** Top of Data *******************************
//RSC002A JOB (,A123),'J SMITH',MSGCLASS=X,
//            CLASS=A,NOTIFY=RSC002
//JS10   EXEC PGM=ACTYREND
//STEPLIB  DD DSN=MY.TEST.LINKLIB,
//            DISP=SHR
//SYSUT1   DD DSN=MY.INPUT.TESTDATA,
//            DISP=SHR
//SYSUT2   DD DSN=MY.OUTPUT.TESTDATA,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,VOL=SER=TEST01,
//            SPACE=(TRK,(200,100),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSIN    DD DSN=MY.TEST.CNTLCRDS(TESTCC),
//            DISP=SHR
//REPORT01 DD SYSOUT=*
***************************** Bottom of Data *****************************

and press PF12, then EZ-ISPF will define the "From" data set and member as member YEAREND in PDS SYS2.ACCNTING.CNTLCRDS. If you then type 'T' in the command line and place the cursor under any character in member name TESTCC, as shown below:

   Menu  Utilities  Compilers  Help                                       
 -------------------------------------------------------------------------
 BROWSE    RSC002.TSO.CNTL(TEST)                Line 00000000 Col 001 080
 Command ===>  T                                         Scroll ===> HALF
****************************** Top of Data *******************************
//RSC002A JOB (,A123),'J SMITH',MSGCLASS=X,
//            CLASS=A,NOTIFY=RSC002
//JS10   EXEC PGM=ACTYREND
//STEPLIB  DD DSN=MY.TEST.LINKLIB,
//            DISP=SHR
//SYSUT1   DD DSN=MY.INPUT.TESTDATA,
//            DISP=SHR
//SYSUT2   DD DSN=MY.OUTPUT.TESTDATA,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,VOL=SER=TEST01,
//            SPACE=(TRK,(200,100),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSIN    DD DSN=MY.TEST.CNTLCRDS(TESTCC),
//            DISP=SHR
//REPORT01 DD SYSOUT=*
***************************** Bottom of Data *****************************

and press PF12, then EZ-ISPF will define the "To" data set and member as member TESTCC in PDS MY.TEST.CNTLCRDS. If you then type a 3 in the command line and press PF12, EZ-ISPF will invoke ISPF Option 3.3 (the Move/Copy Utility). On the first Move/Copy Utility panel, the "From Other Data Set" field will be filled in as 'SYS2.ACCNTING.CNTLCRDS(YEAREND)', as shown below: 

   Menu  RefList  Utilities  Help 
 -------------------------------------------------------------------------
                            Move/Copy Utility 
 Option ===>                                                              
                                                                    
  C  Copy data set or member(s)          CP Copy and print           
  M  Move data set or member(s)          MP Move and print            

 Specify "From" Data Set below, then press Enter key

 From ISPF Library:
    Project . . .               (--- Options C and CP only         ---)
    Group . . . .          . . .          . . .          . . .          
    Type  . . . .          
    Member  . . .                  (Blank or pattern for member list,
                                    "*" for all members)

 From Other Partitioned or Sequential Data Set:
    Data Set Name . . . 'SYS2.ACCNTING.CNTLCRDS(YEAREND)'
    Volume Serial . . .            (If not cataloged)
    
 Data Set Password  . .            (If password protected)

If you then type C (For Copy) in the Option field and press Enter, the "To Other Data Set" field on the second Move/Copy Utility panel will be filled in as 'MY.TEST.CNTLCRDS(TESTCC)', as shown below: 

   Menu  RefList  Utilities  Help 
 -------------------------------------------------------------------------
 COPY     From SYS2.ACCNTING.CNTLCRDS(YEAREND)
 Command ===>                                                             
                                                                    
 Specify "To" Data Set Below

 To ISPF Library:                 
    Project  . .                  Replace option:
    Group  . . .                     Enter "/" to select option
    Type . . . .                        Replace like-named members
    Member . . .           (Blank unless member is to be renamed)

 To Other Partitioned or Sequential Data Set:
    Data Set Name . . . 'MY.TEST.CNTLCRDS(TESTCC)'
    Volume Serial . . .           (If not cataloged)
    
 Data Set Password  . .           (If password protected)
    
 To Data Set Options:
    Sequential Disposition        Pack Option         SCLM Setting
    1  1. Mod                     3  1. Yes           3  1. SCLM
       2. Old                        2. No               2. Non-SCLM
                                     3. Default          3. As is

If you then press Enter one more time, 'SYS2.ACCNTING.CNTLCRDS(YEAREND)' will be copied to 'MY.TEST.CNTLCRDS(TESTCC)'.

You can make this process go even faster by specifying the Move/Copy Utility copy option (C) and the "To" data set and member at the same time you specify invocation parameter 3. This can be done by typing '3C T' in the command line and placing the cursor under any character in member name TESTCC, as shown below:

   Menu  Utilities  Compilers  Help                                       
 -------------------------------------------------------------------------
 BROWSE    RSC002.TSO.CNTL(TEST)                Line 00000000 Col 001 080
 Command ===>  3C T                                      Scroll ===> HALF
****************************** Top of Data *******************************
//RSC002A JOB (,A123),'J SMITH',MSGCLASS=X,
//            CLASS=A,NOTIFY=RSC002
//JS10   EXEC PGM=ACTYREND
//STEPLIB  DD DSN=MY.TEST.LINKLIB,
//            DISP=SHR
//SYSUT1   DD DSN=MY.INPUT.TESTDATA,
//            DISP=SHR
//SYSUT2   DD DSN=MY.OUTPUT.TESTDATA,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,VOL=SER=TEST01,
//            SPACE=(TRK,(200,100),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSIN    DD DSN=MY.TEST.CNTLCRDS(TESTCC),
//            DISP=SHR
//REPORT01 DD SYSOUT=*
***************************** Bottom of Data *****************************

When you press PF12 in this case, the first Move/Copy Utility panel will be skipped and all you have to do is press Enter on the second Move/Copy Utility panel.

When you exit out of the Move/Copy Utility, you will be returned to the Browse display of the test JCL in member TEST.


ISPF Option 3.1 (Library Utility)

Now suppose you decide that you want to rename member TESTCC in PDS MY.TEST.CNTLCRDS so that it matches the member name of the production control card (YEAREND). If you type '1' in the command line and place the cursor under any character in datat set name MY.TEST.CNTLCRDS, as shown below:

   Menu  Utilities  Compilers  Help                                       
 -------------------------------------------------------------------------
 BROWSE    RSC002.TSO.CNTL(TEST)                Line 00000000 Col 001 080
 Command ===>  1                                         Scroll ===> HALF
****************************** Top of Data *******************************
//RSC002A JOB (,A123),'J SMITH',MSGCLASS=X,
//            CLASS=A,NOTIFY=RSC002
//JS10   EXEC PGM=ACTYREND
//STEPLIB  DD DSN=MY.TEST.LINKLIB,
//            DISP=SHR
//SYSUT1   DD DSN=MY.INPUT.TESTDATA,
//            DISP=SHR
//SYSUT2   DD DSN=MY.OUTPUT.TESTDATA,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,VOL=SER=TEST01,
//            SPACE=(TRK,(200,100),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSIN    DD DSN=MY.TEST.CNTLCRDS(TESTCC),
//            DISP=SHR
//REPORT01 DD SYSOUT=*
***************************** Bottom of Data *****************************

and press PF12, ISPF Option 3.1 (the Library Utility) will be invoked with 'MY.TEST.CNTLCRDS' shown in the "Other Data Set Name" field, as shown below: 

   Menu  RefList  Utilities  Help 
 -------------------------------------------------------------------------
                             Library Utility 
 Option ===>                                                              
                                                                    
 blank Display member list   I Data set information       B Browse member
     C Compress data set     S Short data set information D Delete member
     X Print index listing   E Edit member                R Rename member
     L Print entire data set V View member                P Print member
    
                                    Enter "/" to select option
 ISPF Library:                      /  Confirm Member Delete
    Project . . .                      Enhanced Member List
    Group . . . .          . . .          . . .          . . .          
    Type  . . . .          
    Member  . . .             (If B, D, E, P, R, V, or blank selected)
    New name  . .             (If R selected)

 Other Partitioned or Sequential Data Set:
    Data Set Name . . . 'MY.TEST.CNTLCRDS'
    Volume Serial . . .           (If not cataloged)
    
 Data Set Password  . .           (If password protected)

If you press Enter, this will produce a member list where you can rename TESTCC as member name YEAREND.

You can make this process go even faster by typing '1K' in the command line when you place the cursor under data set name MY.TEST.CNTLCRDS, as shown below: 

   Menu  Utilities  Compilers  Help                                       
 -------------------------------------------------------------------------
 BROWSE    RSC002.TSO.CNTL(TEST)                Line 00000000 Col 001 080
 Command ===>  1K                                        Scroll ===> HALF
****************************** Top of Data *******************************
//RSC002A JOB (,A123),'J SMITH',MSGCLASS=X,
//            CLASS=A,NOTIFY=RSC002
//JS10   EXEC PGM=ACTYREND
//STEPLIB  DD DSN=MY.TEST.LINKLIB,
//            DISP=SHR
//SYSUT1   DD DSN=MY.INPUT.TESTDATA,
//            DISP=SHR
//SYSUT2   DD DSN=MY.OUTPUT.TESTDATA,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,VOL=SER=TEST01,
//            SPACE=(TRK,(200,100),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSIN    DD DSN=MY.TEST.CNTLCRDS(TESTCC),
//            DISP=SHR
//REPORT01 DD SYSOUT=*
***************************** Bottom of Data *****************************

'K' simulates pressing Enter while leaving the Option field blank. This will produce the member list for MY.TEST.CNTLCRDS without first displaying the Library Utility panel.

When you exit out of the Library Utility, you will be returned to the Browse display of the test JCL in member TEST.


DASD Information Display

Now suppose you want to ensure that DASD volume serial TEST01 has enough free space to satisfy the output data set. If you place the cursor under any character in DASD volume serial TEST01, as shown below:

   Menu  Utilities  Compilers  Help                                       
 -------------------------------------------------------------------------
 BROWSE    RSC002.TSO.CNTL(TEST)                Line 00000000 Col 001 080
 Command ===>                                            Scroll ===> HALF
****************************** Top of Data *******************************
//RSC002A JOB (,A123),'J SMITH',MSGCLASS=X,
//            CLASS=A,NOTIFY=RSC002
//JS10   EXEC PGM=ACTYREND
//STEPLIB  DD DSN=MY.TEST.LINKLIB,
//            DISP=SHR
//SYSUT1   DD DSN=MY.INPUT.TESTDATA,
//            DISP=SHR
//SYSUT2   DD DSN=MY.OUTPUT.TESTDATA,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,VOL=SER=TEST01,
//            SPACE=(TRK,(200,100),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSIN    DD DSN=MY.TEST.CNTLCRDS(TESTCC),
//            DISP=SHR
//REPORT01 DD SYSOUT=*
***************************** Bottom of Data *****************************

and press PF12, EZ-ISPF will produce a DASD Information Display for DASD volume TEST01, as shown below: 

                    EZ-ISPF 1.8 - DASD Info Display           Line 1 of 1 
 Command ==>                                              Scroll ==> HALF
 You may scroll the information below UP, DOWN, LEFT, or RIGHT as needed

  1 volumes matched TSO001   - % Free:   2.7 - Free Tracks: 1,354

 Volume  Mount  Device  Free   Free Free LgFree LgFre DASD VTOC SMS  Den
 Serial  Attr    Type   Exts   Trks Cyls  #Trks #Cyls Nmbr Ind  Ind  Ind
  (01)   (02)    (03)   (04)   (05) (06)  (07)   (08) (09) (10) (11) (12)
 ------------------------------------------------------------------------
 TSO001 PRIVATE 3390      19   1354   80    594    38 0360 Yes  No   TPL
 *************************** BOTTOM OF LIST *****************************










 --- Type HELP on the command line to access EZ-ISPF help information ---

The DASD Information Display shows certain DASD characteristics (including the amount of free space) for specified DASD volumes.

When you exit out of the DASD Information Display, you will be returned to the Browse display of the test JCL in member TEST.


Target String In Form Of Program Name

Now suppose you want to ensure that you linked the test version of program ACTYREND into STEPLIB data set MY.TEST.LINKLIB. If you place the cursor under program name ACTYREND, as shown below:

   Menu  Utilities  Compilers  Help                                       
 -------------------------------------------------------------------------
 BROWSE    RSC002.TSO.CNTL(TEST)                Line 00000000 Col 001 080
 Command ===>                                            Scroll ===> HALF
****************************** Top of Data *******************************
//RSC002A JOB (,A123),'J SMITH',MSGCLASS=X,
//            CLASS=A,NOTIFY=RSC002
//JS10   EXEC PGM=ACTYREND
//STEPLIB  DD DSN=MY.TEST.LINKLIB,
//            DISP=SHR
//SYSUT1   DD DSN=MY.INPUT.TESTDATA,
//            DISP=SHR
//SYSUT2   DD DSN=MY.OUTPUT.TESTDATA,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,VOL=SER=TEST01,
//            SPACE=(TRK,(200,100),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSIN    DD DSN=MY.TEST.CNTLCRDS(TESTCC),
//            DISP=SHR
//REPORT01 DD SYSOUT=*
***************************** Bottom of Data *****************************

and press PF12, EZ-ISPF will determine where program ACTYREND will be found when it is fetched for execution and, if it exists in the specfiied STEPLIB data set, will invoke ISPF Browse against member ACTYREND in PDS MY.TEST.LINKLIB, as shown below: 

   Menu  Utilities  Compilers  Help 
 -------------------------------------------------------------------------
 BROWSE    MY.TEST.LINKLIB(ACTYREND)            Line 00000000 Col 001 080
 Command ===>                                            Scroll ===> HALF
****************************** Top of Data *******************************
......0ACTYREND ACTESTAE..B.....ACTPRSE ..H...%ACTCURSR.....,ACTFPLIB
..5695PMB01 ....
d..569623400 ..........................................................
............ ...
00m.......
.................... ......&......-...............h......q......y
..........................@......d...h............u...y...
........... ...
............. ........................... ..............................
........... .......&.........v..........q.......y.......0...
n0.. d.n9...d.n.n9...d.. {!. .N. BcN. B<d.N...od.0cQN...
........... ...&......-............d......y.....
.......Q..:M ...H....}..M..Q....\..U..Y....4..8........
.......{..l. .....#..#..@..@y..@^..'..'@..'..'h.."..."..."...ú..@
k......0w.!. ..-K.....-y.-..M.. .LÍ.L...&.L....q.......
..........d ..U.u..ry..r..r^..r.............~..x...U
K...}\&.L..}.L.n2 a.. .0a....a..L.k.... .. .n ..ò....+
.............................u..*......Q
.......... ........&
... ACTYREND R1.4 10/07/06 14.02 COPYRIGHT 2006, ACME INC.

This will indicate that program ACTYREND does appear in the specified STEPLIB and also gives you the opportunity to check any "eyecatcher", assembly date, or other pertinent information.

When you exit out of the Browse display of ACTYREND in MY.TEST.LINKLIB, you will be returned to the Browse display of the test JCL in mmeber TEST.


Target String In Form Of Job Name

Now suppose you submit the JCL in member TEST for execution, that it starts to execute immediately, and that, due to the limited amount of test data involved, it immediately terminates. Now suppose you want to use SDSF to look at the sysout from this job. If you place the cursor under any character in job name RSC002A, as shown below:

   Menu  Utilities  Compilers  Help                                       
 -------------------------------------------------------------------------
 BROWSE    RSC002.TSO.CNTL(TEST)                Line 00000000 Col 001 080
 Command ===>                                            Scroll ===> HALF
****************************** Top of Data *******************************
//RSC002A JOB (,A123),'J SMITH',MSGCLASS=X,
//            CLASS=A,NOTIFY=RSC002
//JS10   EXEC PGM=ACTYREND
//STEPLIB  DD DSN=MY.TEST.LINKLIB,
//            DISP=SHR
//SYSUT1   DD DSN=MY.INPUT.TESTDATA,
//            DISP=SHR
//SYSUT2   DD DSN=MY.OUTPUT.TESTDATA,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,VOL=SER=TEST01,
//            SPACE=(TRK,(200,100),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSIN    DD DSN=MY.TEST.CNTLCRDS(TESTCC),
//            DISP=SHR
//REPORT01 DD SYSOUT=*
***************************** Bottom of Data *****************************

and press PF12, EZ-ISPF will invoke SDSF and SDSF will immediately show a list of all held jobs with job name RSC002A, as shown below: 

   Display  Filter  View  Print  Options  Help
 -------------------------------------------------------------------------
 SDSF HELD OUTPUT DISPLAY ALL CLASSES  LINES 78         LINE 1-1 (1)
 COMMAND INPUT ===>                                      SCROLL ===> HALF
 NP   JOBNAME  JobID    Owner    Prty C ODisp Dest           Tot-Rec  Tot-
      RSC002A  JOB06856 RSC002    144 X HOLD  LOCAL               78

When you are through reviewing the sysout for this job and exit out of SDSF, you will be returned to the Browse display of the test JCL in member TEST.


For More Information

This web site only hints at the comprehensive power of EZ-ISPF. For more information, please click on any of the selections below:

© 2006 Referential Systems, LLC