Promotion Support Facilities › NDVRDSEL Command Syntax › NDVRDSEL 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:      SAMPDSEL
//*
//*  PURPOSE:  SELECT IDD ENTITIES FOR MIGRATION.
//*
//*  STEP:     FUNCTION:
//*  =====     =========
//*
//*  SELECT    GENERATE ENTITY LIST TO DRIVE THE REST OF MIGRATION
//*            OPTIONALLY, RE-EDIT PRIOR MODIFIED/RECYCLED LIST.
//*
//*********************************************************************
//*
//SELECT   EXEC PGM=NDVRDSEL,REGION=1000K
//SYSCTL   DD DISP=SHR,DSN=idms.sysctl
//*
//*  THE NDVRENI FILE IS ONLY USED IF INPUT=FILE.
//*  OMIT OR DUMMY OUT IF INPUT=DATABASE.
//*
//NDVRENI  DD DISP=SHR,DSN=user.ndvrdsel.dseni
//*
//*  THE NDVRENO FILE IS PROCESSED BY ALL MIGRATION JOBS THAT FOLLOW.
//*
//NDVRENO  DD DSN=user.ndvrdsel.dseno,DISP=(,CATLG,DELETE),
//          UNIT=disk,VOL=SER=volser,SPACE=(TRK,(5,5),RLSE),
//          DCB=(LRECL=80,BLKSIZE=3120,RECFM=FB)
//NDVRLST  DD SYSOUT=*
//NDVRDTL  DD SYSOUT=*
//NDVRUTL  DD SYSOUT=*
//NDVRERR  DD SYSOUT=*
//SYSUDUMP DD DUMMY
//SYSIDMS  DD *
DMCL=dmcl-name
DICTNAME=dictionary-name
Other Optional SYSIDMS Parameters
/*
//NDVRIPT  DD *
   SIGNON
     USER = youruserid PASSWORD = yourpswd
          DICTNAME userdict.
   TARGET SYSTEM ='cvsysid' DICTNAME ='userdict'.
   MODE = EXECUTE.
   INPUT IS DATABASE.
   EXPAND IDD RELATIONSHIPS.
   SIGNOUT TO USER userid.
   INCLUDE USER = userid.
   EXCLUDE WHERE STATUS = status.
   WARN WHERE CCID MULTIPLE.
   WARN WHERE USER MULTIPLE WHERE USER NULL.
/*