PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEV, WEBDEV and WINDEV Mobile

|
|
|
US
Home → WINDEV 2024 → WD10 trigger
WD10 trigger
Started by MikeFilth, Apr., 13 2006 5:03 PM - No answer
#1
Posted on April, 13 2006 - 5:03 PM
Bonjour a tous.

J'ai une base de données progress. J'essaye d'appliquer le meme principe que la journalisation en ecriture avec des triggers.

Mon probleme est que le trigger avant et le trigger apres hajoute, hmodifie et hsupprimer le renvoie les valeurs deja modifié.

Je m'explique : j'ai une fenetre avec une table devise avec libelle et code iso.
Je modifie une devise dans la table ex: ero en Euro.
La valeur de devise.libelle dans le trigger avant et dans le trigger après est Euro.

Quelqu'un sait pourkoi et comment obtenir l'ancienne valeur dans le trigger avant.

Voici mon code fait avec des indirection pour ce que ca interesse.

stmp_fichier est une chaîne = "Histo"+H.NomFichier
sList_rub est une chaîne
nICompt est un entier
sSousChaîne est une chaîne

sList_rub = HListeRubrique({H.NomFichier,indFichier})
sSousChaîne = ExtraitChaîne(sList_rub, rangPremier, RC)

{stmp_fichier+".login"} = gpwRecupInfoUtilisateur(gpwInfoLogin)
{stmp_fichier+".dasai"} = DateVersChaîne(DateSys(),"MM/JJ/AA")
{stmp_fichier+".heuresai"} = HeureVersChaîne(HeureSys())
{stmp_fichier+".action"} = H.FonctionTrigger
{stmp_fichier+".type"} = "Apres"

TANTQUE sSousChaîne <> EOT
{stmp_fichier+"."+sSousChaîne} = {H.NomFichier+"."+sSousChaîne}
Trace("Ap",sSousChaîne,{H.NomFichier+"."+sSousChaîne})
sSousChaîne = ExtraitChaîne(sList_rub, rangSuivant, RC)
FIN
HAjoute({stmp_fichier})


Merci pour vos conseil et bon dev.

MikeFilth
→ Go back to WINDEV 2024