Rappel ModifierContenu(RequeteContenu, Reponse : Nul Ou ReponseContenu);
La requête soumise par le client est donnée par Requete de type RequeteContenu. La réponse à fournir par le serveur doit être rangée dans Reponse de type ReponseContenu.
La valeur de retour doit suivre la convention de fonctionnement de l'énuméré RappelReponse.
Cette méthode de rappel correspond à la réception de la commande PATCH du protocole HyperText Transfer Protocol (HTTP).
/****************************************************************/
Rappel ClientContenu.ModifierContenu(Requete : Nul Ou RequeteContenu, Reponse : Nul Ou ReponseContenu)
/* Objet : Affiche les options. */
/****************************************************************/
Variable
/******/
O : Nul Ou Objet;
MonClient : MonClientContenu;
MonEmploye2 : Employe;
Debut
O=LireExtension("AppCns");
Si O==Nul Alors
EcrireExtension("AppCns", MonClient);
Sinon
MonClient=MonClientContenu(O);
Fin Si
Si ActiverJournal Alors
EcrireJournal(Objet, MonClient, "ModifierContenu("+Requete.URIContenu+")");
Fin Si
Si Non AnalyserParametres(Requete.URIContenu) Alors
Retourner RappelEchecTechnique;
Fin Si
Si ListeEmployes!=Nul Alors
Pour MonEmploye2=ListeEmployes.ParcoursAuDebut() JusquA ListeEmployes.DernierElement() Faire
Si MonEmploye2.Numero==MonEmploye.Numero Alors
MonEmploye2.Nom=MonEmploye.Nom;
MonEmploye2.Salaire=MonEmploye.Salaire;
Arreter;
Fin Si
Fin Pour
Fin Si
GenererContenu(Reponse);
Retourner RappelSucces;
Fin Rappel
| - | - | - | - | - | - | - | - | - |