The following CL commands are used to define the configuration for the system that is identified as LOSANGEL (system B in Figure 6). The examples show these commands as used within a CL program; You can also perform the configuration using the configuration menus.
/*********************************************************************/
/* */
/* MODULE: LACHENNN LIBRARY: PUBSCFGS */
/* */
/* LANGUAGE: CL */
/* */
/* FUNCTION: CONFIGURES APPN EN-NN-EN AS FOLLOWS: */
/* */
/* */
/* NEWYORK /_______\ CHICAGO /_______\ LOSANGEL */
/* \ / \ / */
/* */
/* (THIS IS LOSANGEL TO CHICAGO) */
/* */
/* */
/* */
/*********************************************************************/
PGM
/*********************************************************************/
/* LOSANGEL TO CHICAGO */
/*********************************************************************/
/* Change network attributes for LOSANGEL */
CHGNETA LCLNETID(APPN) LCLCPNAME(LOSANGEL)
LCLLOCNAME(LOSANGEL) NODETYPE(*ENDNODE)
NETSERVER((APPN CHICAGO))
/* Create remote configuration list for LOSANGEL to
New York */
CRTCFGL TYPE(*APPNRMT) APPNRMTE((NEWYORK APPN
LOSANGEL NEWYORK APPN 3BD29F *YES *NO *NO *NO
'RMT LOC of LOSANGEL'))
/* Create line description for LOSANGEL to CHICAGO */
CRTLINSDLC LIND(CHICAGO) RSRCNAME(LIN041)
/* Create controller description for LOSANGEL to
CHICAGO */
CRTCTLAPPC CTLD(CHICAGO) LINKTYPE(*SDLC) LINE(CHICAGO)
RMTNETID(APPN) RMTCPNAME(CHICAGO)
STNADR(01) NODETYPE(*NETNODE)
ENDPGM