Promotion Support Facilities › NDVRDCF1 Target Confirmation › NDVRDCF1 Sample JCL › Sample z/OS and OS/390 JCL

Sample z/OS and OS/390 JCL

//JOBNAME  JOB YOUR.JOBCARD.INFORMATION
//JOBLIB   DD DISP=SHR,DSN=usercv.loadlib
//         DD DISP=SHR,DSN=ndvrdb.loadlib
//         DD DISP=SHR,DSN=idms.loadlib
//*********************************************************************
//*
//*  JOB:      SAMPDCF1
//*
//*  PURPOSE:  POST-MIGRATION CONFIRMATION EXTRACT: RUN ON TARGET.
//*
//*  STEP:     FUNCTION:
//*  =====     =========
//*
//*  CONFIRM1  EXTRACT LIST OF MIGRATED ENTITIES RECEIVED AT TARGET
//*            SYSTEM TO LOG BACK ON SENDING SYSTEM.
//*
//*********************************************************************
//CONFIRM1 EXEC PGM=NDVRDCF1,REGION=1000K
//SYSCTL   DD DSN=idms.sysctl,DISP=SHR
//SYSIDMS  DD *
DMCL=dmcl-name
DICTNAME=dictionary-name
Other Optional SYSIDMS Parameters
/*
//NDVRLST  DD SYSOUT=*
//NDVRDTL  DD SYSOUT=*
//NDVRERR  DD SYSOUT=*
//NDVRENI  DD DSN=user.ndvrdsel.dseno,DISP=SHR
//*
//*  CONFIRM FILE TO PASS TO NDVRDCF2 ON THE SENDING SYSTEM:
//*
//NDVRENO  DD DSN=user.ndvrdcf1.dseno,DISP=(,CATLG,DELETE),
//       UNIT=disk,SPACE=(TRK,(15,5),RLSE),VOL=SER=volser,
//       DCB=(LRECL=80,BLKSIZE=3120,RECFM=FB)
//SYSUDUMP DD SYSOUT=*
//NDVRIPT  DD *
   SIGNON
     USER = youruserid PASSWORD = yourpswd
          DICTNAME userdict.
/*