Prerequisitos:
• TCPIP configurado correctamente.
• Subsistema QSNADS arrancado.
• Añadir usuarios al directorio (WRKDIRE).
Procedimiento, ejecutar en cada uno de los sistemas a conectar:
1. Activar el atributo de red "Permitir soporte AnyNet" con CHGNETA ALWANYNET(*YES), requiere IPL.
2. Añadir nombre al nombre de sistema principal el de 'nombre_sistema.appn.sna.ibm.com', utilizar el mandato CHGTCPHTE o CFGTCP, opción 10 y opción 2 en el sistema a modificar su entrada, de la tabla de sistema principales (HOSTS).
3. Crear el controlador APPC utilizando el mandato CRTCTLAPPC donde xxxxxxx es el nombre de sistema al que conectamos, en cada sistema origen utilizar el nombre del sistema destino.
CRTCTLAPPC CTLD(xxxxxxxx) LINKTYPE(*ANYNW) ONLINE(*YES) APPN(*YES) RMTNETID(*NETATR) RMTCPNAME(xxxxxxxxx) NODETYPE(*LENNODE) BEXROLE(*NETNODE) HPR(*YES) HPRPTHSWT(*NO) TMSGRPNBR(1) AUTOCRTDEV(*ALL) AUTODLTDEV(1440) USRDFN1(*LIND) USRDFN2(*LIND) USRDFN3(*LIND) TEXT('APPN sobre TCPIP para xxxxxxx') CMNRCYLMT(2 5) MSGQ(*SYSVAL)
4. Para crear el dispositivo APPC, y de paso probar la conexión, ejecutar STRPASTHR nombre_sistema, nos debería aparecer el inicio de sesión del sistema destino.
6. Ejecutar el mandato CFGDSTSRV "Configurar Servicios de Distribución".
7. Seleccionar la opción "1=Colas de distribución" y después pulsar "F6=Añadir cola de distribución"
8. Teclear en los campos Cola y Nombre ubicación remota el nombre del sistema destino:
9. Volver a paso 6 y seleccionar a continuación la opción "2=Tabla de direccionamiento", después pulsar "F6=Añadir entrada tabla de direccionamiento".
10. Teclear en los campos indicados el nombre de sistema de destino:
11. Si además queremos utilizar los mandatos SAVRST* entre sistemas debemos tener instalado el producto "OS/400 - ObjectConnect ", para V5R2 es 5722SS1- opción 22.
.png)
.png)