Promotion Support Facilities › Importing Entities Exported by NDVRDLVR › NDVRBOOK Migration JCL (Executable) › 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:      SAMPMIGE
//*
//*  PURPOSE:  MIGRATE-IMPORT JOB FOR EXECUTABLE-ONLY STYLE MIGRATION.
//*
//*  STEP:     FUNCTION:
//*  =====     =========
//*
//*  DDDLDLOD  IMPORTS LOAD MODULES FROM DELIVERY OUTPUT FILE
//*
//*  BTATAGEN  RUNS ADSOBTAT TO UPDATE THE ADS/A APPLICATION TABLE.
//*
//*  UCFDCMT   (OPTIONAL) USES 'UCFBATCH' TO DRIVE DCMT TO VARY
//*            LOAD MODULES / MAPS TO NEW COPY.
//*            NOTE: YOU MUST GENERATE 'UCFBATCH' MODULE AND SET ITS
//*                  PROGRAM NAME HERE AS GENERATED IN YOUR SHOP.
//*
//*********************************************************************
//*
//DDDLDLOD EXEC PGM=NDVRBOOK,REGION=1000K
//SYSCTL   DD DISP=SHR,DSN=idms.sysctl
//NDVRENI  DD DISP=SHR,DSN=user.ndvrdsel.dseno
//NDVRLST  DD SYSOUT=*
//NDVRERR  DD SYSOUT=*
//SYSLST   DD SYSOUT=*
//SYSPCH   DD DUMMY
//SYSUDUMP DD DUMMY
//SYSIDMS  DD *
DMCL=dmcl-name
DICTNAME=dictionary-name
Other Optional SYSIDMS Parameters
/*
//NDVRIPT  DD *
   SIGNON
     USER = youruserid PASSWORD = yourpswd
          DICTNAME userdict.
  PROGRAM = IDMSDDDL.
  OPTION = MIGRATE .
/*
//SYSIPT    DD DSN=user.ndvrdlvr.dsdlod,DISP=SHR
//*
//BTATAGEN EXEC PGM=NDVRBOOK,REGION=1000K
//SYSCTL   DD DISP=SHR,DSN=idms.sysctl
//NDVRENI  DD DISP=SHR,DSN=user.ndvrdsel.dseno
//SYSIPT   DD DISP=SHR,DSN=user.ndvrdlvr.dsagen
//NDVRLST  DD SYSOUT=*
//NDVRERR  DD SYSOUT=*
//SYSLST   DD SYSOUT=*
//SYSPCH   DD DUMMY
//SYSUDUMP DD DUMMY
//SYSIDMS  DD *
DMCL=dmcl-name
DICTNAME=dictionary-name
Other Optional SYSIDMS Parameters
/*
//NDVRIPT  DD *
   SIGNON
     USER = youruserid PASSWORD = yourpswd
          DICTNAME userdict.
  PROGRAM = ADSOBTAT.
  OPTION = MIGRATE .
/*
//*
//* 'UCFBATCH' MAY NOT BE THE PROGRAM-ID GENERATED IN YOUR SHOP.
//* STEP IS OPTIONAL
//*
//UCFDCMT  EXEC PGM=UCFBATCH,REGION=500K
//SYSCTL   DD DISP=SHR,DSN=idms.sysctl
//SYSIPT   DD DISP=SHR,DSN=user.ndvrdlvr.dsdvar
//SYSLST   DD SYSOUT=*
//SYSPCH   DD DUMMY
//SYSUDUMP DD DUMMY
//SYSIDMS  DD *
DMCL=dmcl-name
DICTNAME=dictionary-name
Other Optional SYSIDMS Parameters
/*