ISRZ00 in MVS38J / Hercules
===========================

Date: 06/22/2021  Release V1R1M00            
Date: 06/21/2019  Release V1R0M00            

Author: Larry Belmontes Jr.
        https://ShareABitofIT.net/ISRZ00-in-MVS38J   
        Copyright (C) 2019-2021  Larry Belmontes, Jr.

 
 
   Addition of new generic message member, ISRZ00, for improved ISPF message
use flexibility on ISPF 2.x.
 
   The ISPF 2.x product runs on Hercules/MVS38J under TSO.  The ISPF 2.x   
product is owned by Wally Mclaughlin.
 
   The installation steps appear to be lengthly.  Depending whether existing
or new ISPF target libraries are being utilized, new ISPF LOGON configuration
modifications will be necessary for new target libraries, thus, increasing the
number of change points to the installations ISPF LOGON procedure(s) and risking
the subsequent start-up of ISPF.  Please be cautious as you make modifications 
by creating backups of affected components.
 
   On a positive note, TSO editors such as RPF or RFE allow modifications to
ISPF LOGON procedures outside of ISPF!
 
 
---------------------------------------------------------------------- 
| 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  ISRZ00_V1R1M00.HET   Hercules Emulated Tape (HET) with VOLSER VS1100 
                        containing 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.ISRZ1100.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.ISRZ1100.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 ISRZ1100',        <-- Review and Modify
//             CLASS=A,MSGCLASS=A,               <-- Review and Modify
//             MSGLEVEL=(1,1)                    <-- Review and Modify
//* -------------------------------------------------------*
//* *  ISRZ00 in MVS38J / Hercules                         *
//* *                                                      *
//* *  JOB: $INST01                                        *
//* *       Load CNTL data set from distribution tape      *
//* -------------------------------------------------------*
//STEP001  EXEC PGM=IEBCOPY                                           
//SYSPRINT DD  SYSOUT=*                                              
//SYSUT1   DD  DSN=ISRZ00.V1R1M00.TAPE,DISP=OLD,
//             VOL=SER=VS1100,LABEL=(1,SL),                  
//             UNIT=480                          <-- Review and Modify   
//SYSUT2   DD  DSN=HERC01.ISRZ1100.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\ISRZ00_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 Message Member to User Message Library            |
+--------------------------------------------------------------------+
 
    a) Review ISPF message library concatenation for your installation
       which may include ISPF LOGON start-up procedure and other such as  
       ISPF user library concatenation CLISTs.
        
    b) If an existing user message libary is to be used, skip to step 2e. 
        
    c) If a new user message libary is to be used, define the new PDS 
       with similar dataset attributes of the ISPF System Message library.
        
    d) User target message library should be placed before the ISPF
       System Message library and other user defined message libraries based
       on desirec concatenation sequence in DD ISPMLIB to resolve ISRZ00*
       messages correctly.
 
    e) Copy member HERC01.ISRZ1100.CNTL(ISRZ00) to the target message
       library using ISPF 3.3 Copy function
 
       ISRZ00        
        
       Note: It is suggested NOT to install ISRZ00 into the ISPMLIB
             system library to maintain separation of system supplied
             and user defined message libraries.
        
        
 
+--------------------------------------------------------------------+
| Step 3. Copy New Panel Members to User Panel Library               |
+--------------------------------------------------------------------+
 
    a) Review ISPF panel library concatenation for your installation
       which may include ISPF LOGON start-up procedure and other such as  
       ISPF user library concatenation CLISTs.
        
    b) If an existing user panel libary is to be used, skip to step 3e. 
        
    c) If a new user panel libary is to be used, define the new PDS 
       with similar dataset attributes of the ISPF System Panel library.
        
    d) User target panel library should be placed before the ISPF
       System Panel library and other user defined panel libraries based
       on desired concatenation sequence in DD ISPPLIB to resolve panel
       PSAM00 correctly.
 
    e) Copy members HERC01.ISRZ00.CNTL(PSAM00) and
                    HERC01.ISRZ00.CNTL(PSAM005)
       to the target panel library using ISPF 3.3 Copy function
 
       PSAM00        
       PSAM005       
        
       Note: It is suggested NOT to install PSAM00 and PSAM005 into the 
             ISPPLIB system library to maintain separation of system
             supplied and user defined panel libraries.
        
        
 
+--------------------------------------------------------------------+
| Step 4. Validate Message ISRZ002 using test Panel PSAM00           |
+--------------------------------------------------------------------+
 
    a) Log off ISPF.
 
    b) Log on to ISPF to include new component configuration.
 
    c) Type the below TSO Command in the 'OPTION ===>' line on the
       ISPF PRIMARY OPTION MENU:
 
         TSO ISPEXEC DISPLAY PANEL(PSAM00)
 
    d) The expected response from panel PSAM00 should display message ISZR002
       content on line 1, column 57 as shown below:
 
         ISPZ002 SHORT MSG
 
       Note: If an error is displayed regarding the DISPLAY command,
             panel PSAM00 may not be installed / defined correctly in the
             ISPF LOGON procedure(s).  Review the command from step c or  
             installation sequence and/or modifications to ISPF LOGON 
             procedure(s).
              
    e) If panel PSAM00 displays message content below on line 1, column 57,    
 
         INVALID MESSAGE ID
 
       the new PDS message libary is not installed / defined correctly in the
       ISPF LOGON procedure(s) or the message member (ISRZ00) was not copied
       to the target message library.  Review installation sequence and/or
       modifications to ISPF LOGON procedure(s). 

        
 
+--------------------------------------------------------------------+
| Step 5. Validate Message ISRZ005 using test Panel PSAM005          |
+--------------------------------------------------------------------+
 
    a) If your are using a version of ISPF greater than V2R1,
       continue.  Otherwise, proceed to Step 6. 
 
    b) Type the below TSO Command in the 'OPTION ===>' line on the
       ISPF PRIMARY OPTION MENU:
 
         TSO ISPEXEC DISPLAY PANEL(PSAM005)
 
    c) The expected response from panel PSAM005 should display message ISZR005
       content on line 1, column 57 as shown below:
 
         ISPZ005 SHORT MSG
 
       Note: If an error is displayed regarding the DISPLAY command,
             panel PSAM005 may not be installed / defined correctly in the
             ISPF LOGON procedure(s).  Review the command from step c or  
             installation sequence and/or modifications to ISPF LOGON 
             procedure(s).
              
    d) If panel PSAM005 displays message content below on line 1, column 57,    
 
         INVALID MESSAGE SYNTAX  or  similar message text
 
       the installed version of ISPF does not support ISRZ005 message
       definition.  However, the messages ISRZ000 - ISRZ003 are      
       supported in your ISPF version.



+--------------------------------------------------------------------+
| Step 6. Installation Complete                                      |
+--------------------------------------------------------------------+
 
    f) Installation complete.  Congratulations!  
                           
       Ready to use ISRZ00* messages in ISPF dialogues or CLISTs.





Enjoy!
                                                                            

