I-Data ReRouter - Manual (Page 25)

Configuration
ida ReRouter
25
//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