Procedure Optimiser(PasDEffetDeBord) ChercherModule(NomDuModule : Caractere, VersionDuModule : Entier, RevisionDuModule : Entier,
CorrectionDuModule : Entier, NomDuNoeud : Caractere Sortie, NomDuServeur : Caractere Sortie, NomDuServeur : Nul Ou Caractere Entree Sortie);
Si le NomDuNoeud est différent de Nul, alors le serveur doit être hébergé sur ce noeud. Si le NomDuServeur est différent de Nul, alors le serveur doit être celui portant ce nom. Si plusieurs serveurs sont disponibles, le serveur retenu est celui qui est le moins chargé.
Les paramètres NomDuNoeud, NomDuServeur et NomDuServeur récupèrent les caractéristiques de son noeud de rattachement.
La procédure ChercherModule est appelée dans le constructeur du type Serveur d'Up ! Network.
Principal
/*******/
Variable
/******/
N : Caractere;
S : Caractere;
A : Caractere;
Debut
...
N=Nul;
S="Finance";
ChercherServeur("Emprunt", 1, 0, 0, N, P, S, A);
/* Recherche le module 'Emprunt' pris en charge par le serveur 'Finance'. */
...
Fin Principal
- | - | - | - | - | - | - | - | - |