//SAVEKDS  JOB ,'EYSHA',MSGLEVEL=(1,1),REGION=0M,                               
//      MSGCLASS=H,CLASS=A,NOTIFY=&SYSUID                                       
//*------------------------------------------------------------------*          
//* BACKUP THE ACTIVE KEY DATA SET                                   *          
//*------------------------------------------------------------------*          
//* INSTRUCTIONS:                                                    *          
//* - UPDATE THE JCL JOB CARD TO FIT YOUR ENVIRONMENT                *          
//* - UPDATE THE DUMPDS DSN WITH THE BACKUP KDS NAME                 *          
//*                                                                  *          
//*     NOTE: AN EXAMPLE BACKUP KDS NAMING SCHEME IS                 *          
//*             <ORIGINALNAME>.D<YYMMDD>.BAK<SEQNO>                  *          
//*                                                                  *          
//* - UPDATE THE DUMPDS UNIT, VOLUME AND SPACE FOR THE BACKUP        *          
//* - UPDATE THE DUMP DATASET INCLUDE WITH THE ORIGINAL KDS NAME     *          
//*                                                                  *          
//* - SUBMIT THIS JCL                                                *          
//*   (E.G. SUB 'HLQ.MLD.LLQ(SAVEKDS)')                              *          
//*------------------------------------------------------------------*          
//BACKUP   EXEC PGM=ADRDSSU                                                     
//SYSPRINT DD SYSOUT=*                                                          
//DUMPDS   DD DISP=(,CATLG),                                                    
//            DSN='EYSHA.ICSF.CSF77C1.CKDSR.D190426.BAK0001',                   
//            VOLUME=SER=CSFDR7,UNIT=3390,                                      
//            SPACE=(CYL,(10,10),RLSE)                                          
//SYSIN    DD *                                                                 
  DUMP DATASET(INCLUDE('EYSHA.ICSF.CSF77C1.CKDSR')) -                           
       ADMINISTRATOR OUTDDNAME(DUMPDS)                                          
/*