//SERVZFS2 JOB ,D10.JOBS,                                                       
//         MSGLEVEL=(1,1),PERFORM=10,CLASS=A,MSGCLASS=I                        
//*****************************************************************/            
//*                                                               */            
//*  Job to service the z/OS V1R12 ZFS on PLEX1                   */                      
//*                                                               */  
//*  step 1 - unmounts old zFS                                    */ 
//*  step 2 - deletes old zFS                                     */ 
//*  step 3 - restores version zFS and renames to old zFS name    */ 
//*  step 4 - runs customization exec (see CUSTZFS2)              */ 
//*                                                               */
//*  XXXXXX is the primary (first) SYSRES volume                  */
//*                                                               */           
//*****************************************************************/            
//UNMOUNT  EXEC PGM=IKJEFT01                                                    
//SYSTSPRT DD SYSOUT=*                                                          
//SYSTSIN  DD *                                                                 
   UNMOUNT FILESYSTEM(OMVSSPN.XXXXXX.ROOT.FS) IMMEDIATE                         
//*******************************************************************           
//* DELETE EXISTING ROOT                                                        
//*******************************************************************           
//DELETE1  EXEC  PGM=IKJEFT01                                                   
//SYSTSPRT DD SYSOUT=(H,,STD)                                                   
//SYSABEND DD SYSOUT=(H,,STD)                                                   
//SYSTSIN  DD DATA,DLM='/>'                                                     
 DELETE 'OMVSSPN.XXXXXX.ROOT.FS'                                                
/>                                                                              
//*******************************************************************
//* RESTORE NEW ROOT ZFS
//*******************************************************************
//RESTORE1 EXEC PGM=ADRDSSU,TIME=60,REGION=4096K                                
//SYSPRINT DD SYSOUT=*                                                          
//SYSABEND DD SYSOUT=*                                                          
//DD1      DD DSN=MVSBUILD.ITOSR12.ZFSDUMP,DISP=SHR,                            
//         UNIT=3390,VOL=SER=XXXXXX                                             
//SYSIN    DD *                                                                 
 RESTORE DATASET(INCLUDE(OMVS.ZFS.AQTS.**)) -                                   
      INDD(DD1) -                                                               
      TOL(ENQF) -                                                               
      STORCLAS(SMSOE) -                                                         
      MGMTCLAS(SMSOE) -                                                         
 RENAMEU(OMVS.ZFS.AQTS.**,OMVSSPN.XXXXXX.ROOT.FS) -                             
      REPLACE CATALOG                                                           
/*                                                                              
//**********************************************************************        
//* CUSTOMIZE ROOT ZFS                                                 *        
//**********************************************************************        
//CUSTOM1  EXEC PGM=IKJEFT01,DYNAMNBR=20,REGION=4M                      00002700
//SYSUDUMP DD SYSOUT=(I,,STD)                                           00002800
//SYSTSPRT DD SYSOUT=(I,,STD)                                           00002900
//SYSEXEC  DD DSN=SYS1.SBPXEXEC,DISP=SHR                                        
//SYSPROC  DD DSN=ISP.SISPCLIB,DISP=SHR                                         
//ISPMLIB  DD DSN=SYS1.SBPXMENU,DISP=SHR                                        
//         DD DSN=ISP.SISPMENU,DISP=SHR                                         
//ISPPLIB  DD DSN=SYS1.SBPXPENU,DISP=SHR                                        
//         DD DSN=ISP.SISPPENU,DISP=SHR                                         
//ISPSLIB  DD DSN=ISP.SISPSENU,DISP=SHR                                         
//ISPTLIB  DD DSN=ISP.SISPTENU,DISP=SHR                                         
//         DD DSN=SYS1.SBPXTENU,DISP=SHR                                        
//ISPPROF  DD   DSN=&&TMPPRF,                                                   
//         DISP=NEW,UNIT=3390,SPACE=(CYL,(1,1,1)),                              
//         DCB=(RECFM=FB,BLKSIZE=3120,LRECL=80)                                 
//SYSLIB   DD DSN=SYS1.MACLIB,DISP=SHR                                          
//         DD DSN=ISP.SISPMACS,DISP=SHR                                         
//         DD DSN=SYS1.MODGEN,DISP=SHR                                          
//SYSTSIN  DD *                                                                 
 MKDIR '/service/XXXXXX' MODE(7,5,5)                                            
 MOUNT FILESYSTEM('OMVSSPN.XXXXXX.ROOT.FS') -                                   
  MOUNTPOINT('/service/XXXXXX') -                                               
  TYPE(ZFS) -                                                                   
  MODE(RDWR)                                                                    
 EXEC 'D10.PETHFSN.JOBS(CUSTZFS2)' '/service/XXXXXX'                            
 UNMOUNT FILESYSTEM('OMVSSPN.XXXXXX.ROOT.FS') IMMEDIATE                         
//*********************************************************************         
//* THIS COPIES THE UPDATED PLEX2 ZFS2 JOB TO THE PLEX2 ACCESSABLE              
//* DATASET FOR OPERATIONS TO SUBMIT, BUT ONLY IF THE RETURN                    
//* CODE from the "RESTORE1" step is less THAN '8'.                             
//*********************************************************************         
//COPYSTEP EXEC PGM=IEBGENER,COND=(7,LT,RESTORE1)                               
//SYSPRINT DD SYSOUT=(*,,STD),HOLD=YES                                          
//SYSIN    DD DUMMY,DCB=BLKSIZE=80                                              
//*                                                                             
//SYSUT1   DD DISP=SHR,DSN=D10.PET.STAGE3.TEMP(PLX2ZFS2)                        
//SYSUT2   DD DISP=OLD,DSN=D10.PET.PLEX2.OMVS.JCL(PLX2ZFS2)