How can I create a clean copy of 'sharedprefix.MICS.SOURCE'? We have some source members which have been manually edited and renumbered.
I would like a "clean" copy that I can apply our modifications to properly.
The ERECOVR1 job in 'sharedprefix.TAPELOAD.CNTL' can be tailored to create a clean copy of the 'sharedprefix.MICS.SOURCE' dataset. This job can be used to recover ALL or individual datasets created by the installation. See modified version of a ERECOVER1 job below that can be used to create a clean copy of just the 'sharedprefix.MICS.SOURCE' dataset.
INSERT JOB CARD
//******************************************************************
//*
//* 1. Provide job card above
//* 2. Change instream parameters below
//* 3. SPREFIX recommend a different high level than existing
//* 4. 1404 is 12.9. 1604 is 14.0. Change as required.
// 5. YOURHLQ is the ESD high level qualifier
//******************************************************************
//******************************************************************
//*
//RELOAD PROC SPREFIX=,SMICS=,TT=,IL=,SR=
//INSTALL2 EXEC PGM=&LOADER.,
// PARM=('NAME=LPEBLDD',
// 'SIZE=512K/TT=&TT;KEYTYPE=LMP;IL=&IL;SR=(&SR.)')
//SYSLIN DD DISP=SHR,
// DSN=&YOURHLQ..CAI.MICSESD.TAPELOAD.OBJ
//TAPEIN DD DISP=SHR,DCB=BUFNO=10,
// DSN=&YOURHLQ..CAI.MICSESD.FL2.TAPE.DATA
//SYSPRINT DD SYSOUT=*
//SYSLOUT DD SYSOUT=*
//SYSIN DD DUMMY
//SRC DD DISP=OLD,DSN=&SPREFIX..&SMICS.SOURCE
// PEND
//***********************************************************
//RELOAD EXEC RELOAD,
//* PARMS *
//* --------------------------------*
//* *
// TT=FULL, <-- FULL, PROD, PSP *
// IL=1904, <-- INTEGRATION LEVEL,EG. 1904 *
// YOURHLQ='X.X.X', <-- ESD HIGH LEVEL QUALIFIER *
// SPREFIX='X.X.X', <-- TARGET HIGH LEVEL QUALIFIER *
// SMICS='', <-- MICSLEVEL? *
// LOADER=IEWLDRGO, <-- YOUR SITE'S LOADER NAME *
// SR=
//***********************************************************