The following CL commands are used to define the configuration for the system that is identified as CHICAGO (system NN1 in Figure 7). The examples show these commands as used within a CL program; the configuration can also be performed using the configuration menus.
/*********************************************************************/
/* */
/* MODULE: CHICINT LIBRARY: PUBSCFGS */
/* */
/* LANGUAGE: CL */
/* */
/* FUNCTION: CONFIGURES APPN NETWORK: */
/* */
/* THIS IS: CHICAGO TO MPLS */
/* CHICAGO TO DETROIT */
/* */
/* */
/* */
/* */
/*********************************************************************/
PGM
/* Change network attributes for CHICAGO */
CHGNETA LCLNETID(APPN) LCLCPNAME(CHICAGO) +
LCLLOCNAME(CHICAGO) NODETYPE(*NETNODE)
/*********************************************************************/
/* CHICAGO TO MPLS */
/*********************************************************************/
/* Create nonswitched line description for CHICAGO to MPLS */
CRTLINSDLC LIND(MPLSL) RSRCNAME(LIN021)
/* Create controller description for CHICAGO to MPLS */
CRTCTLAPPC CTLD(MPLSL) LINKTYPE(*SDLC) LINE(MPLSL) +
RMTNETID(APPN) RMTCPNAME(MPLS) +
STNADR(01) NODETYPE(*NETNODE)
/*********************************************************************/
/* CHICAGO TO DETROIT */
/*********************************************************************/
/* Create nonswitched line description for CHICAGO to */
DETROIT */
CRTLINSDLC LIND(DETROIT) RSRCNAME(LIN021)
/* Create controller description for CHICAGO to
DETROIT */
CRTCTLAPPC CTLD(DETROIT) LINKTYPE(*SDLC) LINE(DETROIT) +
RMTNETID(NEWNET) RMTCPNAME(DETROIT) +
STNADR(01) NODETYPE(*NETNODE)
ENDPGM