//TSGMXZ1S JOB (AD00),'#04D42 ZELDEN', // NOTIFY=&SYSUID, // CLASS=M,MSGCLASS=H,MSGLEVEL=(1,1) //* //******************************************************************** //* THIS JOB WILL ADD A NEW TARGET AND DLIB ZONE PLUS SMP DATASETS //* TO AN EXISTING GLOBAL ZONE. //******************************************************************** //******************************************************************** //* GLOBAL CHANGE ZZZZZZZZ.GLOBAL.CSI TO BE THE EXISTING GLOBAL ZONE //* GLOBAL CHANGE ZZZZZZZZ.SMPPTS TO BE THE EXISTING SMPPTS DSN //******************************************************************** //* GLOBAL CHANGE XXXXXXXX TO BE THE HIGH LEVEL INDEX OF SMP DATASETS //* GLOBAL CHANGE SMPVOL TO BE THE SMP DATASET DASD VOLUME //* GLOBAL CHANGE P004 TO BE THE SMP SREL YOU WANT IN THE OPTIONS //* GLOBAL CHANGE TARGET1 TO BE THE TARGET ZONE NAME YOU DESIRE //* GLOBAL CHANGE DLIB1 TO BE THE DLIB ZONE NAME YOU DESIRE //* GLOBAL CHANGE OPTNCP TO BE THE OPTIONS NAME YOU DESIRE //******************************************************************** //ALLOC EXEC PGM=IEFBR14 //SMPSCDS DD DSN=XXXXXXXX.SMPSCDS, // DISP=(,CATLG,DELETE), // SPACE=(TRK,(10,5,50)),UNIT=SYSALLDA, // VOL=SER=SMPVOL, // DCB=(LRECL=80,BLKSIZE=6080,RECFM=FB) //*SMPLTS DD DSN=XXXXXXXX.SMPLTS, //* DISP=(,CATLG,DELETE), //* SPACE=(TRK,(5,5,10)),UNIT=SYSALLDA, //* VOL=SER=SMPVOL, //* DCB=(BLKSIZE=6233,RECFM=U) //SMPMTS DD DSN=XXXXXXXX.SMPMTS, // DISP=(,CATLG,DELETE), // SPACE=(TRK,(5,5,10)),UNIT=SYSALLDA, // VOL=SER=SMPVOL, // DCB=(LRECL=80,BLKSIZE=6080,RECFM=FB) //SMPSTS DD DSN=XXXXXXXX.SMPSTS, // DISP=(,CATLG,DELETE), // SPACE=(TRK,(5,5,10)),UNIT=SYSALLDA, // VOL=SER=SMPVOL, // DCB=(LRECL=80,BLKSIZE=6080,RECFM=FB) //SMPTLOG DD DSN=XXXXXXXX.SMPTLOG, // DISP=(,CATLG,DELETE), // SPACE=(TRK,(30,5)),UNIT=SYSALLDA, // VOL=SER=SMPVOL, // DCB=(BLKSIZE=3200,LRECL=260,RECFM=VB) //SMPTLOGA DD DSN=XXXXXXXX.SMPTLOGA, // DISP=(,CATLG,DELETE), // SPACE=(TRK,(1,5)),UNIT=SYSALLDA, // VOL=SER=SMPVOL, // DCB=(BLKSIZE=3200,LRECL=260,RECFM=VB) //SMPDLOG DD DSN=XXXXXXXX.SMPDLOG, // DISP=(,CATLG,DELETE), // SPACE=(TRK,(30,5)),UNIT=SYSALLDA, // VOL=SER=SMPVOL, // DCB=(BLKSIZE=3200,LRECL=260,RECFM=VB) //SMPDLOGA DD DSN=XXXXXXXX.SMPDLOGA, // DISP=(,CATLG,DELETE), // SPACE=(TRK,(1,5)),UNIT=SYSALLDA, // VOL=SER=SMPVOL, // DCB=(BLKSIZE=3200,LRECL=260,RECFM=VB) //DEFCSI EXEC PGM=IDCAMS,REGION=1024K //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE CLUSTER(+ NAME(XXXXXXXX.TARGET1.CSI) + FREESPACE(10,5) + KEYS(24 0) + RECORDSIZE(24 143) + BUFSP(20480) + SHR(2) + VOLUME(SMPVOL) + ) + DATA( + NAME(XXXXXXXX.TARGET1.CSI.DATA) + CYLINDERS(4 1) + CISZ(4096) + ) + INDEX( + NAME(XXXXXXXX.TARGET1.CSI.INDEX) + TRACKS(1 1) + IMBED + ) DEFINE CLUSTER(+ NAME(XXXXXXXX.DLIB1.CSI) + FREESPACE(10,5) + KEYS(24 0) + RECORDSIZE(24 143) + BUFSP(20480) + SHR(2) + VOLUME(SMPVOL) + ) + DATA( + NAME(XXXXXXXX.DLIB1.CSI.DATA) + CYLINDERS(3 1) + CISZ(4096) + ) + INDEX( + NAME(XXXXXXXX.DLIB1.CSI.INDEX) + TRACKS(1 1) + IMBED + ) /* //INITCSI EXEC PGM=IDCAMS,REGION=1024K //ZPOOL DD DISP=SHR, // DSN=SYS1.MACLIB(GIMZPOOL) //TARGET1 DD UNIT=SYSALLDA, // DSN=XXXXXXXX.TARGET1.CSI,DISP=SHR //DLIB1 DD UNIT=SYSALLDA, // DSN=XXXXXXXX.DLIB1.CSI,DISP=SHR //SYSPRINT DD SYSOUT=* //SYSIN DD * REPRO INFILE(ZPOOL) + OUTFILE(TARGET1) REPRO INFILE(ZPOOL) + OUTFILE(DLIB1) /* //BLDCSI EXEC PGM=GIMSMP,REGION=4096K,PARM='DATE=U' //SMPOUT DD SYSOUT=* //SMPRPT DD SYSOUT=* //SMPLIST DD SYSOUT=* //SMPSNAP DD SYSOUT=* //SMPPUNCH DD DUMMY //SYSPRINT DD SYSOUT=* //*------------------------------------------------------------------- //* SMP DATASETS //*------------------------------------------------------------------- //SMPPTS DD DISP=OLD,DSN=ZZZZZZZZ.SMPPTS //SMPMTS DD DISP=OLD,DSN=XXXXXXXX.SMPMTS //SMPSTS DD DISP=OLD,DSN=XXXXXXXX.SMPSTS //SMPSCDS DD DISP=OLD,DSN=XXXXXXXX.SMPSCDS //SMPLOG DD SYSOUT=* //SMPCSI DD DISP=SHR,DSN=ZZZZZZZZ.GLOBAL.CSI //TARGET1 DD DISP=SHR,DSN=XXXXXXXX.TARGET1.CSI //DLIB1 DD DISP=SHR,DSN=XXXXXXXX.DLIB1.CSI //SMPWRK1 DD UNIT=SYSALLDA,SPACE=(CYL,(2,1,5)), // DCB=BLKSIZE=3120,DISP=(,DELETE) //SMPWRK2 DD UNIT=SYSALLDA,SPACE=(CYL,(2,1,5)), // DCB=BLKSIZE=3120,DISP=(,DELETE) //SMPWRK3 DD UNIT=SYSALLDA,SPACE=(CYL,(2,1,5)), // DCB=BLKSIZE=3120,DISP=(,DELETE) //SMPWRK4 DD UNIT=SYSALLDA,SPACE=(CYL,(2,1,5)), // DCB=BLKSIZE=3120,DISP=(,DELETE) //*SMPWRK5 DD UNIT=SYSALLDA,SPACE=(CYL,(2,1,5)), //* DCB=BLKSIZE=7294,DISP=(,DELETE) //SMPWRK6 DD UNIT=SYSALLDA,SPACE=(CYL,(2,1,5)), // DCB=BLKSIZE=3120,DISP=(,DELETE) //SYSUT1 DD UNIT=SYSALLDA,SPACE=(CYL,(2,1)),DISP=(,DELETE) //SYSUT2 DD UNIT=SYSALLDA,SPACE=(CYL,(2,1)),DISP=(,DELETE) //SYSUT3 DD UNIT=SYSALLDA,SPACE=(CYL,(2,1)),DISP=(,DELETE) //SYSUT4 DD UNIT=SYSALLDA,SPACE=(TRK,(2,1)),DISP=(,DELETE) //SMPTLIB DD UNIT=SYSALLDA,VOL=SER=SMPVOL,DISP=OLD //SYSLIB DD DISP=SHR,DCB=(BLKSIZE=19040), // DSN=XXXXXXXX.SMPMTS // DD DISP=SHR,DSN=SYS1.MACLIB //SMPCNTL DD * SET BDY(GLOBAL). UCLIN. ADD GLOBALZONE ZONEINDEX( (TARGET1,XXXXXXXX.TARGET1.CSI,TARGET), (DLIB1,XXXXXXXX.DLIB1.CSI,DLIB) ). ENDUCL. SET BDY(TARGET1). UCLIN. ADD TARGETZONE(TARGET1) SREL(P004) OPTIONS(OPTNCP) RELATED(DLIB1). ADD DDDEF(SMPPTS) SHR DA(ZZZZZZZZ.SMPPTS) . /* ADD DDDEF(SMPLTS) SHR UNIT(SYSALLDA) VOLUME(SMPVOL) DA(XXXXXXXX.SMPLTS) . */ ADD DDDEF(SMPMTS) SHR DA(XXXXXXXX.SMPMTS) . ADD DDDEF(SMPSTS) SHR DA(XXXXXXXX.SMPSTS) . ADD DDDEF(SMPSCDS) SHR DA(XXXXXXXX.SMPSCDS) . ADD DDDEF(SMPTLIB) UNIT(SYSALLDA) VOLUME(SMPVOL) . ADD DDDEF(SYSLIB) CONCAT( SMPMTS ) . /* ADD DDDEF(SMPLOG) SYSOUT(*) . ADD DDDEF(SMPLOGA) SYSOUT(*) . */ ADD DDDEF(SMPLOG) MOD DA(XXXXXXXX.SMPTLOG). ADD DDDEF(SMPLOGA) MOD DA(XXXXXXXX.SMPTLOGA). ADD DDDEF(SMPOUT) SYSOUT(*) . ADD DDDEF(SMPLIST) SYSOUT(*) . ADD DDDEF(SMPRPT) SYSOUT(*) . ADD DDDEF(SMPSNAP) SYSOUT(*) . ADD DDDEF(SMPDEBUG) SYSOUT(*) . ADD DDDEF(SMPPUNCH) SYSOUT(B) . ADD DDDEF(SYSPRINT) SYSOUT(*) . ADD DDDEF(SYSUDUMP) SYSOUT(*) . ADD DDDEF(SMPWRK1) BLK(3120) SPACE(384,380) DIR(111) NEW DELETE UNIT(SYSALLDA). ADD DDDEF(SMPWRK2) BLK(3120) SPACE(384,380) DIR(111) NEW DELETE UNIT(SYSALLDA). ADD DDDEF(SMPWRK3) BLK(3120) SPACE(384,380) DIR(111) NEW DELETE UNIT(SYSALLDA). ADD DDDEF(SMPWRK4) BLK(3120) SPACE(384,380) DIR(111) NEW DELETE UNIT(SYSALLDA). /*ADD DDDEF(SMPWRK5) BLK(7294) SPACE(384,380) DIR(111) NEW DELETE UNIT(SYSALLDA). */ ADD DDDEF(SMPWRK6) BLK(3120) SPACE(384,380) DIR(111) NEW DELETE UNIT(SYSALLDA). ADD DDDEF(SYSUT1) BLK(3120) SPACE(384,760) UNIT(SYSALLDA). ADD DDDEF(SYSUT2) BLK(3120) SPACE(384,760) UNIT(SYSALLDA). ADD DDDEF(SYSUT3) BLK(3120) SPACE(384,760) UNIT(SYSALLDA). ADD DDDEF(SYSUT4) BLK(3120) SPACE(384,760) UNIT(SYSALLDA). ADD DDDEF(SYSPUNCH) BLK(3120) SPACE(380,380) DIR(64) UNIT(SYSALLDA) . ENDUCL. SET BDY(DLIB1). UCLIN. ADD DLIBZONE(DLIB1) ACCJCLIN SREL(P004) OPTIONS(OPTNCP) RELATED(TARGET1). ADD DDDEF(SMPPTS) SHR DA(ZZZZZZZZ.SMPPTS) . /* ADD DDDEF(SMPLTS) SHR UNIT(SYSALLDA) VOLUME(SMPVOL) DA(XXXXXXXX.SMPLTS) . */ ADD DDDEF(SMPMTS) SHR DA(XXXXXXXX.SMPMTS) . ADD DDDEF(SMPSTS) SHR DA(XXXXXXXX.SMPSTS) . ADD DDDEF(SMPSCDS) SHR DA(XXXXXXXX.SMPSCDS) . ADD DDDEF(SMPTLIB) UNIT(SYSALLDA) VOLUME(SMPVOL) . ADD DDDEF(SYSLIB) CONCAT( SMPMTS ) . /* ADD DDDEF(SMPLOG) SYSOUT(*) . ADD DDDEF(SMPLOGA) SYSOUT(*) . */ ADD DDDEF(SMPLOG) MOD DA(XXXXXXXX.SMPDLOG). ADD DDDEF(SMPLOGA) MOD DA(XXXXXXXX.SMPDLOGA). ADD DDDEF(SMPOUT) SYSOUT(*) . ADD DDDEF(SMPLIST) SYSOUT(*) . ADD DDDEF(SMPRPT) SYSOUT(*) . ADD DDDEF(SMPSNAP) SYSOUT(*) . ADD DDDEF(SMPDEBUG) SYSOUT(*) . ADD DDDEF(SMPPUNCH) SYSOUT(B) . ADD DDDEF(SYSPRINT) SYSOUT(*) . ADD DDDEF(SYSUDUMP) SYSOUT(*) . ADD DDDEF(SMPWRK1) BLK(3120) SPACE(384,380) DIR(111) NEW DELETE UNIT(SYSALLDA). ADD DDDEF(SMPWRK2) BLK(3120) SPACE(384,380) DIR(111) NEW DELETE UNIT(SYSALLDA). ADD DDDEF(SMPWRK3) BLK(3120) SPACE(384,380) DIR(111) NEW DELETE UNIT(SYSALLDA). ADD DDDEF(SMPWRK4) BLK(3120) SPACE(384,380) DIR(111) NEW DELETE UNIT(SYSALLDA). /*ADD DDDEF(SMPWRK5) BLK(7294) SPACE(384,380) DIR(111) NEW DELETE UNIT(SYSALLDA). */ ADD DDDEF(SMPWRK6) BLK(3120) SPACE(384,380) DIR(111) NEW DELETE UNIT(SYSALLDA). ADD DDDEF(SYSUT1) BLK(3120) SPACE(384,760) UNIT(SYSALLDA). ADD DDDEF(SYSUT2) BLK(3120) SPACE(384,760) UNIT(SYSALLDA). ADD DDDEF(SYSUT3) BLK(3120) SPACE(384,760) UNIT(SYSALLDA). ADD DDDEF(SYSUT4) BLK(3120) SPACE(384,760) UNIT(SYSALLDA). ADD DDDEF(SYSPUNCH) BLK(3120) SPACE(380,380) DIR(64) UNIT(SYSALLDA) . ENDUCL. /*