|
|
|
|
- Utilisation d'un Webservice
DéclareContexteWebservice (Exemple)
Utilisation d'un Webservice Cet exemple permet de lancer un Webservice avec toutes les initialisations nécessaires.
gsNomClient est une chaîne
DéclareContexteWebservice(gsNomClient)
PROCÉDURE Connexion(sUtilisateur, sMotDePasse)
SI PAS HLitRecherchePremier(CLIENT, NOM, sUtilisateur) ALORS
RENVOYER Faux
SINON
SI CLIENT.MOTDEPASSE = sMotDePasse ALORS
gsNomClient = sUtilisateur
RENVOYER Vrai
SINON
RENVOYER Faux
FIN
FIN
PROCÉDURE VerifieConnexion()
SI gsNomClient ="" ALORS RENVOYER Faux SINON RENVOYER Vrai
PROCÉDURE Calcul(nParam1 est un entier, nParam2 est un entier)
SI PAS VerifieConnexion() ALORS ExceptionDéclenche(1, "Connexion/authentification incorrect")
nRésultat est un entier
nRésultat = nParam1 + nParam2
RENVOYER nRésultat
Documentation également disponible pour…
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|