Customization › PSF (Print Services Facility) Interface › Adding Printers to an FSS Address Space › Setup Example #2

Setup Example #2

The corresponding PSF procedure to support the IBM 3812-2 printer:

//ESF3812  PROC                                                        
//STEP01   EXEC PGM=APSPPIEP,REGION=4M                                 
//STEPLIB  DD DSN=SYS1.SYS.LOAD,DISP=SHR                               
//JOBHDR OUTPUT PAGEDEF=A4L8,        /* JOB SEPARATOR PAGEDEF        */
//        FORMDEF=A4,CHARS=GT12      /* JOB SEPARATOR FORMDEF    @H3C*/
//JOBTLR OUTPUT PAGEDEF=A4L8,        /* JOB SEPARATOR PAGEDEF        */
//        FORMDEF=A4,CHARS=GT12      /* JOB SEPARATOR FORMDEF    @H3C*/
//DSHDR  OUTPUT PAGEDEF=A4L8,        /* DS SEPARATOR PAGEDEF         */
//        FORMDEF=A4,CHARS=GT12      /* DS SEPARATOR FORMDEF     @H3C*/
//MSGDS  OUTPUT PAGEDEF=A4H6,        /* MESSAGE DATASET PAGEDEF      */
//        FORMDEF=A4,CHARS=GT12      /* MESSAGE DATASET FORMDEF  @H3C*/
//FONT01   DD   DISP=SHR,DSN=SYS1.FONTLIBB                             
//PSEG01   DD   DISP=SHR,DSN=SYS1.PSEGLIB                              
//OLAY01   DD   DISP=SHR,DSN=SYS1.OVERLIB                              
//PDEF01   DD   DISP=SHR,DSN=SYS1.PDEFLIB                              
//FDEF01   DD   DISP=SHR,DSN=SYS1.FDEFLIB                              
//RSOFT01A CNTL                                                        
//RSOFT01A PRINTDEV FONTDD=*.FONT01, /* FONT LIBRARY DD              */
//           OVLYDD=*.OLAY01,        /* OVERLAY  LIBRARY DD          */
//           PSEGDD=*.PSEG01,        /* SEGMENT  LIBRARY DD          */
//           PDEFDD=*.PDEF01,        /* PAGEDEF  LIBRARY DD          */
//           FDEFDD=*.FDEF01,        /* FORMDEF  LIBRARY DD          */
//           JOBHDR=*.JOBHDR,        /* JOB HEADER SEPARATORUTPUT    */
//           JOBTRLR=*.JOBTLR,       /* JOB TRAILER SEPARATORUTPUT   */
//           DSHDR=*.DSHDR,          /* DATA SET HEADER SEPARATOR    */
//           MESSAGE=*.MSGDS,        /* MESSAGE DATA SET OUTPUT      */
//           PAGEDEF=A4L8,           /* DEVICE PAGEDEF DEFAULT       */
//           FORMDEF=A4,             /* DEVICE FORMDEF DEFAULT   @H3C*/
//           CHARS=(GT12,            /* DEVICE                       */
//           GT12,GT12,GT12),        /* DEFAULT FONT SET             */
//           PIMSG=YES,              /* ACCUMULATE DATA SET MESSAGES */
//           TRACE=NO,               /* CREATE INTERNAL TRACE    @H3C*/
//           FAILURE=WCONNECT,       /* PSF ACTION ON PRINTER FAILURE*/
//           TIMEOUT=REDRIVE,        /* PSF ACTION ON TIMEOUT        */
//           DISCINTV=60,            /* DISCONNECT INTERVAL IN SECOND*/ 
//           APPLID=ESF3812,         /* VTAM APPLICATION PGM NODE NAM*/
//           LOGMODE=PSF3812,        /* VTAM LOGON MODE TABLE ENTRY  */
//           MGMTMODE=IMMED,         /* PRINTER MANAGEMENT MODE      */
//           LUNAME=RSOFT01A         /* VTAM LOGICAL UNIT NAME       */
//RSOFT01A  ENDCNTL                                                                                                           

The ESFFSSM load module must be accessible from an authorized STEPLIB data set.