HHistoriqueModification()

Publié le par softdev

wd16
 

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é

Publié dans Wlanguage

Pour être informé des derniers articles, inscrivez vous :
Commenter cet article