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