Sample JCL for Backup/Restore Facility ESFSPTP

Products

• OM Spool

Issue/Introduction

ESFSPTP is a utility that executes a file load/unload at any time during operation of the Spool started task. This job must run on the same system where the Spool STC is currently running. It cannot run while the task is down. It is used to backup and restore all or selected spool files.

 

Resolution

 

//IQSPTP JOB ...                                                     
//*********************************************************************
//*  LIB:    CAI.SAMPJCL(IQB5SPTP)                                    *
//*                                                                   *
//*  The ESFSPTP utility is used to backup and restore files.         *
//*                                                                   *
//*  Documentation for this utility can be found in the Operations,   *
//*  Commands and Messages Guide.  This example will back up all      *
//*  files for the CA-Spool subsystem named ESF due to the SPTPPARM   *
//*  value of 'BFALL,SUBSYS=ESF'.  To restore all CA-Spool files      *
//*  that were backed up using 'BFALL,SUBSYS=ESF', change the         *
//*  SPTPPARM to 'LFALL,SUBSYS=ESF' and set BKPFILE to 'DUMMY,' and   *
//*  LOADFILE to ''.                                                  *
//*                                                                   *
//*  Depending on the number of files you want to back up, you may    *
//*  need to adjust the space allocations on the BACKUP DD statement. *
//*                                                                   *
//*********************************************************************
//ESFSPTP  PROC SYSOUT='*',    * Sysout class                          
//         CAI='CAI.',         * High level qualifier                  
//         SPTPPARM='BFALL,SUBSYS=ESF', Parameter to backup all files  
//*        SPTPPARM='LFALL,SUBSYS=ESF', Parameter to load all files    
//         BKPFILE='',         * Create a backup file    
//         LOADFILE='DUMMY,',  * Dummy out input file   
//         VOL=OPM001          * Volser for backup file 
//*                                                     
//BACKUP   EXEC PGM=ESFSPTP,PARM='&SPTPPARM'            
//STEPLIB  DD DSN=&CAI.CAILIB,DISP=SHR                  
//SYSPRINT DD SYSOUT=&SYSOUT                            
//SYSOUT   DD SYSOUT=&SYSOUT                            
//INDEX    DD SYSOUT=&SYSOUT                            
//INDEXXT  DD SYSOUT=&SYSOUT                            
//BACKUP   DD &BKPFILE.DSN=&CAI.BACKUP,DISP=(NEW,CATLG),
//         UNIT=SYSDA,SPACE=(CYL,(10,10),RLSE),         
//         VOL=SER=&VOL                                 
//LOAD     DD &LOADFILE.DSN=&CAI.BACKUP,DISP=SHR        
//ESFSPTP PEND                                          
//STEP01   EXEC   ESFSPTP                                             

 

Additional Information

Backup-Restore Utility (ESFSPTP)