PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV 2024 → Suppression de plusieurs enregistrements dans une table
Suppression de plusieurs enregistrements dans une table
Iniciado por Tom, ago., 02 2004 11:18 AM - 2 respostas
Publicado em agosto, 02 2004 - 11:18 AM
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.
Publicado em agosto, 02 2004 - 12:11 PM
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.
Publicado em agosto, 02 2004 - 7:25 PM
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