This example shows the network control program generation (NCP GEN) that is created by a system administrator to connect the 3745 Communication Controller to the server.
This example is valid on Network Control Program (NCP) Version 5.4 and Virtual Telecommunications Access Method (VTAM®) Version 3.3. Different NCP or VTAM levels might require different parameters.
This example shows one configuration for each connection and discusses two parameters: Identifier block (IDBLK) and identifier number (IDNUM). The concatenation of IDBLK and IDNUM must match the Local exchange identifier (LCLEXCHID) field of your controller description. The first configuration uses exchange ID 056A001A from controller description CTL_1A. The second uses 056A002A from CTL_2A.
Configuration for the first connection:
In this example, see the IDBLK and IDNUM parameters in bold:
*
SWXID VBUILD TYPE=SWNET, THIS IS A SWITCHED MAJOR NODE X
MAXNO=64, MAXIMUM DIALNO PARAMETERS X
MAXGRP=64 MAXIMUM NUMBER OF LINE GROUPS
SWXIDA PU ADDR=01, NOT CHECKED IF TOKEN-RING DEFINITION X
DISCNT=NO, ACCEPT DISCONTACT FROM AS/400 X
IDBLK=056, 12 BIT BLOCK NUMBER FOR AS/400 X
IDNUM=A001A, 20 BIT ID FOR THIS PU (AS/400 CTLD) X
MAXDATA=1994, MAXIMUM FOR 4M TOKEN RING X
MAXPATH=1, ONLY NEED ONE PATH STATEMENT X
MAXOUT=7, 7 PIUS TO DEVICE BEFORE RESPONSE X
NETID=APPN, NETID OF AS/400 (IF DIFFERENT) X
PACING=0, PACING CAN BE ANY ACCEPTABLE VALUE X
PASSLIM=7, MAXIMUM OF 7 CONTIGUOUS PIUS X
PUTYPE=2, TYPE OF DEVICE CALLING IN X
ISTATUS=ACTIVE, ACTIVATE WITH MAJOR NODE X
MODETAB=LOGMOD38, ANY VALID LOGMODE TABLE *
SSCPFM=USSSCS, VTAM TO STRIP/ADD MEDIA CONTROL CHAR *
VPACING=0 VPACING CAN BE ANY ACCEPTABLE VALUE
*
* NOTE: YOU MUST DEFINE ENOUGH LOGICAL TOKEN-RING LINES TO ALLOW
* ALL PUs TO BE USED AT THE SAME TIME
*
PATHA PATH GRPNM=R3G092L,DIALNO=0508400071032004 3
*
* SAME NUMBER OF LUs ON HOST AS DEVICES ON AS/400
*
SWXIDA01 LU LOCADDR=1, FIRST AVAILABLE LOCAL ADDRESS X
ISTATUS=ACTIVE ACTIVATE WITH MAJOR NODE
SWXIDA02 LU LOCADDR=2, FIRST AVAILABLE LOCAL ADDRESS X
ISTATUS=ACTIVE ACTIVATE WITH MAJOR NODE
SWXIDA03 LU LOCADDR=3, FIRST AVAILABLE LOCAL ADDRESS X
ISTATUS=ACTIVE ACTIVATE WITH MAJOR NODE
SWXIDA04 LU LOCADDR=4, FIRST AVAILABLE LOCAL ADDRESS X
ISTATUS=ACTIVE ACTIVATE WITH MAJOR NODE
SWXIDA05 LU LOCADDR=5, FIRST AVAILABLE LOCAL ADDRESS X
ISTATUS=ACTIVE ACTIVATE WITH MAJOR NODE
SWXIDA06 LU LOCADDR=6, FIRST AVAILABLE LOCAL ADDRESS X
ISTATUS=ACTIVE ACTIVATE WITH MAJOR NODE
Configuration for the second connection:
In this example, see the IDBLK and IDNUM parameters in bold:
**********************************************************************
SWXIDB PU ADDR=02, NOT CHECKED IF TOKEN-RING DEFINITION X
DISCNT=NO, ACCEPT DISCONTACT FROM AS/400 X
IDBLK=056, 12 BIT BLOCK NUMBER FOR AS/400 X
IDNUM=A002A, 20 BIT ID FOR THIS PU (AS/400 CTLD) X
MAXDATA=1994, MAXIMUM FOR 4M TOKEN RING X
MAXPATH=1, ONLY NEED ONE PATH STATEMENT X
MAXOUT=7, 7 PIUS TO DEVICE BEFORE RESPONSE X
NETID=APPN, NETID OF AS/400 (IF DIFFERENT) X
PACING=0, PACING CAN BE ANY ACCEPTABLE VALUE X
PASSLIM=7, MAXIMUM of 7 CONTIGUOUS PIUS X
PUTYPE=2, TYPE OF DEVICE CALLING IN X
ISTATUS=ACTIVE, ACTIVATE WITH MAJOR NODE X
MODETAB=LOGMOD38, ANY VALID LOGMODE TABLE *
SSCPFM=USSSCS, VTAM TO STRIP/ADD MEDIA CONTROL CHAR *
VPACING=0 VPACING CAN BE ANY ACCEPTABLE VALUE
*
* NOTE: YOU MUST DEFINE ENOUGH LOGICAL TOKEN-RING LINES TO ALLOW
* ALL PUS TO BE USED AT THE SAME TIME
* LABEL ON PATH MACRO MUST BE UNIQUE, IF SPECIFIED
*
PATHB PATH GRPNM=R3G092L,DIALNO=0504400071032004 3
*
* SAME NUMBER OF LUs ON HOST AS DEVICES ON AS/400
*
SWXIDB01 LU LOCADDR=1, FIRST AVAILABLE LOCAL ADDRESS X
ISTATUS=ACTIVE ACTIVATE WITH MAJOR NODE
SWXIDB02 LU LOCADDR=2, FIRST AVAILABLE LOCAL ADDRESS X
ISTATUS=ACTIVE ACTIVATE WITH MAJOR NODE
SWXIDB03 LU LOCADDR=3, FIRST AVAILABLE LOCAL ADDRESS X
ISTATUS=ACTIVE ACTIVATE WITH MAJOR NODE
SWXIDB04 LU LOCADDR=4, FIRST AVAILABLE LOCAL ADDRESS X
ISTATUS=ACTIVE ACTIVATE WITH MAJOR NODE
SWXIDB05 LU LOCADDR=5, FIRST AVAILABLE LOCAL ADDRESS X
ISTATUS=ACTIVE ACTIVATE WITH MAJOR NODE
SWXIDB06 LU LOCADDR=6, FIRST AVAILABLE LOCAL ADDRESS X
ISTATUS=ACTIVE ACTIVATE WITH MAJOR NODE