z/OS Communications Server: IP Network Print Facility
Previous topic | Next topic | Contents | Contact z/OS | Library | PDF


Initialization of the NPF VSAM files

z/OS Communications Server: IP Network Print Facility
SC27-3658-00

You can copy this sample from hlq.SEZAINST(ROUTEOPT) and use it to initialize and load the routing, options, and queue files after they have been allocated.

This job assembles the EZAPPFL macros and then links and executes the load program.

Execution notes
  • You will need to include your own macro parameters to define your routing and options file records.
  • You will need to modify the data set names specified by //EZAPPRF, //EZAPPOF, and //EZAPPQF, as required by your installation.
//ROUTEOPT JOB
//* -------------------------------------------------------------------*
//*                                                                    *
//*  COPYRIGHT = NONE                                                  *
//*                                                                    *
//*  SMP/E Distribution Name: EZAEC0YY                                 *
//*                                                                    *
//*  This is sample JCL to assemble, link and execute the file load    *
//*  program for the routing, options and queue data sets used by      *
//*  the Network Print Facility.                                       *
//*                                                                    *
//*    In this sample, the names of the routing, options and queue     *
//*    files are:                                                      *
//*                                                                    *
//*       TCPIP.ROUTING                                                *
//*       TCPIP.OPTIONS                                                *
//*       TCPIP.QUEUE                                                  *
//*                                                                    *
//*    All three are assumed to have been created and initialized      *
//*    prior to the use of this JCL.                                   *
//*                                                                    *
//* -------------------------------------------------------------------*
//*  Step 1 :                                                          *
//*                                                                    *
//*    This step assembles the File Load Program                       *
//*                                                                    *
//*    This is the area where you will enter the routing and options   *
//*    information.                                                    *
//* -------------------------------------------------------------------*
//ASM       EXEC PGM=IEV90,PARM='OBJECT,TERM',REGION=1024K
//SYSLIB    DD DSN=TCPIP.SEZACMAC,DISP=SHR
//          DD DSN=SYS1.MACLIB,DISP=SHR
//          DD DSN=SYS1.MODGEN,DISP=SHR
//SYSUT1    DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSUT2    DD UNIT=SYSDA,SPACE=(CYL,(2,1))
//SYSUT3    DD UNIT=SYSDA,SPACE=(CYL,(2,1))
//SYSPUNCH  DD DUMMY
//SYSLIN    DD DSNAME=&&OBJSET,DISP=(MOD,PASS),UNIT=SYSDA,
//             SPACE=(80,(500,50))
//SYSTERM   DD SYSOUT=*
//SYSPRINT  DD SYSOUT=*
//SYSIN     DD *
* --------------------------------------------------------------------*
*     Must start with INITIAL parm                                    *
* --------------------------------------------------------------------*
         EZAPPFL TYPE=INITIAL,                                         X
               PRGNAME=ROUTEOPT,                                       X
               MODE=LOAD
* --------------------------------------------------------------------*
*     Example of a normal route for VTAM                              *
* --------------------------------------------------------------------*
         EZAPPFL TYPE=ROUTING,                                         X
               MAJKEY=ELU10100,                                        X
               MINKEY=VTAM,                                            X
               RETAINS=5,                                              X
               RETAINU=10,                                             X
               RETRYT=5,                                               X
               RETRYL=2,                                               X
               NDEST=1,                                                X
               OPTNAME=OPTION2,                                        X
               LUCLASS=(1,8,16,32,35,64),                              X
               DPFNAME=PGFORMT1,                                       X
               EOFNAME=EOFPARM1,                                       X
               INAME=MVS1.TCP.RALEIGH.IBM.COM,                         X
               PNAME=LPT1
* --------------------------------------------------------------------*
*     Example of a specific broadcast route for the JES writer        *
*     (with 2 destinations)                                           *
* --------------------------------------------------------------------*
         EZAPPFL TYPE=ROUTING,                                         X
               MAJKEY=LOCAL,                                           X
               MINKEY=C1185,                                           X
               RETAINS=5,                                              X
               RETAINU=10,                                             X
               RETRYT=5,                                               X
               RETRYL=2,                                               X
               NDEST=2,                                                X
               OPTNAME=OPTION1,                                        X
               INAME=9.67.112.25,                                      X
               PNAME=LPT1
* --------------------------------------------------------------------*
*     Example of second destination for the specific broadcast        *
*     route defined above                                             *
* --------------------------------------------------------------------*
         EZAPPFL TYPE=NXTDEST,                                         X
               INAME=QUIDDITY,                                         X
               PNAME=LPT2
* --------------------------------------------------------------------*
*     Examples of options entries                                     *
* --------------------------------------------------------------------*
*     OPTION1                                                         *
* --------------------------------------------------------------------*
         EZAPPFL TYPE=OPTIONS,                                         X
               OPTNAME=OPTION1,                                        X
               IREXIT=INRECEX1,                                        X
               OPTIONS=TRACE
* --------------------------------------------------------------------*
*     OPTION2                                                         *
* --------------------------------------------------------------------*
         EZAPPFL TYPE=OPTIONS,                                         X
               OPTNAME=OPTION2,                                        X
               OPTIONS='TRACE CLASS E'
* --------------------------------------------------------------------*
*     Must end with FINAL parm                                        *
* --------------------------------------------------------------------*
         EZAPPFL TYPE=FINAL
         END
/*
//* ------------------------------------------------------------------*
//*  Step 2 :                                                          *
//*                                                                    *
//*    This step links the File Load Program                          *
//* ------------------------------------------------------------------*
//LKED    EXEC PGM=IEWL,PARM='LIST,MAP,XREF',
//             REGION=512K,COND=(4,LT)
//SYSPRINT  DD SYSOUT=*
//SYSUT1    DD SPACE=(CYL,(5,1)),DISP=(NEW,PASS),UNIT=SYSDA
//SYSLMOD   DD DSNAME=&&GOSET(GO),DISP=(MOD,PASS),UNIT=SYSDA,
//             SPACE=(1024,(50,1,1))
//SYSLIN    DD DSNAME=&&OBJSET,DISP=(OLD,DELETE)
//LINK.SYSIN  DD DUMMY
//* -------------------------------------------------------------------*
//*  Step 3 :                                                          *
//*                                                                    *
//*    This step executes the File Load Program                        *
//* -------------------------------------------------------------------*
//LOAD     EXEC PGM=*.LKED.SYSLMOD,REGION=512K,COND=(4,LT)
//EZAPPRF  DD   DSN=TCPIP.ROUTING,DISP=OLD
//EZAPPOF  DD   DSN=TCPIP.OPTIONS,DISP=OLD
//EZAPPQF  DD   DSN=TCPIP.QUEUE,DISP=OLD
//SYSPRINT DD   SYSOUT=*
//SYSABEND DD   SYSOUT=*
//SYSMDUMP DD   SYSOUT=*

Go to the previous page Go to the next page




Copyright IBM Corporation 1990, 2014