Discussion :

[tomguiss]

Bonjour,

pour un travail à rendre assez rapidement, je dois générer un quickreport concernant des ventes réalisées sur la journée.

tout marche très bien si je décide d'imprimer une commande précise, la je génère correctement ma commande et ses détails.

par contre je n'arrive pas à générer un quickreport qui comprends toutes les ventes (et détail de la vente) par jour.

dans mon quickreport, j'ai bien les bonnes informations générales de chaque commande (date, num client, adresse client). Mais pour les détails de chaque commande, j'ai un souci, il me génère les détails de la première commande à chaque fois...

quelqu'un pourrait-il m'éclairer ?

merci,

[dvsoft]

Bonjour,

Urgent oui bien sur
Pourquoi tu ne donne pas un peut plus d’information et un exemple de code

Bon courage
Alain

[tomguiss]

bonjour,


ce n'est pas le plus urgent, mais c'est assez urgent, mon programme est fini à part ce problème, et de l'aide en ligne concernant les QR, il n'y en pas pas beaucoup.

En fait je dois imprimer une feuille de route, qui est composé d'un ou plusieurs bon de commandes, et chaque bon de commande est composé d'une ou plusieurs marchandises.

pour chaque feuille de route, je dois imprimer donc chaque bon commande correspondand.

j'ai un query (Query2) pour savoir quels bons de commande sont inclus dans la tournée (date, numéro de tournée, numéro de client).

j'ai un autre query (QueryBonComporte) pour savoir le détail de chaque bon de commande (réf article, nom article et quantité).

cela me génère bien la bonne liste des numéros de commande avec le détail (numéro de commande, date, numéro de client, nom client, adresse).

mais pour le détail des commandes cela ne marche pas, j'ai bien le détail de la première commande, mais pour les autres commandes, j'ai toujours le détail de la première commande.

voici mon code dans l'événement OnBeforePrint :

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
 
Query2->Close() ;
 Query2->SQL->Clear() ;
 Query2->SQL->Add("SELECT feuilleroutecomporte.refroute, bon.refbon, client.REFCLIENT, client.NOMCLIENT, client.ADR1CLIENT, client.CPCLIENT, client.VILLECLIENT ") ;
 Query2->SQL->Add("FROM ((feuilleroute INNER JOIN feuilleroutecomporte ON feuilleroute.refroute = feuilleroutecomporte.refroute) INNER JOIN bon ON feuilleroutecomporte.refbon = bon.refbon) INNER JOIN client ON bon.refclient = client.REFCLIENT ") ;
 Query2->SQL->Add("WHERE feuilleroutecomporte.refroute = :refroute ") ;
 Query2->SQL->Add("ORDER BY bon.refbon ASC ") ;
 Query2->ParamByName("refroute")->AsString = FFeuilleRoute->Query1refroute->Value;
 Query2->Prepare();
 Query2->Open() ;
 
 QueryBonComporte->Close() ;
 QueryBonComporte->SQL->Clear() ;
 QueryBonComporte->SQL->Add("SELECT bon.refbon, boncomporte.refarticle, articlegeneral.NOMARTICLE_FR, boncomporte.quantite, feuilleroutecomporte.refroute ") ;
 QueryBonComporte->SQL->Add("FROM ((boncomporte INNER JOIN bon ON boncomporte.refbon = bon.refbon) INNER JOIN (feuilleroute INNER JOIN feuilleroutecomporte ON feuilleroute.refroute = feuilleroutecomporte.refroute) ON boncomporte.refbon = feuilleroutecomporte.refbon) INNER JOIN articlegeneral ON boncomporte.refarticle = articlegeneral.REFARTICLEGEN ") ;
 QueryBonComporte->SQL->Add("WHERE feuilleroutecomporte.refroute = :refroute AND bon.refbon = :refbon ") ;
 QueryBonComporte->SQL->Add("ORDER BY bon.refbon ASC ") ;
 QueryBonComporte->ParamByName("refroute")->AsString = FFeuilleRoute->Query1refroute->Value;
 QueryBonComporte->ParamByName("refbon")->AsString = Query2refbon->Value;
 QueryBonComporte->Prepare();
 QueryBonComporte->Open() ;

on dirait que la valeur de refbon ne change jamais dans ce cas si voilà pourquoi cela m'afficherait chaque fois les mêmes détails.

Code :

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

QueryBonComporte->ParamByName("refbon")->AsString = Query2refbon->Value;

je ne sais pas trop comment faire.

[tomguiss]

aahhhhhhhhhh enfin résolu