//* ********************************************************* */ //* * STARTUP PROC FOR THE GROUP3 TOR'S ON THE PETPLEX * */ //* ********************************************************* */ //* PROC START='AUTO', // PROC START='INITIAL', // CARDIN=CARDTOR, // CPSMPLEX=PETPLEX, // INDEX1='CICSTS41', // JVMMEMBR='DFHJVM', // OUTC='(*,,STD)', // SYS=, // WHICH=&CICSVAR //* //*********************************************************** //*** EXECUTE CICS *** //*********************************************************** //CICS63 EXEC PGM=DFHSIP,REGION=0M,TIME=1440, // PARM=('START=&START','APPLID=CICS&SYS', // 'SYSIDNT=&SYS','MNSUBSYS=&SYS',SYSIN) //* //SYSIN DD DSN=CICSTS41.PET.SYSIN(G3TOR),DISP=SHR //*********************************************************** //* THE CICS SYSTEM DEFINITION DATASET //DFHCSD DD DISP=SHR, // DSN=CICSTS41.PET.GRP3.DFHCSD //*********************************************************** //* EYUPARM DD NEEDED FOR CPSM //EYUPARM DD DSN=CPSM410.PET.EYUPARM(&CPSMPLEX),DISP=SHR //EYULOG DD SYSOUT=&OUTC //*********************************************************** //* THE CICS STEPLIB CONCATENATION //STEPLIB DD DSN=CICSTS41.&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=CEE.SCEECICS,DISP=SHR // DD DSN=CEE.SCEERUN2,DISP=SHR // DD DSN=CEE.SCEERUN,DISP=SHR // DD DSN=DB2.NST.PGMLIB,DISP=SHR // DD DSN=DB2CICS.RTW.PGMLIB,DISP=SHR // DD DSN=DB2CICS.RTW.CICSMAPS,DISP=SHR //*********************************************************** //* INPUT CARDS //CARDIN DD DISP=SHR, // DSN=&INDEX1..PET.SYSIN(&CARDIN) //* THE AUXILIARY TEMPORARY STORAGE DATASET //DFHTEMP DD DISP=SHR, // DSN=&INDEX1..CICS&SYS..DFHTEMP //* THE INTRAPARTITION DATASET //DFHINTRA DD DISP=SHR, // DSN=&INDEX1..CICS&SYS..DFHINTRA //* THE AUXILIARY TRACE DATASETS //DFHAUXT DD DISP=SHR, // DSN=&INDEX1..CICS&SYS..DFHAUXT //DFHBUXT DD DISP=SHR, // DSN=&INDEX1..CICS&SYS..DFHBUXT //* THE CICS LOCAL CATALOG DATASET //DFHLCD DD DISP=SHR, // DSN=&INDEX1..CICS&SYS..DFHLCD //* THE CICS GLOBAL CATALOG DATASET //DFHGCD DD DISP=SHR, // DSN=&INDEX1..CICS&SYS..DFHGCD //* AMP=('BUFND=5,BUFNI=20,BUFSP=122880') //* 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 //CEEOUT DD DUMMY //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) //COUT DD SYSOUT=&OUTC,DCB=(DSORG=PS,RECFM=V,BLKSIZE=137) //*********************************************************** //* THE DUMP DATASETS //DFHDMPA DD DISP=SHR, // DSN=&INDEX1..CICS&SYS..DFHDMPA //DFHDMPB DD DISP=SHR, // DSN=&INDEX1..CICS&SYS..DFHDMPB //*********************************************************** //** SYSABEND TAKEN OUT TO PREVENT "SPOOL" FILLING UP. //***SYSABEND DD SYSOUT=&OUTC //TRACEOUT DD SYSOUT=&OUTC //PRINTER DD SYSOUT=&OUTC,DCB=BLKSIZE=121 //************************************************************