PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV 2024 → ajouter des donneés dans tableau "TableAjouteLigne"
ajouter des donneés dans tableau "TableAjouteLigne"
Iniciado por Bouddou, jul., 01 2005 2:56 PM - 2 respostas
Publicado em julho, 01 2005 - 2:56 PM
bonjour,

je veux remplire un champ tableau à partir d'un fichier selon certain condition j'ai remarquer que la fonction TableAjouteLigne ne marche pas, parcontre avec un autre champ table fonction trés bien et portant présque le même code voici mon code qui marche pas.
quelqu'un a une idée de ce qui va pas dans mon code
Merci d'avance .
karim.bouddou@voila.fr

//je vérifie si l'utilisateure a bien remplit tout les champ
SI Taille(SansEspace(DT_FIN))= 0 OU Taille(SansEspace(DT_DEBUT))=0 ...
OU Taille(SansEspace(Cd_source)) =0 OU Taille(SansEspace(Code_ParaEau))= 0 ALORS
Info("Vous devez remplir tous les champs !")
RETOUR
FIN
//je vérifie si le champ de saisie Code_ParaEau = NT si oui renomer les colonne puis
//lire la premiere donnée dans le fichier SAIS_EAU qui contient les informations suivante
//(Code_source,Codeparametre_eau,date_saisie_eau,champ1,champ2,champ3,
//Numero_saisie_eau, cle_recherche)
//puis je remplit mon champ tableau qui a comme surce de remplissage fichier si il vérifie
//les conditions si non lit la valeur suivante
SI( Code_ParaEau = "NT") ALORS
Colonne1..Libellé = "date saisie "
Colonne2..Libellé = "MINIMUM"
Colonne3..Libellé = "MAXIMUM"
Colonne4..Libellé = "MOYEN"
HLitPremier(SAIS_EAU,Code_parametre_eau)
SI ((SAIS_EAU.Code_parametre_eau = "NT")_ET_(Cd_source=SAIS_EAU.Code_source) _ET_(DT_DEBUT <= SAIS_EAU.date_saisie) _ET_(SAIS_EAU.date_saisie <=DT_FIN )) ALORS
TableAjouteLigne(Table1,SAIS_EAU.date_saisie,SAIS_EAU.Champ1,SAIS_EAU.Champ2)

FIN
HLitSuivant(SAIS_EAU)
tantque pas HEnDehors()
si ((SAIS_EAU.Code_parametre_eau = "NT")_et_(Cd_source =SAIS_EAU.Code_source) _et_ (DT_DEBUT <= SAIS_EAU.date_saisie) _ET_ ( SAIS_EAU.date_saisie <=DT_FIN )) ALORS
TableAjouteLigne(Table1,DateVersChaine(date_saisie) , SAIS_EAU.Champ1, ... SAIS_EAU.Champ2)
Fin
HLitSuivant(SAIS_EAU)
Fin
FIN
Publicado em julho, 01 2005 - 4:39 PM
As-tu vérifié que ton tableau était actif ?
En effet, tu as pu le mettre inactif pour éviter la saisie "à la main", ce qui empêche aussi de le
remplir en utilisant les fonctions.


Bouddou a écrit :
bonjour,

je veux remplire un champ tableau à partir d'un fichier selon certain condition j'ai remarquer que la fonction TableAjouteLigne ne marche pas, parcontre avec un autre champ table fonction trés bien et portant présque le même code voici mon code qui marche pas.
quelqu'un a une idée de ce qui va pas dans mon code
Merci d'avance .
karim.bouddou@voila.fr

//je vérifie si l'utilisateure a bien remplit tout les champ
SI Taille(SansEspace(DT_FIN))= 0 OU Taille(SansEspace(DT_DEBUT))=0 ...
OU Taille(SansEspace(Cd_source)) =0 OU Taille(SansEspace(Code_ParaEau))= 0 ALORS
Info("Vous devez remplir tous les champs !")
RETOUR
FIN
//je vérifie si le champ de saisie Code_ParaEau = NT si oui renomer les colonne puis
//lire la premiere donnée dans le fichier SAIS_EAU qui contient les informations suivante
//(Code_source,Codeparametre_eau,date_saisie_eau,champ1,champ2,champ3,
//Numero_saisie_eau, cle_recherche)
//puis je remplit mon champ tableau qui a comme surce de remplissage fichier si il vérifie
//les conditions si non lit la valeur suivante
SI( Code_ParaEau = "NT") ALORS
Colonne1..Libellé = "date saisie "
Colonne2..Libellé = "MINIMUM"
Colonne3..Libellé = "MAXIMUM"
Colonne4..Libellé = "MOYEN"
HLitPremier(SAIS_EAU,Code_parametre_eau)
SI ((SAIS_EAU.Code_parametre_eau = "NT")_ET_(Cd_source=SAIS_EAU.Code_source) _ET_(DT_DEBUT <= SAIS_EAU.date_saisie) _ET_(SAIS_EAU.date_saisie <=DT_FIN )) ALORS
TableAjouteLigne(Table1,SAIS_EAU.date_saisie,SAIS_EAU.Champ1,SAIS_EAU.Champ2)

FIN
HLitSuivant(SAIS_EAU)
tantque pas HEnDehors()
si ((SAIS_EAU.Code_parametre_eau = "NT")_et_(Cd_source =SAIS_EAU.Code_source) _et_ (DT_DEBUT <= SAIS_EAU.date_saisie) _ET_ ( SAIS_EAU.date_saisie <=DT_FIN )) ALORS
TableAjouteLigne(Table1,DateVersChaine(date_saisie) , SAIS_EAU.Champ1, ... SAIS_EAU.Champ2)
Fin
HLitSuivant(SAIS_EAU)
Fin
FIN
Publicado em julho, 01 2005 - 9:37 PM
Bonjour
exactement , mon tableau etait inactif Merci infiniment pour votre aide.
Cordialement