Configuration ida ReRouter
//PSF | PROC |
|
|
//IDAFSS1 | EXEC PGM=APSPPIEP.REGION=4M |
| |
//JOBHDR | OUTPUT PAGEDEF=SEP300, | / * JOB HEADER PAGEDEF | * / |
// | FORMDEF=SEP300, | / * JOB HEADER FORMDEF | * / |
// | CHARS=GT15 | / * JOB HEADER FONT | * / |
//JOBTLR | OUTPUT PAGEDEF=SEP300, | / * JOB TRAILER PAGEDEF | * / |
// | FORMDEF=SEP301, | / * JOB TRAILER FORMDEF | * / |
// | CHARS=GT15 | / * JOB TRAILER FONT | * / |
//DSHDR | OUTPUT PAGEDEF=A06462, | / * DS HEADER PAGEDEF | * / |
// | FORMDEF=A10110, | / * JOB HEADER FORMDEF | * / |
// | CHARS=GT15 | / * JOB HEADER FONT | * / |
//MSGDS | OUTPUT PAGEDEF=A06462, | / * MESSAGE DATASET PAGEDEF | * / |
// | FORMDEF=A10110, | / * MESSAGE DATASET FORMDEF | * / |
// | CHARS=GT15 | / * MESSAGE DATASET FONT | * / |
//********************************************************************
//FONT01 | DD DISP=SHR,DSN=IDA.FONTLIB |
//PSEG01 | DD DISP=SHR,DSN=IDA.PSEGLIB |
//OLAY01 | DD DISP=SHR,DSN=IDA.OVLYLIB |
//PDEF01 | DD DISP=SHR,DSN=IDA.PDEFLIB |
//FDEF01 | DD DISP=SHR,DSN=IDA.FDEPLIB |
/*********************************************************************
//PRT08 | CNTL |
|
|
|
//PRT08 | PRINTDEV FONTDD=*.FONT01, | /* FONTLIBRARY DD | */ | |
// | OBLYDD=*.OLAY01, |
| /* OVERLAY LIBRARY DD | */ |
// | PSEGDD=*.PSEG01, |
| /* SEGMENT LIBRARY DD | */ |
// | PDEFDD=*.PDEF01, |
| /* PAGEDEF LIBRARY DD | */ |
// | FDEFDD=*.FDEF01, |
| /* FORMDEF LIBRARY DD | */ |
// | JOBHDR=*.JOBHDR, |
| /* JOB HEADERSEP.OUTPUT | */ |
// | JOBTRLR=*.JOBTLR, | /* JOBTRAILER SEP. OUTPUT | */ | |
// | DSHDR=*.DSHDR, | /* DATASET HEADER SEPARATOR | */ | |
// | MESSAGE=*.MSGDS, | /* MESSAGE DATA SET OUTPUT | */ | |
// | PAGEDEF=A4L8 | /* DEVICE PAGEDEF DEFAULT | */ | |
// | FORMDEF=A4, | /* DEVICE FORMDEF DEFAULT | */ | |
// | CHARS=(GT12, | /* DEVICE | */ | |
// | GT12,GT12,GT12), | /* DEFAULT FONT SET | */ | |
// | DATACK=UNBLOCK, | /* ACCUMULATE DATASET MES, | */ | |
// | PIMSG=(YES,999), | /* ACCUMULATE DATASET MES, | */ | |
// | TRACE=NO, | /* CREATE INTERNAL TRACE | */ | |
// | FAILURE=WCONNECT, | /* PSF ACTION ON PRT FAILURE | */ | |
// | TIMEOUT=REDRIVE, | /* PSF ACTION ON TIMEOUT | */ | |
// | DISINTV=0, | /* DISC.INTERVAL IN SECONDS | */ |
//APPLID=PSFAPP11, /* VTAM APPL.PGM MODE NAME. */
//LOGMODE=IBM3820T, /* VTAM LOGON MODE TAB. ENT. */
// | MGMTMODE=OUTAVAIL, | /* | */ |
// | LUNAME=IDSNCEP0 | /* VTAM LOGICAL UNIT NAME | */ |
//PRT08 | ENDCNTL |
|
|
Example of PSF&MVS startup procedure
25