
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