The following CL commands are used to define the configuration for the system that is identified as LOSANGEL (EN2 in the figure). The example shows these commands as used within a CL program; the configuration can also be performed using the configuration menus.
/*********************************************************************/
/* */
/* MODULE: LOSANGEL LIBRARY: PUBSCFGS */
/* */
/* LANGUAGE: CL */
/* */
/* FUNCTION: CONFIGURES APPN NETWORK: */
/* */
/* THIS IS: LOSANGEL TO MPLS (switched) */
/* */
/* */
/* */
/* */
/*********************************************************************/
PGM
/* Change network attributes for LOSANGEL */
CHGNETA LCLNETID(APPN) LCLCPNAME(LOSANGEL)
LCLLOCNAME(LOSANGEL) NODETYPE(*ENDNODE)
/*********************************************************************/
/* LOSANGEL TO MPLS (switched) */
/*********************************************************************/
/* Create switched line description for LOSANGEL TO MPLS */
CRTLINSDLC LIND(MPLS) RSRCNAME(LIN041) CNN(*SWTPP)
AUTOANS(*NO) STNADR(01) COSTCNN(128)
COSTBYTE(128)
/* Create controller description for LOSANGEL TO MPLS */
CRTCTLAPPC CTLD(MPLS) LINKTYPE(*SDLC) SWITCHED(*YES)
SWTLINLST(MPLS) RMTNETID(APPN)
RMTCPNAME(MPLS) INLCNN(*DIAL)
CNNNBR(6125553333) STNADR(01) CPSSN(*NO)
NODETYPE(*NETNODE)
ENDPGM