Lancer le NETSERVER ("voisinage réseau") sur l’AS400

Symptômes et vérifications

Le sous-système QSERVER doit être démarré.  STRSBS  QSERVER 

La commande  NETSTAT  *CNN  devrait permettre de voir les entrées netbios parmi toutes les connexions TCP/IP

*   * netbios > 006:19:40 Listen
*   * netbios > 000:00:00 *UDP
*   * netbios > 000:00:00 *UDP
*   * netbios > 000:48:22 Listen

Configuration à la souris du netserver

Sous iSeries Navigator : Machine > Réseau > Serveurs > TCP/IP > Panneau de droite > clic-droit Propriétés > Donner un nom au netserver, qui doit être différent de celui du système. C’est ici qu’on indique également le domaine ou groupe de travail.

Aménagements à faire dans le QSTRUP

…
/* Arret pour relancer APRES qserver */
CALL QZLSENDS PARM(X'00000000')
MONMSG CPF0000
DLYJOB DLY(180)
STRTCP
MONMSG CPF0000
DLYJOB DLY(180)
/* Lance le NetServer */
CALL QZLSSTRS PARM('0'  X'00000000')
MONMSG CPF0000
…

Bien sûr, QPGMR doit avoir les droits spéciaux *IOSYSCFG

Démarrage avec réinitialisation

CALL QZLSSTRS PARM('1'  X'00000000')