Example: Configure system A (New York) as an end node

The following CL commands are used to define the configuration for the system that is NEWYORK. The example shows the commands as used within a CL program; the configuration can also be performed using the configuration menus.

Note:
Read the code disclaimer information for important legal information.
/*********************************************************************/
/*                                                                   */
/*  MODULE:  NYLAAPPN                  LIBRARY:  PUBSCFGS            */
/*                                                                   */
/*  LANGUAGE:  CL                                                    */
/*                                                                   */
/*  FUNCTION:  CONFIGURES APPN ENDNODES AS FOLLOWS:                  */
/*                                                                   */
/*             NEWYORK  /_______\  LOSANGEL                          */
/*                      \       /                                    */
/*                                                                   */
/*               (THIS IS NEWYORK TO LOSANGEL)                       */
/*********************************************************************/
PGM
/*********************************************************************/
/*                        NEWYORK TO LOSANGEL                        */
/*********************************************************************/
             /* Change network attributes for NEWYORK  */
             CHGNETA    LCLNETID(APPN) LCLCPNAME(NEWYORK)
                          LCLLOCNAME(NEWYORK) NODETYPE(*ENDNODE)
             /* Create line description for NEWYORK to LOSANGEL */
             CRTLINSDLC LIND(LOSANGEL) RSRCNAME(LIN011)
             /* Create controller description for NEWYORK to
                                                      LOSANGEL */
             CRTCTLAPPC CTLD(LOSANGEL) LINKTYPE(*SDLC) LINE(LOSANGEL)
                          RMTNETID(APPN) RMTCPNAME(LOSANGEL)
                          STNADR(01) NODETYPE(*CALC)
ENDPGM