FAVER Installation Verification Job

Products

• FAVER VSAM Data Protection for z/OS

Issue/Introduction

FAVER Installation Verification Job

 

 

Environment

Faver

z/OS

Release : 4.5

Resolution

To test the installation

Define a VSAM file- Export the file then - Restore the file 

//      PUT YOUR JOBCARD HERE                                           00001002
//*******************************************************************
//* THIS IS A BASIC IVP TEST JOB FOR THE EXPORT AND RESTORE PROCESS *
//*   MAKE ALL THE REQUIRED JCL CHANGES                             *
//*******************************************************************
//*    STEP 1 WILL DELETE THE TEST FILES AND ALLOCATE THE TEST FILES*
//*    HLQ.FAVIVP.PS4096  - PS FILE                                 *
//*    HLQ.FAVIVP.CLSTR   - VSAM KSDS TO BE EXPORTED                *
//*    HLQ.FAVIVP.BKUP    - EXPORT DISK TO DISK OUTPUT FILE         *
//*******************************************************************
//ALOCDEL  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN    DD *
 DELETE 'HLQ.FAVIVP.PS4096'
 DELETE 'HLQ.FAVIVP.CLSTR' PURGE
 DELETE 'HLQ.FAVIVP.BKUP' PURGE
 DEFINE CLUSTER                           -
        (NAME(HLQ.FAVIVP.CLSTR)           -
         VOLUME(VVVVVV)                   -
         CYL(1,1)                         -
         SHR(2,3)                         -
         SPEED                            -
         UNIQUE                           -
         NOERASE                          -
         NONINDEXED                       -
         UNORDERED                        -
         NOREUSE                          -
         NONSPANNED                       -
         NOWRITECHECK                     -
         RECSZ (4096 4096)                -
         FSPC  (10 10))                   -
  DATA  (NAME(HLQ.FAVIVP.CLSTR.DATA)      -
         CISZ (4096))
 SET MAXCC=0
//*********************************************************************
//*   THIS STEP WILL ALLOCATE A PS FILE WITH LRECL 4096 AND STUFF     *
//*     THE FILE WITH DATA                                            *
//*   THE REPROD STEP WILL REPRO THE PS FILE INTO THE FILE NAMED      *
//*           HLQ.FAVIVP.CLSTR                                        *
//*********************************************************************
//ALOC4096 EXEC PGM=IEBDG
//SYSPRINT DD SYSOUT=*
//SEQOUT   DD DSN=HLQ.FAVIVP.PS4096,
//            UNIT=3390,VOL=SER=VVVVVV,
//            DCB=(RECFM=FB,LRECL=4096,BLKSIZE=4096),
//            SPACE=(CYL,(1,1)),DISP=(,CATLG)
//SYSIN    DD *
   DSD OUTPUT=(SEQOUT)
   FD NAME=FLD1,LENGTH=150,STARTLOC=1,FORMAT=AL,ACTION=RP
   FD NAME=FLD2,LENGTH=150,STARTLOC=151,PICTURE=12,'AAAAAAAAAAAA'
   FD NAME=FLD3,LENGTH=88,STARTLOC=301,FORMAT=AN,ACTION=RP
   FD NAME=FLD4,LENGTH=500,STARTLOC=389,FORMAT=AL,ACTION=RP
   FD NAME=FLD5,LENGTH=11,STARTLOC=889,FORMAT=AL,ACTION=RP
   REPEAT QUANTITY=4,CREATE=1
   CREATE QUANTITY=55,NAME=(FLD1,FLD2,FLD3,FLD4,FLD5),FILL=X'FF'
   END
//REPROD   EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD DISP=SHR,DSN=HLQ.FAVIVP.PS4096
//SYSUT2   DD DISP=SHR,DSN=HLQ.FAVIVP.CLSTR
//SYSIN    DD *
 REPRO IFILE(SYSUT1)  OFILE(SYSUT2) REPLACE ELIMIT(9999)
//********************************************************************
//*   EXPORT THE TEST CLUSTER HLQ.FAVIVP.CLSTR                       *
//*   PUT THE FAVER CBSVLINK IN THE STEPLIB                          *
//********************************************************************
//$$$$$$@ EXEC PGM=GVEXPORT
//STEPLIB   DD DISP=SHR,DSN=HLQ.FAVER45.CBSVLINK
//SYSPRINT  DD SYSOUT=*
//SYSUDUMP  DD SYSOUT=*
//********************************************************************
//*    DEFAULT DISK TO DISK OUTPUT FILE SIZE, DO NOT ALTER           *
//********************************************************************
//FVROUT0   DD DSN=HLQ.FAVIVP.BKUP,
//             UNIT=3390,SPACE=(CYL,(100,100),RLSE),
//*            VOL=SER=VVVVVV,
//             RECFM=VB,LRECL=504,DSORG=PS,
//             DISP=(NEW,CATLG,DELETE),
//             STORCLAS=??????
//********************************************************************
//*      DEFAULT VTAPE OUTPUT DEFINITION                             *
//********************************************************************
//*FVROUT0   DD DSN=HLQ.FAVIVP.BKUP,
//*             DISP=(NEW,CATLG,DELETE),UNIT=VTAPE,
//*             LABEL=(,SL,EXPDT=99000)
//********************************************************************
//*      DEFAULT PHYSICAL TAPE DEFINITION                            *
//********************************************************************
//*FVROUT0     DD DSN=HLQ.FAVIVP.BKUP,
//*            DISP=(NEW,CATLG,DELETE),UNIT=CART,
//*            LABEL=(,SL,EXPDT=99000)
//SYSIN      DD *
EXPORT EXO
CLUSTER
CL=HLQ.FAVIVP.CLSTR
//********************************************************************
//*     RESTORE THE TEST CLUSTER HLQ.FAVIVP.CLSTR                    *
//*   PUT THE FAVER CBSVLINK IN THE STEPLIB                          *
//********************************************************************
//RESTORE  EXEC PGM=GVRESTOR
//STEPLIB  DD DISP=SHR,DSN=HLQ.FAVER45.CBSVLINK
//SYSPRINT DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SNAPDD   DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//********************************************************************
//*      VTAPE BACKUP INPUT FILE FROM EXPORT STEP                    *
//********************************************************************
//*FVRIN0   DD DISP=SHR,DSN=HLQ.FAVIVP.BKUP,
//*            UNIT=VTAPE,
//*            LABEL=(1,SL,EXPDT=99000)
//********************************************************************
//*      DISK TO DISK INPUT FILE FROM EXPORT STEP                    *
//********************************************************************
//FVRIN0   DD DISP=SHR,DSN=HLQ.FAVIVP.BKUP
//SYSIN    DD *
RESTORE REMP
CLUSTER
CL=HLQ.FAVIVP.CLSTR