Discussion :

[hugnka]

Salut tout le monde,dans mon application,je souhaiterais enregistrer toutes les lignes saisies dans mon champ table mémoire(TABLE_SAISIES) dans un Fichier(SAISIES) via ce code

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
EcranVersFichier()
//TableAjouteLigne(TABLE_SAISIES,COL_N,COL_Quantité,COL_Matéreils_saisis,COL_Observations,COL_Accord)
SI TABLE_SAISIES..Occurrence<>0 ALORS
		i est un entier
		POUR i=1 A TableOccurrence(TABLE_SAISIES)
//			TableOccurrence(TABLE_SAISIES,i)
 
	SAISIES.IDCONVOCATIONS=CONVOCATIONS.IDCONVOCATIONS
	SAISIES.Numero=TABLE_SAISIES.COL_N
	SAISIES.Qte=TABLE_SAISIES.COL_Quantité
	SAISIES.Libelle=TABLE_SAISIES.COL_Matéreils_saisis
	SAISIES.Detail=TABLE_SAISIES.COL_Observations
	SAISIES.Accord=TABLE_SAISIES.COL_Accord
	HAjoute(SAISIES,hIgnoreIntégrité)
	ToastAffiche("Saisie enregistrée avec succès !!",toastCourt,cvMilieu,chCentre)
FIN

Les données s'enregistrent mais le contenu n'est pas correct. En effet c'est juste une seule et même ligne qui se répète dans mon fichier alors que j'aurais voulu que toutes les lignes saisies soient enregistrées. Comment puis-je remédier à cela? Merci d'avance pour votre aide.

[hugnka]

Problème résolu,il fallait juste 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
EcranVersFichier()
 
SI TABLE_SAISIES..Occurrence=0 ALORS RETOUR
SI TABLE_SAISIES..Occurrence<>0 ALORS
 
    POUR TOUTE LIGNE DE TABLE_SAISIES
 
          SAISIES.IDCONVOCATIONS=CONVOCATIONS.IDCONVOCATIONS
	SAISIES.Numero=TABLE_SAISIES.COL_N
	SAISIES.Qte=TABLE_SAISIES.COL_Quantité
	SAISIES.Libelle=TABLE_SAISIES.COL_Matéreils_saisis
	SAISIES.Detail=TABLE_SAISIES.COL_Observations
	SAISIES.Accord=TABLE_SAISIES.COL_Accord
	HAjoute(SAISIES,hIgnoreIntégrité)
 
	FIN
	ToastAffiche("Saisie enregistrée avec succès !!",toastCourt,cvMilieu,chCentre)
        Fin
        Ferme()

Merci