Bonjour,
J'ai un tableau hiérarchique et j'ai ajouté une colonne interrupteur. Je rempli mon tableau via la programmation.
Ce que je souhaite c'est si toutes les cases de mes lignes enfants sont coché, je voudrais coché la case de la ligne parent. Mais je vois pas comment faire .
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36 sLigneEnfantCoche est un booléen sLigneEnfantCoche = Faux sLigneParentCoche est un booléen sLigneParentCoche = Vrai HExécuteRequête(REQ_Liste_Ligne_Parent) HLitPremier(REQ_Liste_Ligne_Parent,REQ_Liste_Ligne_Parent.Num) TANTQUE HTrouve()=Vrai ET HEnDehors()=Faux TableAjouteFils(PAGE_MaPage.TABLEH_MaTable, "", REQ_Liste_Ligne_Parent.Num) REQ_Detail_Ligne_Parent.Param = REQ_Liste_Ligne_Parent.Num HExécuteRequête(REQ_Detail_Ligne_Parent) HLitPremier(REQ_Detail_Ligne_Parent,REQ_Detail_Ligne_Parent.ID) TANTQUE HTrouve()=Vrai ET HEnDehors()=Faux SI REQ_Detail_Ligne_Parent.Status = "OK" ALORS sLigneEnfantCoche = Vrai SINON sLigneParentCoche= Faux FIN TableAjouteFils(PAGE_MaPage.TABLEH_MaTable, REQ_Liste_Ligne_Parent.Num,REQ_Detail_Ligne_Parent.Champ1,REQ_Detail_Ligne_Parent.Champ2, sLigneEnfantCoche) HLitSuivant(REQ_Detail_Ligne_Parent,REQ_Detail_Ligne_Parent.ID) FIN HLitSuivant(REQ_Liste_Ligne_Parent,REQ_Liste_Ligne_Parent.Num) FIN
Partager