ISPF Option 6 in MVS38J / Hercules
==================================

Date: 06/22/2021  Release V1R1M00            
Date: 11/10/2019  Release V1R0M00            

Author: Larry Belmontes Jr.
        https://ShareABitofIT.net/ISPF-Option-6-in-MVS38J   
        Copyright (C) 20192021  Larry Belmontes, Jr.

 
 
   Enhancement to ISPF 2.x Option 6 TSO Command Processor panel to  
save the last 10 commands in the Users ISPF Profile including control
fields.
 
   The ISPF 2.x runs on MVS38J under TSO.  The ISPF 2.x product is owned 
by Wally Mclaughlin.
 
 
 
---------------------------------------------------------------------- 
| I n s t a l l a t i o n   R e f e r e n c e                        | 
---------------------------------------------------------------------- 

   The approach for this installation procedure is to transfer the
distribution tape content from the your personal computing device to
MVS with minimal JCL (less than 24 lines for easy copy-paste) and to
continue the installation procedure using supplied JCL from the MVS
CNTL data set under TSO.                         

   Below are description of ZIP file content, pre-installation
requirements and installation steps.
 
Good luck and enjoy!
-Larry Belmontes



======================================================================
* I. C o n t e n t   o f   Z I P   F i l e                           |
======================================================================

o  $INST01.JCL          Load CNTL data set from distrubtion tape
 
o  ISP60000_V1R1M00.HET Hercules Emulated Tape (HET) with VOLSER VS1100 
                        containing the ISPF Option 6 enhancement       
                        software distribution.                  
 
o  DSCLAMR.TXT          Disclaimer
 
o  README.TXT           This File                                              
 



======================================================================
* II. P r e - i n s t a l l a t i o n   R e q u i r e m e n t s      |
======================================================================

o  Tape files use device 480.
 
o  HERC01.ISP61100.CNTL (PDS) will be created.
    
o  DASD file(s) are loaded to VOLSER=PUB000, type 3350 device.
   Confirm that 100 tracks are available.
    
o  Download ZIP file to your PC local drive.    
 
o  Unzip the downloaded file into a temp directory on your PC device.
  
o  If dataset name, HERC01.ISP61100.CNTL is changed, some JCL changes
   may be necessary in the supplied JCL.
 
 
                                                
======================================================================
* III. I n s t a l l a t i o n   S t e p s                           |
======================================================================
                                                
+--------------------------------------------------------------------+
| Step 1. Load CNTL data set from distribution tape                  |
|         JCL Member: $INST01                                        |
+--------------------------------------------------------------------+
 
 
//$INST01  JOB (SYS),'Load HET ISP60000',        <-- Review and Modify
//             CLASS=A,MSGCLASS=A,               <-- Review and Modify
//             MSGLEVEL=(1,1)                    <-- Review and Modify
//* -------------------------------------------------------*
//* *  ISPF Option 6 in MVS38J / Hercules                  *
//* *                                                      *
//* *  JOB: $INST01                                        *
//* *       Load CNTL data set from distribution tape      *
//* -------------------------------------------------------*
//STEP001  EXEC PGM=IEBCOPY                                           
//SYSPRINT DD  SYSOUT=*                                              
//SYSUT1   DD  DSN=ISP60000.V1R1M00.TAPE,DISP=OLD,
//             VOL=SER=VS1100,LABEL=(1,SL),                  
//             UNIT=480                          <-- Review and Modify   
//SYSUT2   DD  DSN=HERC01.ISP61100.CNTL,
//             DISP=(,CATLG),DCB=(RECFM=FB,LRECL=80,BLKSIZE=19040),
//             SPACE=(TRK,(100,10,10)), 
//             UNIT=3350,VOL=SER=PUB000          <-- Review and Modify   
//SYSIN    DD  DUMMY                                                    
/*                                                                  
//
Figure 1: $INST01 JCL
 
 
    a) Before submitting the above job, the distribution tape   
       must be made available to MVS by issuing the following
       command from the Hercules console:
 
       DEVINIT 480 X:\DIRNAME\ISP60000_V1R1M00.HET READONLY=1
 
       where X:\DIRNAME is the complete path to the location
       of the Hercules Emulated Tape file. 
 
    b) Issue the following command from the MVS console to vary
       device 480 online:
 
       V 480,ONLINE
 
    c) Copy and paste the above JCL to a PDS member, update JOB 
       statement to conform to your installation standard.
 
    d) Submit the job.                                              
 
    e) Review job output for successful load of the CNTL data set.
 
                                                                            
                                                                            
+--------------------------------------------------------------------+
| Step 2. Copy New ISPF Panels to user Panel Library                 |
+--------------------------------------------------------------------+
 
    a) Review ISPF panel library concatenation on your installation.
       Target panel library should be before your ISPF System Panel 
       library to resolve ISPOPT6 and HISPOPT6 correctly.
 
    b) Copy the two panels in HERC01.ISP61100.CNTL to the target
       panel library using ISPF 3.3 Copy function
 
       ISPOP6        
       HISPOP6         
        
       Note: Do not OVERLAY the default ISPOP6 panel in the ISPF
             System Panel library.
 
    c) Return to ISPF main menu and select option 6.  New TSO Command
       Processor panel should display.               
 
    d) Congratulations!  Installation complete.





Enjoy!
                                                                            

