Service SQL IBM i (AS/400) · Procédure
QSYS2.SET_SERVER_SBS_ROUTING
Définir le routage des serveurs vers un sous-système
Procédure qui redirige les travaux de serveurs hôtes d'un utilisateur, d'un groupe ou d'une plage d'adresses IP vers un sous-système donné.
À quoi ça sert
Cette procédure crée ou modifie une règle de routage des travaux de serveurs hôtes (accès de base de données, fichiers, etc.) vers un sous-système choisi. La règle vise un profil ou un groupe (AUTHORIZATION_NAME), un serveur (SERVER_NAME, ou *ALL) et un sous-système (SUBSYSTEM_NAME). Elle peut aussi cibler une plage d'adresses IP avec IP_ADDRESS_START, IP_ADDRESS_END, SUBNET_MASK ou PREFIX_LENGTH.
Les paramètres ALLOW_ROLLOVER (YES par défaut), SERVER_POSITION, REPLACEMENT_IP_ADDRESS_START et REPLACEMENT_IP_ADDRESS_END et TEXT_DESCRIPTION complètent le réglage. L'exemple d'IBM crée d'abord un sous-système dédié avec CRTSBSD, CRTJOBQ, ADDJOBQE, CRTCLS, ADDPJE et STRSBS, puis y repositionne l'utilisateur SCOTT.
Résultat réel sur un IBM i 7.5
Procédure non exécutée sur notre IBM i de test : elle agit sur la configuration du système ou sur d'autres travaux.
L'exemple d'IBM
Utiliser SERVER_SBS_ROUTING pour repositionner l'utilisateur SCOTT dans un autre sous-système.
-- Description: Use SERVER_SBS_ROUTING to reposition SCOTT to an alternate SBS
CL: CRTSBSD SBSD(QGPL/ADHOCSBS) POOLS((1 *BASE)) TEXT('Ad hoc users SBS');
CL: CRTJOBQ QGPL/ADHOCJOBQ TEXT('Ad hoc users job queue');
CL: ADDJOBQE SBSD(QGPL/ADHOCSBS) JOBQ(QGPL/ADHOCJOBQ) MAXACT(100) SEQNBR(40);
CL: CRTCLS CLS(QGPL/ADHOCCLS) RUNPTY(55) TIMESLICE(100) TEXT('Ad hoc class');
CL: ADDPJE SBSD(QGPL/ADHOCSBS) PGM(QSYS/QRWTSRVR) JOBD(QGPL/QDFTSVR) CLS(QGPL/ADHOCCLS);
CL: ADDPJE SBSD(QGPL/ADHOCSBS) PGM(QSYS/QZDASOINIT) JOBD(QGPL/QDFTSVR) CLS(QGPL/ADHOCCLS);
CL: STRSBS SBSD(QGPL/ADHOCSBS);
CALL QSYS2.SET_SERVER_SBS_ROUTING('SCOTT','*ALL','ADHOCSBS');Bon à savoir
Le sous-système cible doit exister et contenir des postes de travaux préchargés pour les serveurs concernés, sinon les connexions ne s'y exécuteront pas. Contrôlez le résultat avec QSYS2.SERVER_SBS_ROUTING.
Paramètres
| Paramètre | Type | Par défaut | Signification |
|---|---|---|---|
AUTHORIZATION_NAME |
VARCHAR(10) | obligatoire | Profil utilisateur |
SERVER_NAME |
VARCHAR(10) | obligatoire | Nom du serveur |
SUBSYSTEM_NAME |
VARCHAR(10) | obligatoire | Nom du sous-système |
ALLOW_ROLLOVER |
VARCHAR(3) | 'YES' | Basculement autorisé |
IP_ADDRESS_START |
VARCHAR(45) | NULL | Adresse IP de début de plage |
IP_ADDRESS_END |
VARCHAR(45) | NULL | Adresse IP de fin de plage |
SUBNET_MASK |
VARCHAR(15) | NULL | Masque de sous-réseau |
PREFIX_LENGTH |
INTEGER | NULL | Longueur du préfixe |
SERVER_POSITION |
INTEGER | NULL | Position du serveur |
REPLACEMENT_IP_ADDRESS_START |
VARCHAR(45) | NULL | Début de la plage d'adresses IP de remplacement |
REPLACEMENT_IP_ADDRESS_END |
VARCHAR(45) | NULL | Fin de la plage d'adresses IP de remplacement |
TEXT_DESCRIPTION |
VARCHAR(50) | NULL | Texte descriptif |