Discussion :

[GAJES]

Bonjour j'ai réalisé un état pour l'impression d'un reçu sauf que sur l'aperçu avant impression la page à imprimer à 2 reçu de deux clients différents alors que je voudrais que se soit 2 reçu pour le même client afin qu'un reçu soit restituer au client l'autre pour la comptabilité. J'ai besoin de votre aide, merci d'avance

[ptahsokaris]

Bonjour,

Pourriez-vous donner un peu plus de précisions s'il vous plait ?
Par exemple, quel code utilisez-vous actuellement pour générer l'état ? Ou bien quelle requête est utilisée pour sélectionner les données ?

[Invité]

Bonjour,
d'après ce que je comprends, cela pourrait provenir d'un problème dans votre filtre

[GAJES]

Code de mon etat

Code :

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

1
2
3
4
5
6
7
8
ReçuDepot est une Source de Données
gsRequete est une chaîne
 
gsRequete="select ReçuDepot.IDReçuDepot,ReçuDepot.IDReçu,ReçuDepot.NumEnvoieDA,ReçuDepot.IntCltE,ReçuDepot.TelCltE,ReçuDepot.NatureCour,ReçuDepot.Poids,ReçuDepot.Montant,ReçuDepot.PaysDest,ReçuDepot.IntCltD,ReçuDepot.TelCltD,ReçuDepot.DateDepot,ReçuDepot.Statut"
HExécuteRequêteSQL(ReçuDepot,hRequêteDéfaut,gsRequete)
HLitPremier(ReçuDepot)
 
RENVOYER PAS HEnDehors(ReçuDepot)

Code du bloc de mon etat

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
rub_IDReçu = ReçuDepot.IDRe��uDepot
rub_NumEnvoieAB = ReçuDepot.NumEnvoieDA
rub_IntCltE = ReçuDepot.IntCltE
rub_TelCltE = ReçuDepot.TelCltE
RUB_NatureCour = ReçuDepot.NatureCour
rub_Poids = ReçuDepot.Poids
rub_Montant = ReçuDepot.Montant
rub_PaysDest = ReçuDepot.PaysDest
RUB_DateDepot = ReçuDepot.DateDepot
rub_IntCltD =  ReçuDepot.IntCltD
rub_TelCltD = ReçuDepot.TelCltD
 
HLitSuivant(ReçuDepot)

[Invité]

gsRequete="select ReçuDepot.IDReçuDepot,ReçuDepot.IDReçu,ReçuDepot.NumEnvoieDA,ReçuDepot.IntCltE,ReçuDepot.TelCltE,ReçuDepot.NatureCour,ReçuDepot.Poids,ReçuDepot.Montant,ReçuDepot.PaysDest,ReçuDepot.IntCltD,ReçuDepot.TelCltD,ReçuDepot.DateDepot,ReçuDepot.Statut"

Je ne vois pas de "FROM" ni de "WHERE" dans votre requête

[GAJES]

En effet il n'y a ni de where ou de From juste pour simple. Pensez vous que cela pourrait résoudre mon problème !

[Invité]

La requête est syntaxiquement incorrecte, toute requête de type sélection doivent contenir les mots clés "SELECT" et "FROM", et pou y appliquer un filtre, le mot clé "WHERE" doit être ajouté.
Essayez de nouveau votre traitement après avoir corrigé votre requête

[GAJES]

D'accord merci pour la precision

[frenchsting]

Si j'ai bien tout compris de ton état : tu as une page A4 (portrait) divisée en 2. Les données du haut sont dupliquées en bas.

Rien ne t'empêche de faire un copier coller de tes champs de la partie haute vers la partie basse de ton état. Ton code devient alors :

Code :

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

1
2
3
4
5
rub_IDReçu = ReçuDepot.IDRe��uDepot
rub_IDReçu1 = ReçuDepot.IDRe��uDepot
rub_NumEnvoieAB = ReçuDepot.NumEnvoieDA
rub_NumEnvoieAB1 = ReçuDepot.NumEnvoieDA
...

Mais avant toute chose, tu dois vérifier que ta requête est correcte.

[tbc92]

Il y a un autre principe très important en programmation en général ( pas uniquement Windev), c'est de tester les codes retour.

Il ne faut JAMAIS faire :

Code :

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

1
2
3
 
HExécuteRequêteSQL(ReçuDepot,hRequêteDéfaut,gsRequete)
HLitPremier(ReçuDepot)

Il faut faire :

Code :

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

1
2
3
4
5
6
7
8
 
b est un booleen 
b = HExécuteRequêteSQL(ReçuDepot,hRequêteDéfaut,gsRequete)
si pas b alors 
   hinfogene(  )
   erreur ( " La requete a planté " , herreur() )
fin 
HLitPremier(ReçuDepot)

Regarde l'aide de HexecuteRequeteSQL() pour avoir la syntaxe précise.

En tout cas, moi, je suis incapable de débugger mes programmes sans passer systématiquement par ça.

[GAJES]

J'ai fais ce que vous m'avez demandé donc ceci:

Si j'ai bien tout compris de ton état : tu as une page A4 (portrait) divisée en 2. Les données du haut sont dupliquées en bas.

Rien ne t'empêche de faire un copier coller de tes champs de la partie haute vers la partie basse de ton état. Ton code devient alors :

Code :

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

1
2
3
4
5
rub_IDReçu = ReçuDepot.IDRe��uDepot
rub_IDReçu1 = ReçuDepot.IDRe��uDepot
rub_NumEnvoieAB = ReçuDepot.NumEnvoieDA
rub_NumEnvoieAB1 = ReçuDepot.NumEnvoieDA
...

Pour les autres conseils émis je les prend en compte afin à la longue de palier à d'autres accrochages.Merci à vous tous pour votre aide

[GAJES]

Le problème de mon état réglé, je suis confronté à un soucis. Lors de l'impression des reçus, le classement de ceux ci sont pèles mêles comment puis je faire afin que les reçus soient alignés du plus nouveau au plus anciens pour faciliter l’utilisateur.

[Invité]

Le problème de mon état réglé, je suis confronté à un soucis. Lors de l'impression des reçus, le classement de ceux ci sont pèles mêles comment puis je faire afin que les reçus soient alignés du plus nouveau au plus anciens pour faciliter l’utilisateur.

En faisant un tri? en mettant un order by dans la requête?

[GAJES]

Jai essayé le Order By dans le code de l'etat mais il ne change pas car les reçus sont tjrs peles meles et quand j'ai jété un coup d'oeil dans le tableau TReçuDepot je compris que le problème c'est que le classement des enregistrements depuis le tableau est pele mele donc comment y remedier.

[frenchsting]

Tu veux les trier par rapport à quoi ?

[Invité]

On peut voir la requête, le résultat obtenu (3 ou 4 lignes de la requête) et le résultat attendu?

[GAJES]

1- Voici le code de mon etat:

Code :

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

1
2
3
4
5
6
7
8
ReçuDepot est une Source de Données
gsRequete est une chaîne
 
gsRequete="select * FROM ReçuDepot where ReçuDepot.NumEnvoieDA = CourrierDepartAt.NumEnvoieDA ORDER by ReçuDepot.IDReçuDepot DESC"
 
HExécuteRequêteSQL(ReçuDepot,hRequêteDéfaut,gsRequete)
 
HLitPremier(ReçuDepot)

Resultat attendu: Qu'il classe le dernier enregistrement en premier cad decroissant

2- Je veux les trier par rapport au IDReçuDepot

[Invité]

gsRequete="select * FROM ReçuDepot where ReçuDepot.NumEnvoieDA = CourrierDepartAt.NumEnvoieDA ORDER by ReçuDepot.IDReçuDepot DESC"

Etonnant que windev ne râle pas, il aurait dû dire que la requête est mal construite, qu'il ne connait pas CourrierDepartAt.NumEnvoieDA...
Elle doit retourner quoi exactement? Les champs de ReçuDepot, de CourrierDepartAt ou les 2?

2- Je veux les trier par rapport au IDReçuDepot

S'agit-il d'un champ numérique de type id.automatique?

[GAJES]

1- Elle doit retourner juste les enegistrements de la table ReçuDepot dans l'etat Reçu en ordre decroissant

2- Oui en effet IDReçuDepot est un champ numérique de type id.automatique.

[Invité]

Dans ce cas :

Code :

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

gsRequete="select * FROM ReçuDepot where NumEnvoieDA in (SELECT NumEnvoieDA  FROM CourrierDepartAt) ORDER by IDReçuDepot DESC"

Comme IDReçuDepot est un champ de type id.Automatique, cela veut dire que le 1er enregistrement qui sera remonté sera le dernier enregistrement crée, puis, l'avant dernier et ainsi de suite.
Si ce n'est pas ce genre de tri que vous voulez, faites sur un autre champ, ne connaissant pas précisément la description de votre table ReçuDepot, vous seul pouvez savoir sur quel champ il faut faire le tri