Using one-stage generation of stand-alone dump when migrating

When migrating to a new version of MVS™, generate a new version of the stand-alone dump program. Use the new MVS system data sets to build the new version of the stand-alone dump program. Always use a stand-alone dump version that is generated from the same release of MVS that you want to dump. IBM® does not guarantee that a different level of stand-alone dump can successfully dump anything other than the level of MVS it was designed for. The new version of MVS might have changed making the stand-alone dump program unable to locate vital information it needs to operate.

To generate a new version of the stand-alone dump program, follow the same steps you followed for a normal one-stage generation, then add the following steps:
Use the following JCL examples for DASD when migrating to a new level of MVS:
The JCL shown in Figure 1 assembles the version of the AMDSADMP macro contained in the SYSLIB data set SYS1.MACLIB, found on a 3390 DASD with volser=NEWSYS. Because the NUCLIB is specified, one-stage JCL uses the SYS1.NUCLEUS system data sets found on the 3390 DASD with volser=NEWSYS. The stand-alone dump is saved on DASD device 560 in the SYS1.SADMP data set.
Figure 1. One-stage generation JCL for a DASD (beginning with z/OS V1R12) 
//ASSEMSAD JOB MSGLEVEL=(1,1)                                  
//OSG      EXEC PGM=AMDSAOSG,REGION=5M                         
//STEPLIB  DD DSN=SYS1.LINKLIB,DISP=SHR,UNIT=3390,             
//            VOL=SER=NEWSYS                                   
//SYSLIB   DD DSN=SYS1.MACLIB,DISP=SHR,                        
//            UNIT=3390,VOL=SER=NEWSYS                         
//         DD DSN=SYS1.MODGEN,DISP=SHR,UNIT=3390,              
//            VOL=SER=NEWSYS                                   
//TRK0TEXT DD DSN=&TRK0TEXT,DISP=(,PASS),                      
//            SPACE=(4096,(2,1)),UNIT=3390                     
//DSFSYSIN DD DSN=&DSFSYSIN,DISP=(,PASS),                      
//            SPACE=(80,(4,1)),UNIT=3390                       
//GENPRINT DD SYSOUT=*                                         
//GENPARMS DD *                                                
  AMDSADMP IPL=DSYSDA,VOLSER=SADASD,                           X
           DUMP=('DATASPACES OF ASID('XCFAS',                  X
           'CTTX','APPC')'),                                   X
           MINASID=ALL,PROMPT,MSG=ALL,                         X
           CONSOLE=((020,3277),(030,3277),                     X
           (040,3277),(050,3277)),                             X
           OUTPUT=D560,                                        X
           NUCLIB=(NEWSYS,3390)                                X
   END                                                        
/*                                                            
//PUTIPL   EXEC PGM=ICKDSF,REGION=4M                          
//IPLDEV   DD DISP=OLD,UNIT=SYSDA,                            
//            VOL=(PRIVATE,RETAIN,SER=SADASD)                 
//TRK0TEXT DD DSN=&TRK0TEXT,DISP=(OLD,DELETE)                 
//SYSIN    DD DSN=&DSFSYSIN,DISP=(OLD,DELETE)                 
//SYSPRINT DD SYSOUT=*
Figure 2 shows JCL that assembles the version of the AMDSADMP macro contained in the SYSLIB data set SYS1.MACLIB, found on a 3390 DASD with volser=NEWSYS. It uses SYS1.NUCLEUS system data set found on 3390 DASD with volser=NEWSYS as suggested by IPLTEXT, IPITEXT, DVITEXT, DPLTEXT and PGETEXT. The stand-alone dump is saved on DASD device 560 in the SYS1.SADMP data set.
Figure 2. Example: One-stage generation JCL (any release) for a DASD (any release)
 //ASSEMSAD JOB MSGLEVEL=(1,1)
 //OSG EXEC PGM=AMDSAOSG,REGION=5M
 //STEPLIB DD DSN=SYS1.LINKLIB,DISP=SHR,UNIT=3390,
 //        VOL=SER=NEWSYS
 //SYSLIB  DD DSN=SYS1.MACLIB,DISP=SHR,UNIT=3390,
 //        VOL=SER=NEWSYS
 //        DD DSN=SYS1.MODGEN,DISP=SHR,UNIT=3390,
 //        VOL=SER=NEWSYS
 //IPLTEXT  DD DSN=SYS1.NUCLEUS(AMDSAIPD),DISP=SHR,
 //        VOL=SER=NEWSYS,UNIT=3390
 //IPITEXT  DD DSN=SYS1.NUCLEUS(AMDSAIPI),DISP=SHR,
 //        VOL=SER=NEWSYS,UNIT=3390
 //DVITEXT  DD DSN=SYS1.NUCLEUS(AMDSADVI),DISP=SHR,
 //        VOL=SER=NEWSYS,UNIT=3390
 //DPLTEXT  DD DSN=SYS1.NUCLEUS(AMDSADPL),DISP=SHR,
 //        VOL=SER=NEWSYS,UNIT=3390
 //PGETEXT  DD DSN=SYS1.NUCLEUS(AMDSAPGE),DISP=SHR,
 //        VOL=SER=NEWSYS,UNIT=3390
 //TRK0TEXT DD DSN=&TRK0TEXT,DISP=(,PASS),                       
 //        SPACE=(4096,(2,1)),UNIT=3390                          
 //DSFSYSIN DD DSN=&DSFSYSIN,DISP=(,PASS),                       
 //        SPACE=(80,(4,1)),UNIT=3390                            
 //GENPRINT DD SYSOUT=*                                          
 //GENPARMS DD *                                                 
   AMDSADMP IPL=DSYSDA,VOLSER=SADASD,                            X
            DUMP=('DATASPACES OF ASID('XCFAS',                   X
            'CTTX','APPC')'),                                    X
            MINASID=ALL,PROMPT,MSG=ALL                           X
            CONSOLE=((020,3277),(030,3277),                      X
                    (040,3277),(050,3277)),                      X
            OUTPUT=D560                                          X
   END                                                         
/*
//PUTIPL   EXEC PGM=ICKDSF,REGION=4M                          
//IPLDEV   DD DISP=OLD,UNIT=SYSDA,                            
//            VOL=(PRIVATE,RETAIN,SER=SADASD)                 
//TRK0TEXT DD DSN=&TRK0TEXT,DISP=(OLD,DELETE)                 
//SYSIN    DD DSN=&DSFSYSIN,DISP=(OLD,DELETE)                 
//SYSPRINT DD SYSOUT=*
Use the following JCL examples for tape when migrating to a new level of MVS:
The JCL shown in Figure 3 assembles the version of the AMDSADMP macro contained in the SYSLIB data set SYS1.MACLIB, found on a 3390 DASD with volser=NEWSYS. Because NUCLIB is specified, it uses the SYS1.NUCLEUS system data set found on 3390 DASD with volser=NEWSYS. Only one job step is necessary because the stand-alone dump program is saved on a tape 5B0 with a volume serial of SADMPT. The output gets directed to the data set SYS1.SADMP.SAMPLE on DASD 450.
Figure 3. Example: One-stage JCL (beginning with z/OS V1R12) for tape
 //SADMPGEN JOB MSGLEVEL=(1,1)                           
 //OSG EXEC PGM=AMDSAOSG,REGION=5M                       
 //STEPLIB DD DSN=SYS1.LINKLIB,DISP=SHR,UNIT=3390,       
 //        VOL=SER=NEWSYS                                
 //SYSLIB  DD DSN=SYS1.MACLIB,DISP=SHR,VOL=SER=NEWSYS    
 //        DD DSN=SYS1.MODGEN,DISP=SHR,VOL=SER=NEWSYS    
 //GENPARMS DD *
   AMDSADMP IPL=T5B0,VOLSER=SADMPT,                            X
            OUTPUT=(D450,SYS1.SADMP.SAMPLE),                   X
            DDSPROMPT=YES,                                     X
            NUCLIB=(NEWSYS,3390),                              X
            CONSOLE=((3E0,3278),(3E1,3278))                    X
   END
/*
Figure 4 shows JCL that assembles the version of the AMDSADMP macro contained in the SYSLIB data set SYS1.MACLIB, found on a 3390 DASD with volser=NEWSYS. It uses the SYS1.NUCLEUS system data set found on 3390 DASD with volser=NEWSYS. Because the stand alone dump program is being saved on a tape, only one job step is necessary. The stand alone dump program is saved on TAPE 5B0 with volume serial of SADMPT. The output goes to the data set SYS1.SADMP.SAMPLE on DASD 450.
Figure 4. Example: One-stage JCL (any release) for tape
//SADMPGEN JOB MSGLEVEL=(1,1)
//OSG EXEC PGM=AMDSAOSG,REGION=5M
//STEPLIB DD DSN=SYS1.LINKLIB,DISP=SHR,UNIT=3390,
//        VOL=SER=NEWSYS
//SYSLIB  DD DSN=SYS1.MACLIB,DISP=SHR,VOL=SER=NEWSYS
//        DD DSN=SYS1.MODGEN,DISP=SHR,VOL=SER=NEWSYS
//IPLTEXT  DD DSN=SYS1.NUCLEUS(AMDSAIPT),DISP=SHR,
//       UNIT=3390,VOL=SER=NEWSYS
//IPITEXT  DD DSN=SYS1.NUCLEUS(AMDSAIPI),DISP=SHR,
//       UNIT=3390,VOL=SER=NEWSYS
//DVITEXT  DD DSN=SYS1.NUCLEUS(AMDSADVI),DISP=SHR,
//       UNIT=3390,VOL=SER=NEWSYS
//DPLTEXT  DD DSN=SYS1.NUCLEUS(AMDSADPL),DISP=SHR,
//       UNIT=3390,VOL=SER=NEWSYS
//PGETEXT  DD DSN=SYS1.NUCLEUS(AMDSAPGE),DISP=SHR,
//       UNIT=3390,VOL=SER=NEWSYS
//GENPARMS DD *
  AMDSADMP IPL=T5B0,VOLSER=SADMPT,                              X
           OUTPUT=(D450,SYS1.SADMP.SAMPLE),                     X
           DDSPROMPT=YES,                                       X
           CONSOLE=((3E0,3278),(3E1,3278))                      X
  END
/*
Parent topic: One-stage generation