est alors "INV". Se reporter à la documentation PSF, avec les références sur InfoPrint Server et
Printer Inventory. Exemple d'activation :
ADD FSS=FSS7000,INV=toto
Où "toto" est le fichier contenant les paramètres de l'imprimante
2.
Création de la procédure PSF associée à la déclaration précédente:
(voir la documentation IBM : PSF/MVS System Programming Guide)
//APSW7000 PROC
//*
//**************************************** THE PSF WRITER PROCEDURE ************************************
//* IN PROCLIB LIBRARY
//*
//STEP01
EXEC PGM=APSPPIEP,REGION=4096K
//JOBHDR
OUTPUT PAGEDEF=A08584,
//
FORMDEF=0101LA,CHARS=GT5F
//MSGDS
OUTPUT PAGEDEF=L08080,
//
FORMDEF=0101LA
//FONT01
DD
DSN=SYS1.FONTLIBB,DISP=SHR
//
DD
DSN=SYS7.FONTLIB,DISP=SHR
//PSEG01
DD
DSN=SYS1.PSEGLIB,DISP=SHR
//
DD
DSN=SYS7.COMMON.AFPLIB,DISP=SHR
//OLAY01
DD
DSN=SYS1.OVERLIB,DISP=SHR
//
DD
DSN=SYS7.COMMON.AFPLIB,DISP=SHR
//PDEF01
DD
DSN=SYS1.PDEFLIB,DISP=SHR
//
DD
DSN=SYS7.COMMON.AFPLIB,DISP=SHR
//FDEF01
DD
DSN=SYS1.FDEFLIB,DISP=SHR
//
DD
DSN=SYS7.COMMON.AFPLIB,DISP=SHR
//*
//PRT20
CNTL
//PRT20
PRINTDEV FONTDD=*.FONT01,
//
OVLYDD=*.OLAY01,
//
PSEGDD=*.PSEG01,
//
PDEFDD=*.PDEF01,
//
FDEFDD=*.FDEF01,
//
JOBHDR=*.JOBHDR,
//
JOBTRLR=*.JOBHDR,
//
DSHDR=*.JOBHDR,
//
MESSAGE=*.MSGDS,
//
BUFNO=30,
//
PAGEDEF=L08080,
//
FORMDEF=0101LA,
//
CHARS=GT5F,
//
TRACE=NO
//
FAILURE=WCONNECT,
//
DISCINTV=0,
//
MGMTMODE=IMMED,
//
IPADDR=`192.44.50.150',
//PRT20
ENDCNTL
//*
Retour à la "Table des matières"
Guide de préparation de site
VP
/* JOB SEPARATOR PAGEDEF
/* JOB SEPARATOR FORMDEF
/* MESSAGE DATASET PAGEDEF
/* MESSAGE DATASET FORMDEF
/* SYSTEM FONTS
/*
/* SYSTEM PAGE SEGMENTS
/*
/* SYSTEM OVERLAYS
/*
/* SYSTEM PAGEDEFS
/*
/* SYSTEM FORMDEFS
/*
*/
/* FONT LIBRARY DD
/* OVERLAY LIBRARY DD
/* SEGMENT LIBRARY DD
/* PAGEDEF LIBRARY DD
/* FORMDEF LIBRARY DD
/* JOB HEADER SEPARATOR OUTPUT
/* JOB TRAILER SEPARATOR OUTPUT
/* DATA SET HEADER SEPARATOR
/* MESSAGE DATA SET OUTPUT
/* NUMBER OF WRITE DATA BUFFERS
/* DEVICE PAGEDEF DEFAULT
/* DEVICE FORMDEF DEFAULT
/* DEVICE DEFAULT FONT SET
/* BUILD INTERNAL TRACE
/* ATTEMPT RECONNECT
/* NO TIME OUT
/* MAINTAIN SESSION
/* IP ADDRESS OF NIPSON PRINTER
4-61
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/