PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2024 → Suppression de plusieurs enregistrements dans une table
Suppression de plusieurs enregistrements dans une table
Débuté par t.padoin, 02 aoû. 2004 11:18 - 2 réponses
Posté le 02 août 2004 - 11:18
Bonjour.
Je voudrais supprimer plusieurs enregistrements dans une même table. Je m'explique.
Je fais une recherche dans la table sur un numéro de rapport. Ce dernier
se trouve 10 fois dans ma table. Je voudrais une ligne de code capable de
supprimer tous les enregistrements ( les 10 donc ) qui possedent ce numéro
que rapport.
Comment puis-je faire sachant que j'ai déja tenté un
TANTQUE PAS Hendhors(matable)
hlitrecherche ( ....
hsupprime(matable)
Cette derniere manipulation ne marche pas.
Posté le 02 août 2004 - 12:11
A mon avis voici le code que tu dois faire pour être sûr que cela marche.En
plus tu peux mettre un compteur pour savoir combien d'enregistrements tu
as supprimé...

Cpt est un entier = 0
HlitPremier(MaTable, MaCléDeParcours)
TantQue PAS HEnDehors(MaTable)
SI MaTable.MonCodeDeRecherche = MonCritere ALORS
SI PAS HSupprime(MaTable) ALORS
Erreur("Erreur sur la Suppression !!!!")
SINON
Cpt++
FIN
FIN
HLitSuivant(MaTable,MaCléDeParcours)
FIN
Info("Vous venez de supprimer :" + Cpt + " Lignes de la Table")
//Actualisation de la table en Affichage si tu en as une
TableAffiche(TableEnAffichage,TaDébut)

"Tom" <t.padoin@laposte.net> wrote:


Bonjour.
Je voudrais supprimer plusieurs enregistrements dans une même table. Je

m'explique.
Je fais une recherche dans la table sur un numéro de rapport. Ce dernier
se trouve 10 fois dans ma table. Je voudrais une ligne de code capable de
supprimer tous les enregistrements ( les 10 donc ) qui possedent ce numéro
que rapport.
Comment puis-je faire sachant que j'ai déja tenté un
TANTQUE PAS Hendhors(matable)
hlitrecherche ( ....
hsupprime(matable)
Cette derniere manipulation ne marche pas.
Posté le 02 août 2004 - 19:25
Le 2 août 2004 à 10:18, Tom nous disait :

Je voudrais supprimer plusieurs enregistrements dans une même table. Je m'explique.
Je fais une recherche dans la table sur un numéro de rapport. Ce dernier
se trouve 10 fois dans ma table. Je voudrais une ligne de code capable de
supprimer tous les enregistrements ( les 10 donc ) qui possedent ce numéro
que rapport.


Tu peux utiliser POUR TOUT :

POUR TOUT MaTable AVEC NumRapport=Valeur
HSupprime(MaTable)
FIN

--
Cordialement