IKYVBKUP

IKYVBKUP contains sample JCL to back up the PKI Services VSAM data sets using the DFSMSdss DUMP utility. IKYVBKUP is installed as a member of SYS1.SAMPLIB.

Note: The following listing might not be identical to the code sample shipped with the product. For the most current sample, see SYS1.SAMPLIB member IKYVBKUP.
//IKYVBKUP JOB <job card parameters>
//*********************************************************************
//*  SAMP:      IKYVBKUP                                              *
//*                                                                   *
//*    Licensed Materials - Property of IBM                           *
//*    5694-A01                                                       *
//*    Copyright IBM Corp. 2009                                       *
//*    Status = HKY7760                                               *
//*                                                                   *
//*********************************************************************
//*                                                                   *
//*  This sample JCL may be used to backup the VSAM data sets         *
//*  PKI Services utilizes to store certificate requests and          *
//*  issued certificates. To ensure data integrity, the PKI Services  *
//*  address space must be stopped before a backup is attempted.      *
//*                                                                   *
//*********************************************************************
/*                                                                    *
//*  Caution: This is neither a JCL procedure nor a complete job.     *
//*  Before using this job step, you will have to make the following  *
//*  modifications:                                                   *
//*                                                                   *
//*  1) Change the job card to meet your system requirements.         *
//*                                                                   *
//*  2) If you are not using the default data set qualifiers,         *
//*     change all occurrences of "PKISRVD.VSAM" to the qualifiers    *
//*     you are using.                                                *
//*                                                                   *
//*  3) Change all occurrences of vvvvvv to a VOLSER value            *
//*     that contains sufficient free space to contain a complete     *
//*     backup of both of the PKI Services VSAM data set clusters.    *
//*                                                                   *
//*  4) Change the primary and secondary allocation values for the    *
//*     backup dataset to values that will ensure a complete backup   *
//*     of both VSAM data set clusters. Change the xxx value for the  *
//*     primary allocation, and the yyy value for the secondary       *
//*     allocation.                                                   *
//*                                                                   *
//*-------------------------------------------------------------------*
//* Change Activity:                                                  *
/*                                                                    *
//*    $L0=PKIS11M HKY7760 080828 PDTCG1: VSAM Backup job             *
//*                                                                   *
//* Change Description:                                               *
//*    A000000-999999 New sample written for z/OS release 11          *
//*                                                                   *
//*-------------------------------------------------------------------*
//*
//*-------------------------------------------------------------------*
//* Delete existing backup dataset 
//*-------------------------------------------------------------------*
//CATALOG  EXEC PGM=IEHPROGM
//SYSPRINT DD SYSOUT=*
//DD1      DD UNIT=3390,VOLUME=SER=vvvvvv,DISP=OLD,SPACE=(TRK,0)
//SYSIN    DD *
    SCRATCH VOL=3390=vvvvvv,DSNAME=PKISRVD.VSAM.BACKUP
/*
//*-------------------------------------------------------------------*
//* Perform a DFSMS/dss Dump of the two PKI Services VSAM clusters
//*-------------------------------------------------------------------*
//BACKUP1  EXEC PGM=ADRDSSU,COND=(8,LT)
//BACKUPDS DD DSN=PKISRVD.VSAM.BACKUP,DISP=(NEW,CATLG,DELETE),
//       SPACE=(CYL,(xxx,yyy)),VOL=SER=(vvvvvv)
//SYSPRINT DD SYSOUT=*
//SYSIN    DD *
    DUMP DATASET(INCLUDE(PKISRVD.VSAM.OST -
                         PKISRVD.VSAM.ICL)) -
         OUTDDNAME(BACKUPDS) -
         CANCELERROR         -
         COMPRESS            -
         OPTIMIZE(4)         -
         SPHERE              -
         WAIT(0,0)           -
         SHR
/*