HHistoriqueModification()
![]() | |
| Renvoie les modifications apportees à une ou plusieurs rubriques d`un enregistrement donne. Remarque : Cette fonction utilise le journal des ecritures ainsi que l`ensemble des journaux archives. Exemple : // Permet de visualiser dans une table, les utilisateurs qui on change l`email du client en cours // ainsi que les differentes valeurs de l`email au cours du temps sHistorique est une chaîne sHistorique = HHistoriqueModification(Client,IDClient,Client.IDClient,"EMail",5) sModification,sRubrique,sEtat,sUtilisateur sont des chaînes sModification = ExtraitChaîne(sHistorique,rangPremier,RC) TANTQUE sModification <> EOT sRubrique = ExtraitChaîne(sModification,1,TAB) sEtat = ExtraitChaîne(sModification,2,TAB) sUtilisateur = ExtraitChaîne(sModification,5,TAB) SELON sEtat CAS "D" ListeAjoute(ListeModification,... ChaîneConstruit("L`utilisateur %1 a modifie la rubrique EMail pour lui donner la valeur %2",... sUtilisateur,sRubrique)) CAS "N" ListeAjoute(ListeModification,... ChaîneConstruit("L`utilisateur %1 a modifie la rubrique EMail pour la rendre NULL",sUtilisateur) FIN sModification = ExtraitChaîne(sHistorique,rangSuivant,RC) FIN |
Source: Freedev
Publicité
