Filter
Top Products
PSF/MVS AFP Printing Using TCP/IP
Xerox 4500 PS TR
121
13.2 PSF/MVS startup procedure
000001 //PSF4 PROC
000002 //STEP01 EXEC PGM=APSPPIEP,REGION=1750K
000003 //JOBHDR OUTPUT PAGEDEF=V06483, /* JOB SEPARATOR PAGEDEF */
000004 // FORMDEF=A10110,CHARS=GT15 /* JOB SEPARATOR FORMDEF */
000005 //JOBTLR OUTPUT PAGEDEF=V06483, /* JOB SEPARATOR PAGEDEF */
000006 // FORMDEF=A10110,CHARS=GT15 /* JOB SEPARATOR FORMDEF */
000007 //DSHDR OUTPUT PAGEDEF=V06483, /* DS SEPARATOR PAGEDEF */
000008 // FORMDEF=A10120,CHARS=GT15 /* DS SEPARATOR FORMDEF */
000009 //MSGDS OUTPUT PAGEDEF=A06462, /* MESSAGE DATASET PAGEDEF */
000010 // FORMDEF=A10110 /* MESSAGE DATASET FORMDEF */
000011 //********************************************************************
000012 //*
000013 //* THIS PROC. IS TO BE USED FOR 300 DPI DEVICES
000014 //* -----------
000015 //********************************************************************
000016 //FONT01 DD DSN=IDAPBJ.AFPLIB,DISP=SHR /* PBJ FONTS - 300 DPI */
000017 // DD DSN=SYS2.FONT300,DISP=SHR /* SYSTEM FONTS - 300 DPI */
000020 //*-------------------------------------------------------------------
000021 //PSEG01 DD DSN=IDAPBJ.AFPLIB,DISP=SHR /* SYSTEM PAGE SEGMENTS */
000022 // DD DSN=SYS2.PSEGLIB,DISP=SHR /* SYSTEM PAGE SEGMENTS */
000023 // DD DSN=SYS1.PSEGLIB,DISP=SHR /* SYSTEM PAGE SEGMENTS */
000024 //*-------------------------------------------------------------------
000025 //OLAY01 DD DSN=IDAPBJ.AFPLIB,DISP=SHR /* SYSTEM MEDIUM OVERLAYS */
000026 // DD DSN=SYS2.OVERLIB,DISP=SHR /* SYSTEM MEDIUM OVERLAYS */
000027 // DD DSN=SYS1.OVERLIB,DISP=SHR /* SYSTEM MEDIUM OVERLAYS */
000028 //*-------------------------------------------------------------------
000029 //PDEF01 DD DSN=SYS2.PDEFLIB,DISP=SHR /* SYSTEM PAGEDEFS */
000030 // DD DSN=SYS1.PDEFLIB,DISP=SHR /* SYSTEM PAGEDEFS */
000031 //*-------------------------------------------------------------------
000032 //FDEF01 DD DSN=SYS2.FDEFLIB,DISP=SHR /* SYSTEM FORMDEFS */
000033 // DD DSN=SYS1.FDEFLIB,DISP=SHR /* SYSTEM FORMDEFS */
000034 //********************************************************************
000035 //* STANDARD PRINTDEV */
000036 //********************************************************************
000037 //PRT420 CNTL
000038 //PRT420 PRINTDEV FONTDD=*.FONT01, /* FONT LIBRARY DD */
000039 // OVLYDD=*.OLAY01, /* OVERLAY LIBRARY DD */
000040 // PSEGDD=*.PSEG01, /* SEGMENT LIBRARY DD */
000041 // PDEFDD=*.PDEF01, /* PAGEDEF LIBRARY DD */
000042 // FDEFDD=*.FDEF01, /* FORMDEF LIBRARY DD */
000043 // JOBHDR=*.JOBHDR, /* JOB HEADER SEPARATOR OUTPUT */
000044 // JOBTRLR=*.JOBTLR, /* JOB TRAILER SEPARATOR OUTPUT */
000045 // DSHDR=*.DSHDR, /* DATA SET HEADER SEPERATOR */
000046 // MESSAGE=*.MSGDS, /* MESSAGE DATA SET OUTPUT */
000047 // PAGEDEF=A06462, /* DEVICE PAGEDEF DEFAULT */
000048 // FORMDEF=A10110, /* DEVICE FORMDEF DEFAULT */
000049 // CHARS=(GT10, /* DEVICE */
000050 // GT12,GT15,GT10), /* DEFAULT FONT SET */
000051 // PIMSG=YES, /* ACCUMULATE DATA SET MESSAGES */
000052 // DATACK=BLOCK, /* REPORT ALL DATA-CHECK ERRORS */
000053 // TRACE=NO, /* CREATE INTERNAL TRACE */
000054 // FAILURE=WCONNECT, /* ACTION ON PRINTER FAILURE */
000055 // TIMEOUT=REDRIVE, /* PSF ACTION ON TIMEOUT */
000056 // DISCINTV=0, /* DISCONNECT INTERVAL IN SECS. */
000057 // MGMTMODE=IMMED, /* ACTIVATE PRINTER AT STARTUP */
000058 // IPADDR=‘192.0.110.21’ /* IP ADDRESS */
000059 // PORTNO=5001 /* IP ADDRESS */
000060 //PRT420 ENDCNTL
Using IP address 192.0.110.21 and port number 5001
The IP address of the Xerox 4500 PS TR IPC (IPDS) should be programmed in the
IPADDR statement. The PORTNO 5001 is the default port number of the first IPDS
port on the Xerox 4500 PS TR IPC (IPDS).