Discussion :

[axel56]

Bonjour

J'ai une requête multiple qui me retourne 6 informations, que j'envoi ensuite dans un fichier CSV. Le problème est que je voudrai que chaque information soit inséré dans une colonne.

Voici mon code :

Code :

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

1
2
3
4
5
6
7
POUR i= 1 A 34
TableauAjouteLigne(tableauF,PG_Requete("SELECT BEKTNUMERO,BEKTLIGNE,BECTCODEPF,BECTCODCOM,BECNCONSPR,BECNCONSRE FROM BESOIN  WHERE BECTCODEPF = ¿"+Donnee+"¿  AND BECTCODCOM =¿"+Ncomp+"¿"))
Ncomp++
FIN
 
Valeurs=TableauVersCSV(tableauF,";")
fSauveTexte("C:\Documents and Settings\STEPHANE\Bureau\test1.csv",Valeurs)

J'ai essayer de mettre +'TAB'+ ou || TAB|| à la place des "," mais sa ne marche pas.

Merci de votre aide

[gancau]

Bonjour
Tu devrais effectivement avoir des ; comme séparateur.
Je n'ai plus la version 12 installée sur ce PC, je ne peux pas tester.
Ce que tu peux faire est d'écrire manuellement ton fichier, c'est beaucoup plus long je te le concede

Bon dev
Gancau

[axel56]

Bonjour

Non je n'ai même pas de ; entre les information, mais des carré.
Par conte bizarrement quand je copie le contenu de ma cellule excel et que je colle autre part, les carrés se transforme en Tabulation, et du coup mon tableau prend la bonne forme.

[tatayo]

Bonjour,
J'imagine que le tableau en question est un tableau à deux dimension de chaine.
D'après l'aide en ligne de TableauAjouteLigne, ton ajout ne peut pas fonctionner. En effet il faut passer chaque valeur séparément, et non sous forme d'une chaine séparée par des tabulations.

Si tu regardes le contenu de ton tableau, seul la première "colonne" sera renseignée.


Tatayo.

[axel56]

Merci de ta réponse
Si j'ai bien compris il faut que je fasse ce code du coup :

Code :

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

TableauAjouteLigne(tableauF,PG_Requete("SELECT BEKTNUMERO FROM BESOIN  WHERE BECTCODEPF = ¿"+Donnee+"¿  AND BECTCODCOM =¿"+Ncomp+"¿"),PG_Requete("SELECT BEKTLIGNE FROM BESOIN  WHERE BECTCODEPF = ¿"+Donnee+"¿  AND BECTCODCOM =¿"+Ncomp+"¿"),PG_Requete("SELECT BECTCODEPF FROM BESOIN  WHERE BECTCODEPF = ¿"+Donnee+"¿  AND BECTCODCOM =¿"+Ncomp+"¿"),PG_Requete("SELECT BECTCODCOM FROM BESOIN  WHERE BECTCODEPF = ¿"+Donnee+"¿  AND BECTCODCOM =¿"+Ncomp+"¿"),PG_Requete("SELECT BECNCONSPR FROM BESOIN  WHERE BECTCODEPF = ¿"+Donnee+"¿  AND BECTCODCOM =¿"+Ncomp+"¿"),PG_Requete("SELECT BECNCONSRE FROM BESOIN  WHERE BECTCODEPF = ¿"+Donnee+"¿  AND BECTCODCOM =¿"+Ncomp+"¿"))

Parce que j'ai déjà essayer ce code, mais dans ce cas mes valeurs se range que dans les deux première colonnes.

Merci

[tatayo]

C'est dommage de lancer plusieurs fois la même requête, et le code devient un peu illisible.

Le mieux serait de lancer la requête une fois avec les 6 colonnes, de récupérer le résultat dans une variable, puis de remplir le tableau en utilisant ExtraitChaine pour isoler chaque valeur.

Tatayo.

[Nicolas_Jeanneau]

C'est dommage de lancer plusieurs fois la même requête, et le code devient un peu illisible.

Le mieux serait de lancer la requête une fois avec les 6 colonnes, de récupérer le résultat dans une variable, puis de remplir le tableau en utilisant ExtraitChaine pour isoler chaque valeur.

Tatayo.

Ca me parait être plus efficace aussi car il faut que tu gardes l'enregistrement au complet pour éviter les surprises avec des champs non alimenté par exemple ...

Avec 6 variables auxquelles tu affectes le contenu de chaque champ de ta requête, ton affectation avec tableauajouteligne devrait mieux se passer.

[axel56]

Je ne connai pas la commande ExtraitChaine, du coup je ne sais pas si je l'utilise correctement. (ça fait 3 jours que j'ai débuté Windev).

Voila ce que j'ai essayé.

Code :

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

1
2
3
4
5
6
7
8
9
10
 
Valeurs est une chaîne
ValeursF est une chaîne
POUR i= 1 A 34
Valeurs=PG_Requete("SELECT BEKTNUMERO,BEKTLIGNE,BECTCODEPF,BECTCODCOM,BECNCONSPR,BECNCONSRE FROM BESOIN  WHERE BECTCODEPF = ¿"+Donnee+"¿  AND BECTCODCOM =¿"+Ncomp+"¿")
Ncomp++
FIN
 
ValeursF = ExtraitChaîne(Valeurs,2,"TAB",DepuisDébut)
fSauveTexte("C:\Documents and Settings\STEPHANE\Bureau\test1.csv",ValeursF)

J'ai essayé ça, et ça me fait planter mon fichier test1.csv.
Merci pour vote aide

[tatayo]

Je te conseille de regarder l'aide en ligne de ExtraitChaine().
Ensuite tu devrais placer un point d'arrêt sur la ligne 1, puis faire du pas à pas en surveillant les valeurs de tes variables.
Tu verras que tu as un gros problème de logique dans ton code...

Tatayo.

[bruno.a]

Bonjour

Je ne connais pas PG_REQUETE.
C'est une procedure interne à ton logiciel ou c'est une procedure Windev ? Si Windev, je ne trouve aucune aide dessus ????

[axel56]

Bonjour

PG_requete est une procédure propre au programme que j'utilise "CEGID PMI".

Après avoir chercher en m'aidant de l'aide ExtraitChaine, je n'arrive pas à trouver mon ou mes erreurs, je débute tout juste avec windev et je n'ai pas encore la logique de programmation.

Merci

[tatayo]

Bonjour

PG_requete est une procédure propre au programme que j'utilise "CEGID PMI".

Après avoir chercher en m'aidant de l'aide ExtraitChaine, je n'arrive pas à trouver mon ou mes erreurs, je débute tout juste avec windev et je n'ai pas encore la logique de programmation.

Merci

Je te conseille de regarder l'aide en ligne de ExtraitChaine().
Ensuite tu devrais placer un point d'arrêt sur la ligne 1, puis faire du pas à pas en surveillant les valeurs de tes variables.
Tu verras que tu as un gros problème de logique dans ton code...

Tatayo.

[axel56]

Bonjour

Je ne comprends pas comment un Extraitchaine peut corriger mon problème de colonnes, si j'ai bien compris, extraichaine permet de prendre une parti de ma chaîne, soit en partant du début, soit de la fin soit à partir d'une limite qu'on lui donne.

Ensuite tu devrais placer un point d'arrêt sur la ligne 1, puis faire du pas à pas en surveillant les valeurs de tes variables.
Tu verras que tu as un gros problème de logique dans ton code...

Je ne sais pas comment faire du pas à pas .

Merci

[tatayo]

Il suffit de chercher dans l'aide en ligne...

Tatayo.