contribution à l'etude et au dimensionnement d'un reseau d'entreprise
contribution à l'etude et au dimensionnement d'un reseau d'entreprise
contribution à l'etude et au dimensionnement d'un reseau d'entreprise
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
ANNEXE 4 : Utilisation de l’AGL Windev version 9<br />
Voici le code source de notre application :<br />
//Clic sur le bouton Suivant<br />
debit_local est un entier<br />
MoiMême..Etat=Grisé<br />
SELON Proj<strong>et</strong>_creation..Plan<br />
CAS 1<br />
SI Proj<strong>et</strong>_LibelleEOT ALORS<br />
EcranVersFichier<br />
HAjoute(Proj<strong>et</strong>)<br />
HLit(Proj<strong>et</strong>)<br />
IDProj<strong>et</strong>Encours=Proj<strong>et</strong>.Proj<strong>et</strong>_ID<br />
FIN<br />
NomProj<strong>et</strong>=Proj<strong>et</strong>_Libelle<br />
Precedent..Etat=Actif<br />
CAS 2<br />
SI Table_Localité..Occurrence0 ALORS<br />
HDésactiveFiltre(Localite)<br />
sRubCléParcours2 est une<br />
chaîne=HFiltre(Localite,"Localite_Proj<strong>et</strong>ID="+IDProj<strong>et</strong>Encours)<br />
ListeAffiche(Cmb_localite)<br />
FIN<br />
CAS 3<br />
SI maillage=F<strong>au</strong>x ALORS<br />
// en étoile<br />
// Compte rendu<br />
SI HTrouve ALORS<br />
Proj<strong>et</strong>.Proj<strong>et</strong>_SwitchCentre=""+commcentre<br />
SELON commcentre<br />
CAS ~="SWITCH 10/100"<br />
Proj<strong>et</strong>.Proj<strong>et</strong>_ModeleType="Modèle à une couche"<br />
CAS ~="SWITCH GIGABIT"<br />
Proj<strong>et</strong>.Proj<strong>et</strong>_ModeleType="Modèle à deux couches"<br />
CAS ~="SWITCH MULTILAYER"<br />
Proj<strong>et</strong>.Proj<strong>et</strong>_ModeleType="Modèle à trois couches"<br />
FIN<br />
HModifie(Proj<strong>et</strong>)<br />
FIN<br />
SINON<br />
HLitRecherchePremier(Proj<strong>et</strong>, Proj<strong>et</strong>_ID,<br />
IDProj<strong>et</strong>Encours)<br />
89