// JOB (),'USER COMMENT', // CLASS=,MSGCLASS=, // TIME=1440,REGION=0M,NOTIFY=&SYSUID //* //******************************************************************** //* * //* DESCRIPTION: * //* This job decompresses the downloaded Installation System * //* image. * //* * //* RESULT: * //* Creates .BMC.INSTALL * //* .BMC.INSTALL.LOAD * //* .BMC.POSZBOOT * //* * //* STEPS: * //* * //* 1. Customize the jobcards to comply with your site's * //* requirements. There are two job cards in this job. * //* * //* PARAMETER TO OVERRIDE/CHANGE: * //* --------------------------------------------------------------* //* Job Name - Change to a valid job name for * //* your site. * //* * //* Job Account - Change to a valid job account for * //* your site. * //* * //* Job Class - Change to a valid job class for * //* your site. * //* * //* Message Class - Change to a valid message class * //* for your site. * //* * //* 2. Change the INSTSUB step parameters to comply with your * //* site requirements. Uncomment any needed lines by removing * //* the beginning /* and ending */ for each line. * //* All data sets created will use the specified allocation * //* parameters. * //* * //* PARAMETER TO OVERRIDE/CHANGE: * //* --------------------------------------------------------------* //* Installation - Change to the * //* System Image file name that was created in the download * //* of the installation System image job. * //* * //* Temporary HLQ - Change to a valid HLQ to be used * //* for temporary work data sets. * //* Default value for this field is USERID and * //* the maximum length is 17 characters. * //* * //* * //* Installation - Change to valid HLQ that * //* System HLQ will be used for the following data sets: * //* .BMC.INSTALL * //* .BMC.INSTALL.LOAD * //* .BMC.POZBOOT * //* Maximum length is 27 characters. * //* * //* UNIT - Change &UNITVAL to a valid DASD unit * //* for your site. * //* * //* VOLUME - Change &VOLVAL to a valid VOLUME serial * //* number for your site. * //* * //* SMS storage - Change &SCLSVAL to a valid SMS storage * //* class class for your site. * //* * //* SMS management - Change &MCLSVAL to a valid SMS management * //* class class for your site. * //* * //* SMS data class - Change &DCLSVAL to a valid SMS data class * //* for your site. * //* * //* Supress - Change MSGOUT to valid message class for * //* IEBCOPY output your site that automatically deletes JES * //* output. This will reduce the amount of * //* output sent to the JES spool for this job. * //* * //* 3. Submit this JOB to perform the decompression process. * //* * //******************************************************************** //INSTSUB EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //SYSIN DD DUMMY //SYSUT2 DD SYSOUT=(,INTRDR) //SYSUT1 DD DATA,DLM=ZZ // JOB (),'USER COMMENT', // CLASS=,MSGCLASS=, // TIME=1440,REGION=0M,NOTIFY=&SYSUID //COPYCLST EXEC PGM=IEBGENER,COND=(4,LT) //SYSPRINT DD SYSOUT=* //SYSIN DD DUMMY //SYSUT1 DD DATA,DLM=YY /* PROFILE PREFIX() */ DELETE INS.OBJ; ATTR BLKFB DSORG(PS) RECFM(F,B) LRECL(80) BLKSIZE(3120); ALLOC DDN(OBJOUT) DSN(INS.OBJ) + /* UNIT(&UNITVAL) VOLUME(&VOLVAL) */ + /* STORCLAS(&SCLSVAL) MGMTCLAS(&MCLSVAL) */ + /* DATACLAS(&DCLSVAL) */ + SPACE(1,1) TRACK NEW CATALOG USING(BLKFB); REPRO INFILE(OBJIN) OUTFILE(OBJOUT); FREE DDN(OBJOUT) ATTR(BLKFB); DELETE INS.RECEIVE.CLIST; ALLOC DDN(EXECOUT) DSN(INS.RECEIVE.CLIST) + /* UNIT(&UNITVAL) VOLUME(&VOLVAL) */ + /* STORCLAS(&SCLSVAL) MGMTCLAS(&MCLSVAL) */ + /* DATACLAS(&DCLSVAL) */ + SPACE(1,1) TRACK NEW CATALOG; LOADGO INS.OBJ MSGLEVEL(4); EXEC INS.RECEIVE.CLIST + 'PREFIX() + UNIT(SYSALLDA) VOL(NONE) + SCLS(NONE) MCLS(NONE) DCLS(NONE) + MSGOUT(NONE) SKIP(NONE)'; WHEN SYSRC(EQ 0000) + DELETE INS.RECEIVE.CLIST; YY /* //SYSUT2 DD DSN=&&ESDCLS,DISP=(NEW,PASS), // DCB=(LRECL=80,BLKSIZE=3120,RECFM=FB), // UNIT=SYSALLDA,SPACE=(CYL,(5,5),RLSE) ZZ // DD DISP=SHR,DSN=''