Discussion :

[tAKAmAkA]

Bonjour à tous,

Dans un onglet j'ai une table alimentée par une requête (celle ci interroge 1 seul fichier).
J'ai fait les liaisons de mes colonnes vers les rubriques de ma requête.
J'ai une colonne d'interrupteurs.
Je souhaite simplement utiliser un bouton "Cocher tout" qui me mette tous les interrupteurs à 1.
L'initialisation de ma table:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

HExécuteRequête(REQ_UtilisateurActif,hModifieFichier)

Jusque là tout semble ok. Les coches "unitaires" sont prises en compte.

J'ai un bouton "Cocher tout", il m'affiche bien tous les interrupteurs cochés:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
IncrementTable est un entier
POUR IncrementTable = 1 A TABLE_REQ_UtilisateurActif..Occurrence
    TABLE_REQ_UtilisateurActif.COL_ConsultDossDef[IncrementTable] = Vrai
 
    EcranVersFichier(PAGE_AdministrationDonnees)
    HModifie(Utilisateur)
FIN

Mais le fichier n'est pas mis à jour. J'ai fait beaucoup de tentatives sans succès.

Je précise que je suis débutant absolu en Windev!

Merci de votre attention.

[Simeonn]

Salut,

Première chose que je ferai, pour éviter des aller-retour inutiles, je mettrai le EcranVersFichier et HModifie hors de la boucle.

As-tu regardé le retour de ta fonction HModifie?

[Nicolas_Jeanneau]

Bonjour,

ta table est reliée à la requête REQ_UtilisateurActif et non au fichier Utilisateur. Ce qui fait que tu as une coche qui est liée à la requête également. Si tu veux que la colonne soit reliée au fichier Utilisateur, il faut lui faire une liaison multifichier avec le lien sur l'identifiant de l'utilisateur.

Si cela ne suffit pas, alors il faut aménager ta boucle et faire une recherche de l'enregistrement, modifier la valeur et enregistrer la modification, ligne à ligne.

Bon courage,

Nicolas

[michel.souris]

Le plus "standard" et le plus efficace reste d’exécuter un UPDATE en SQL....

[Nicolas_Jeanneau]

Le plus "standard" et le plus efficace reste d’exécuter un UPDATE en SQL....

je suis bien d'accord mais j'essaie de donner une solution sans modifier complètement ce qui est déjà fait ! Sinon, oui, forcément si on peut ne pas s'embêter avec des boucles et tout le toutim ...

[tAKAmAkA]

Bonjour,
Merci pour votre intérêt.
@simeon: J'ai sorti ecranversfichier et hmodifie de la boucle
HModifie renvoi 1 (vrai)

@nicolas: J'ai pu faire une liaison multifichier au niveau du champ table mais pour la colonne la liaison reste monofichier (grisé). je ne sais pas si c'est normal.

@michel: Je voudrai d'abord comprendre un peu Windev!

La situation n'a pas changé...

[Christophe.LOGEL]

Bonjour,

Dans votre code vous effectuez un HModifie sur la table Utilisateur alors que vous n'êtes pas positionné dessus.
Pour que votre code fonctionne, vous pouvez faire ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
IncrementTable est un entier
POUR IncrementTable = 1 A TABLE_REQ_UtilisateurActif..Occurrence
    TABLE_REQ_UtilisateurActif.COL_ConsultDossDef[IncrementTable] = Vrai //*** Uniquement pour l'affichage ***//
 
    //*** Mise à jour de la table Utilisateur ***//
    HLitRecherche(Utilisateur, IDUtilisateur, TABLE_REQ_UtilisateurActif.COL_IDUtilisateur[ IncrementTable] )
    SI Htrouve(Utilisateur) ALORS
        Utilisateur.ConsultDossDef = vrai
        HModifie(Utilisateur)
    FIN
 
FIN

Cordialement,

[tAKAmAkA]

Merci Christophe,
ça marche parfaitement bien.
Merci à tous.