Example: Connect a server to another server

This example shows how to create Advanced Program-to-Program Communication (APPC) over token-ring connection from your server to another server.

The name of the local server is LOCAL, and the name of the remote system is REMOTE.

Note: Because all the examples use the same token-ring line description, this example discusses only the controller and device descriptions.

Focus on these points in this example:

The service access points (SAPs) in the controller descriptions. For more information about SAPs, read SNA connections to LAN protocols.

The adapter address used by a controller description must match the address that is used in the line description on the remote device. This table shows the adapter addresses that are used by the line and controller descriptions on both systems.

Table 1. Local and remote adapter addresses
	LOCAL	REMOTE
Adapter address in line description	400003190001	400003200001
Adapter address referred to by the controller description	400003200001	400003190001

The way a system identifies the other system to which it connects. Both sides must use the same method. These are the methods:
- Only use the Remote exchange identifier parameter.
- Use the Remote network identifier and the Remote control point name parameters.
In this example, each system uses the Remote network identifier and Remote control point name (RMTCPNAME) parameters to indicate the system to which it connects.
Note that within a system the remote network identifier must be the same in the controller and device description. Because the example uses the default value of *NETATR for the Remote network identifier parameter, this parameter is not shown.

Get the value for the Remote control point name parameter from the other system. To do this, use the Display Network Attributes (DSPNETA) command on the other system and locate the Local control point name field.

TOKENRING2:

This example uses this line description on the remote system.

CRTLINTRN LIND(TOKENRING2) RSRCNAME(TRN_IOA) LINESPEED(16M)
          MAXFRAME(16393) ADPTADR(400003200001) EXCHID(05600000)
          SSAP((04 *MAXFRAME *CALC) (08 *MAXFRAME *CALC))
          TEXT('Line description for 400003200001')

Controller descriptions:

These examples show the controller descriptions that are used on the local and remote systems.

CRTCTLAPPC CTLD(LOCAL_CD) LINKTYPE(*LAN) SWTLINLST(TOKENRING1)
           RMTCPNAME(REMOTECP) ADPTADR(400003200001) DSAP(04)
           SSAP(08) TEXT('Controller description on LOCAL')

CRTCTLAPPC CTLD(REMOTE_CD) LINKTYPE(*LAN) SWTLINLST(TOKENRING2)
           RMTCPNAME(LOCALCP) ADPTADR(400003190001) DSAP(08)
           SSAP(04) TEXT('Controller description on REMOTE')

Device descriptions:

In the device descriptions, the Remote network identifier (RMTNETID) parameter should match the local network-identifier of the remote system. You must use the Display Network Attributes (DSPNETA) command on the remote system to view the local network-identifier.

CRTDEVAPPC DEVD(LOCAL_DD) RMTLOCNAME(REMOTE) LCLLOCNAME(LOCAL)
           CTL(LOCAL_CD) MODE(BLANK)
           TEXT('APPC device description describing system REMOTE')

CRTDEVAPPC DEVD(REMOTE_DD) RMTLOCNAME(LOCAL) LCLLOCNAME(REMOTE)
           CTL(REMOTE_CD) MODE(BLANK)
           TEXT('APPC device description describing system LOCAL')