//* ********************************************************* */ //* * STARTUP PROC FOR THE GROUP3 AOR'S ON THE PETPLEX * */ //* ********************************************************* */ //* PROC START='AUTO', // PROC START='INITIAL', // CARDIN=CARDAOR3, // CPSMPLEX=PETPLEX, // GRP=3, // INDEX1=CICSTS41, // JVMMEMBR='DFHJVM', // OUTC='(*,,STD)', // REGNAM1=CICS&SYS, // SYS=, // SYSIN=G3AOR, // TCPIX=&TCPMLQ, // WHICH=&CICSVAR //* //*********************************************************** //*** EXECUTE CICS //*********************************************************** //CICS63 EXEC PGM=DFHSIP,REGION=0M,TIME=1440, // PARM=('START=&START','APPLID=CICS&SYS', // 'INITPARM=(DFHD2INI=''DB&DB2.1'')', // 'SYSIDNT=&SYS','MNSUBSYS=&SYS',SYSIN) //* //SYSIN DD DSN=&INDEX1..PET.SYSIN(&SYSIN),DISP=SHR //*********************************************************** //* THE CICS SYSTEM DEFINITION DATASET //DFHCSD DD DISP=SHR, // DSN=&INDEX1..PET.GRP&GRP..DFHCSD //*********************************************************** //* EYUPARM DD NEEDED FOR CPSM //EYUPARM DD DISP=SHR,DSN=CPSM410.PET.EYUPARM(&CPSMPLEX) //EYULOG DD SYSOUT=&OUTC //*********************************************************** //* THE CICS STEPLIB CONCATENATION //STEPLIB DD DSN=&INDEX1..&WHICH..SDFHAUTH,DISP=SHR // DD DSN=CPSM410.&WHICH..SEYUAUTH,DISP=SHR //*********************************************************** //* THE CICS LIBRARY (DFHRPL) CONCATENATION //DFHRPL DD DSN=&INDEX1..PET.USERLOAD,DISP=SHR // DD DSN=&INDEX1..&WHICH..SDFHLOAD,DISP=SHR // DD DSN=CPSM410.&WHICH..SEYULOAD,DISP=SHR // DD DSN=DCEAS.COBOL.PGMLIB,DISP=SHR // DD DSN=DB2.NST.PGMLIB,DISP=SHR // DD DSN=DB2CICS.RTW.PGMLIB,DISP=SHR // DD DSN=DB2CICS.RTW.TEST.PGMLIB,DISP=SHR // DD DSN=CEE.SCEECICS,DISP=SHR // DD DSN=CEE.SCEERUN2,DISP=SHR // DD DSN=CEE.SCEERUN,DISP=SHR // DD DSN=TCPIP.&TCPIX.SEZATCP,DISP=SHR // DD DSN=TCPIP.&TCPIX.SEZALNK2,DISP=SHR // DD DSN=DB2CICS.RTW.CICSMAPS,DISP=SHR //*********************************************************** //* CARDS INPUT //CARDIN DD DISP=SHR,DSN=&INDEX1..PET.SYSIN(&CARDIN) //* THE AUXILIARY TEMPORARY STORAGE DATASET //DFHTEMP DD DISP=SHR, // DSN=&INDEX1..®NAM1..DFHTEMP //* THE INTRAPARTITION DATASET //DFHINTRA DD DISP=SHR, // DSN=&INDEX1..®NAM1..DFHINTRA //* THE AUXILIARY TRACE DATASETS //DFHAUXT DD DISP=SHR, // DSN=&INDEX1..®NAM1..DFHAUXT //DFHBUXT DD DISP=SHR, // DSN=&INDEX1..®NAM1..DFHBUXT //* THE CICS LOCAL CATALOGUE DATASET //DFHLCD DD DISP=SHR, // DSN=&INDEX1..®NAM1..DFHLCD //* THE CICS GLOBAL CATALOG DATASET //DFHGCD DD DISP=SHR, // DSN=&INDEX1..®NAM1..DFHGCD //* THE CICS LOCAL REQUEST QUEUE DATASET //DFHLRQ DD DISP=SHR, // DSN=CICSTS41.CICS&SYS..DFHLRQ //* DATASETS FOR JVM SUPPORT //DFHCJVM DD DUMMY //DFHJVM DD DISP=SHR, // DSN=CICSTS41.&WHICH..SDFHENV(&JVMMEMBR) //*********************************************************** //* EXTRAPARTITION DATASETS //MSGUSR DD SYSOUT=&OUTC,DCB=(DSORG=PS,RECFM=V,BLKSIZE=136) //CEEMSG DD DUMMY <=== SUPRESS LE OUTPUT //CEEOUT DD DUMMY <=== SUPRESS LE OUTPUT //*//CEEMSG DD SYSOUT=&OUTC //*//CEEOUT DD SYSOUT=&OUTC //DFHCXRF DD SYSOUT=&OUTC //LOGUSR DD SYSOUT=&OUTC,DCB=(DSORG=PS,RECFM=V,BLKSIZE=136) //PLIMSG DD SYSOUT=&OUTC,DCB=(DSORG=PS,RECFM=V,BLKSIZE=137) //TCPDATA DD SYSOUT=&OUTC,DCB=(DSORG=PS,RECFM=V,BLKSIZE=136) //TCPCICS DD SYSOUT=&OUTC,DCB=(DSORG=PS,RECFM=V,BLKSIZE=136) //*********************************************************** //* THE DUMP DATASETS //DFHDMPA DD DISP=SHR, // DSN=&INDEX1..®NAM1..DFHDMPA //DFHDMPB DD DISP=SHR, // DSN=&INDEX1..®NAM1..DFHDMPB //*********************************************************** //** SYSABEND TAKEN OUT TO PREVENT "SPOOL" FILLING UP.. (RHM) 05/13/98 //***SYSABEND DD SYSOUT=&OUTC //TRACEOUT DD SYSOUT=&OUTC //PRINTER DD SYSOUT=&OUTC,DCB=BLKSIZE=121 //********************************************************************* //*