Discussion :

[mnssylvain]

bonjour

J'ai un truc bizarre qui se produit dans ma fenetre. Elle contient une table et des champs de saisie qui reprenne les éléments importants de ma table.
Lorsque je clique sur une ligne de ma table les champs de saisie dessous se mette à jours.

Jusque la je m'en suis sortie. Le truc que je ne comprends pas c'est que lorsque j'ajoute une nouvelle ligne à ma table, 2 cas de figure

1) si je remplis les champs de saisis sans sortir de ma ligne les enregistrements sont pris en compte sans problème... (tout va bien)

2) Mais lorsque après avoir rempli ma nouvelle ligne, si je clique sur une autre ligne et que je reviens sur la dernière saisie, les champs en dessous de la table ont été rempli avec les valeurs de la première ligne de ma table

Rien de très grave on peut effacer et ressaisir du texte mais ça fait pas très pro tout ça.....

je vous laisse le code, il est surement un peu farfelu vu que je le tourne dans tous les sens depuis quelques jours:

le code de ma table:

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
 
--------------------
sortie d'une ligne de table incidents
--------------------
Info("sortie de ligne"+SAI_faits)
Info("sortie de date : refincident:"+ TABLE_incidents.refincidents)
SI TABLE_incidents.refincidents="" ALORS
	SAI_faits=""
	SAI_decisionprof=""
	SAI_decisionadmin=""
FIN
Info("sortie de date : refincident:"+ TABLE_incidents.refincidents)
TableEnregistre(TABLE_incidents)
Info("sortie de date : refincident:"+ TABLE_incidents.refincidents)
Info("sortie de ligne"+SAI_faits)
//REQ_Retenuesdates.Param1=SAI_refeleves
//HExécuteRequête(REQ_Retenuesdates,hModifieFichier)
//TableAffiche(TABLE_Retenuesdates)
SAI_nbincidents=TableOccurrence(TABLE_incidents)
Info("sortie de ligne"+SAI_faits)
Info("sortie de date : refincident:"+ TABLE_incidents.refincidents)
//refincident=REQ_incidents.refincidents
 
----------------------------
affichage d'une ligne de table_incidents
----------------------------
Info("sortie de ligne"+SAI_faits)
TableEnregistre(TABLE_incidents)
 
Info("sortie de ligne"+SAI_faits)
 
HLitRecherchePremier(REQ_incidents,REQ_incidents.refincidents,TABLE_incidents.refincidents)
Info("sortie de ligne"+SAI_faits)
//SAI_faits=REQ_incidents.faits
//SAI_decisionprof=REQ_incidents.décisionprof
//SAI_decisionadmin=REQ_incidents.décisionadmin
SI TABLE_incidents.refincidents <>"" ALORS FichierVersEcran(retenues_et_exclusions,REQ_incidents)
Info("sortie de ligne"+SAI_faits)
SI TABLE_incidents.refincidents="" ALORS
	SAI_faits=""
	SAI_decisionprof=""
	SAI_decisionadmin=""
	SAI_refincidents=TABLE_incidents.refincidents
FIN
Info("sortie de ligne"+SAI_faits)

le premier champ de ma table:

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
 
---------------------
entrée de date
---------------------
madate est une chaîne = Ouvre( Calend ) // affiche un calendrier en sélectionnant la date du jour
 
TABLE_incidents.date=madate
 
-----------------------------------
sortie de date
----------------------------------
 
SI TABLE_incidents.refeleves=0 OU TABLE_incidents.refeleves="" ALORS TABLE_incidents.refeleves=SAI_refeleves
SI TABLE_incidents.refetablissement=0 OU TABLE_incidents.refetablissement="" ALORS TABLE_incidents.refetablissement=1
SI TABLE_incidents.refprofs=0 OU TABLE_incidents.refprofs="" ALORS TABLE_incidents.refprofs=1
Info("sortie de date : refincident:"+ TABLE_incidents.refincidents)
Info("sortir de date"+ SAI_faits)
TableEnregistre(TABLE_incidents)    //a tester
 
//REQ_Retenuesdates.Param1=SAI_refeleves
//HExécuteRequête(REQ_Retenuesdates,hModifieFichier)
//TableAffiche(TABLE_Retenuesdates)
SAI_nbincidents=TableOccurrence(TABLE_incidents)
//refincident=REQ_incidents.refincidents
Info("sortir de date"+ SAI_faits)

J'ai mis des info(sai_faits) un peu partout pour essayer de voir à quel endroit la valeur de "sai_faits" était donnée
avec le fichier de donnée en parallèle je crois avoir déterminé que le problème
vient de la ligne du code "sortie de date" (première colonne de ma table)

Code :

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

TableEnregistre(TABLE_incidents)    //a tester

mais bon je ne suis sûr de rien

Merci beaucoup...... pour votre aide

[mnssylvain]

EUREKA

en remettant un peu do'rdre dans mon code et en continuant de chercher comme un chien enragé...... j'ai fini par trouver....

Le pb venait de la commande "tableenregistre" qui ne prenait pas en compte le fait que j'étais sur une nouvelle ligne et qui du coup prenait les valeur de la première ligne de ma table (ça c'est mon interprétation à partir de mes observations...)

de plus la commande tableenregistre ne sert à rien quand les fichiers sont mis à jour en cascade.....

bref voici mon code si ça peut intéresser quelqu'un


code de la table:

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
 
---------------
sur sortie d'une ligne
---------------
SAI_nbretenues=TableOccurrence(TABLE_Retenuesdates)
sai_refretenue=TABLE_Retenuesdates.refretenue
 
----------------
sélection d'une ligne
----------------
SI TABLE_Retenuesdates.refretenue=0 ALORS
	SAI_repartition=""
	SAI_Motifs=""
	SAI_Matériels=""
	SAI_travail=""
	SINON
	HLitRecherchePremier(REQ_Retenuesdates,REQ_Retenuesdates.refretenue,TABLE_Retenuesdates.refretenue)
	FichierVersEcran(retenues_et_exclusions,REQ_Retenuesdates)
FIN
 
 
sai_refretenue=TABLE_Retenuesdates.refretenue

plus besoin du code sur la première colonne de ma table

et voilou