Bonsoir à tous,
j'ai dans ma fenêtre principale, un oblet Client, dans lequel y'a une Table Client que je n'arrive pas à rafraichir après une modif fiche client via une fenetre modale...
J'ai essayé avec un rajout TableAffiche(FEN_Principale.TABLE_RechercheClient,taCourantBandeau) posé à la fin du code de modif mais sans succès.
Je vous met tout le code (un peu long) de ma fenêtre de modif fiche client :
Merci d'avance pour votre aide
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
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119 EcranVersFichier() SI Client..NouvelEnregistrement ALORS Client.Date = DateDuJour() ////////////////////////////////////////////////////////// //Enregistre nouveau client ////////////////////////////////////////////////////////// SI PAS HEnregistre(Client) ALORS //ajoute le nom du client dans la table client Avertissement("Insertion Client NOK") FIN ToastAffiche("Ajout client OK") nRecupIDClient est un entier = Client.IDClient //recupere l'id qui vient d'être créé //nIDMNS est un entier = Client.IDMNS // récupère l'idMNS qui vient d'être inséré //info(nIDMNS) ///////////////////////////////////////////////////////////// //AJOUTE LES NOUVEAUX CRENEAUX DU CLIENT ///////////////////////////////////////////////////////////// nId est un entier tabToutcreneaux est un tableau d'entiers POUR TOUT LIGNE SELECTIONNÉE DE LISTE_Creneaux //crée la boucle nId = LISTE_Creneaux..ValeurMémorisée Ajoute(tabToutcreneaux,nId) FIN SI AjoutCreneauxClient(nRecupIDClient,tabToutcreneaux) ALORS ToastAffiche("Ajout créneaux : OK") FIN /////////////////////////////////////////////////////////// // MAJ DU NB DE COURS D'UN MNS /////////////////////////////////////////////////////////// bSiOK est un booléen bSiOK = UpdateNbCoursMNS() SI bSiOK = Vrai ALORS ToastAffiche("Update NbCours MNS : OK") SINON ToastAffiche("ATTENTION NOK : Update NbCours MNS") FIN //Vide les variables Client.Date = "" Client.IDClient = "" Multitâche(300) Ferme(FEN_Clients) SINON ////////////////////////////////////////////////////////////////////////// // Modifie le produit ////////////////////////////////////////////////////////////////////////// SI PAS HModifie(Client) ALORS Avertissement("Modification NOK") FIN ToastAffiche("Modification client OK") ////////////////////////////////////////////////////////////////////////// // Suppression des anciens creneaux ////////////////////////////////////////////////////////////////////////// nRecupIDClient est un entier = Client.IDClient//recupere l'id REQ_DeleteCreneauxClient.ParamIDclient = nRecupIDClient SI PAS HExécuteRequête(REQ_DeleteCreneauxClient,hRequêteDéfaut) ALORS Info("Delete créneaux NOK") FIN ///////////////////////////////////////////////////////////// //AJOUTE LES NOUVEAUX CRENEAUX DU CLIENT ///////////////////////////////////////////////////////////// nId est un entier tabToutcreneaux est un tableau d'entiers POUR TOUT LIGNE SELECTIONNÉE DE LISTE_Creneaux //crée la boucle nId = LISTE_Creneaux..ValeurMémorisée Ajoute(tabToutcreneaux,nId) FIN SI AjoutCreneauxClient(nRecupIDClient,tabToutcreneaux) ALORS ToastAffiche("Modification créneaux OK") FIN /////////////////////////////////////////////////////////// // MAJ DU NB DE COURS D'UN MNS /////////////////////////////////////////////////////////// bSiOK est un booléen bSiOK = UpdateNbCoursMNS() SI bSiOK = Vrai ALORS ToastAffiche("Update NbCours MNS : OK") SINON ToastAffiche("ATTENTION NOK : Update NbCours MNS") FIN //Vide les variables Client.Date = "" Client.IDClient = "" FIN TableAffiche(FEN_Principale.TABLE_RechercheClient,taCourantBandeau) Multitâche(300) Ferme(FEN_Clients)
Partager