Qreport avec groupe et plusieurs query

**Oluha** · 16/11/2005, 12h18

Salut

J'ai déjà fait des Qreports "basiques" qui ne nécéssitaient qu'une seule requête.
Seulement là je dois en faire un qui selon moi n'est pas possible à faire en une seule requête mais je ne sais pas du tout comment faire.

Quelques explications :
- j'ai plusieurs "jobs" regroupés dans une table
- chaque job a une prise en charge (PEC) (une table PEC)
- chaque PEC peut avoir 0,n routage (une table ROUT)
- chaque PEC peut avoir 0,n déduplication (une table DEDUP)
- les dédups et les routages sont totalement indépendants
- les données d'une dedup et d'un routage différentes (pas la même structure)

J'aimerai donc faire un report de la sorte

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
PEC1
détails
 
liste des routages
 
liste des dedups
----------------------------
PEC2
détails
 
liste des routages
 
liste des dedups
 
.
.
.

Comme je l'ai dis je ne pense pas qu'il soit possible de faire ça avec une seule requête, mais comment je doit faire des groupes pour les PC, il faudrait faire une requête pour la liste des routages et une pour la liste des dédup à chaque saut de groupe.
Est-ce possible ? Si oui, comment faut-il faire ?

Merci

**Rayek** · 16/11/2005, 14h53

Code :

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

1
2
3
4
5
 
Select Liste Champ table PEC, 'ROUTAGE' as Type, List Champ Table Rout from (PEC inner join Rout on PEC.ChampCommun=Rout.ChampCommun)
union
Select Liste Champ table PEC, 'DEDUP' as Type ,List Champ Table DEDUP from (PEC Inner join DEDUP on PEC.ChampCommun=DEDUP.ChampCommun)
Order by Nom Pec, desc Type,Nom Rout/DEDUP

Devrait te donner une reponse du style :

Nom PEC, autres champs PEC,ROUTAGE, Nom Rout, Autres champs Rout
...
Nom PEC, autres champs PEC,DEDUP, Nom DEDUP, Autres champs DEDUP
...

Il faut que dans la requete Union Tous les champs est le même nom (faut caster les champs avec un AS NomDuChamp)

Apres dans le report tu crées :
- Un premier groupe qui pointe par rapport a NOM PEC
- un sous groupe qui Pointera sur le type (Routage/DEDUP) et qui fera une casssure de groupe sur le Type.

**Oluha** · 16/11/2005, 15h10

comme je l'ai dis, DEDUP et ROUT n'ont pas du tout la même structure, je ne peux pas faire une union

**portu** · 16/11/2005, 15h27

Tu as regardé du coté des QrSubDetail ?

**Rayek** · 16/11/2005, 15h29

Envoyé par Oluha

comme je l'ai dis, DEDUP et ROUT n'ont pas du tout la même structure, je ne peux pas faire une union

Envoyé par Malatar

Il faut que dans la requete Union Tous les champs est le même nom (faut caster les champs avec un AS NomDuChamp)

Exemple

Table1: C1,C2,C3
Table2: C2,C4,C5
Table3: C2,C6,C7,C8

Code :

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

1
2
3
4
5
 
Select T1.C1,T1.C2,T1.C3,T2.C4 as Nom,T2.C5 as Detail1, '' as Detail2 from Table1 as T1 inner join Table2 as T2 on T1.C2=T2.C2
Union
Select T1.C1,T1.C2,T1.C3,T3.C6 as Nom,T3.C7 as Detail1,T3.C8 as Detail2 from Table1 as T1 inner join Table3 as T3 on T1.C2=T3.C2
Order by T1.C1,desc Nom

**Oluha** · 16/11/2005, 16h13

Envoyé par portu

Tu as regardé du coté des QrSubDetail ?

c'est ce que j'essaye de faire depuis plusieurs heures mais j'y arrive pas, quand je visualise les infos du sous détail ne veulent pas s'afficher

**Oluha** · 16/11/2005, 16h21

ta solution malatar pourrait marché mais les labels pour dire à quoi correspond les valeurs ne sont pas les mêmes et la mise en forme doit être différentes

**Zatoobux** · 16/11/2005, 18h54

Salut,

1- Les données :

Dans ton cas il faut 3 Requete :
- La maitre "PEC"
- Deux details "ROUT" et "DEDVP"

Il faudra un TDataSource qui pointe sur la requete "PEC", appelons le dsPEC.

Tu dois faire des relation maitre detail entre PEC et ROUT ainsi que entre PEC et DEVPC.
Dans les requetes ROUT et DEDVP tu affecte à datasource le dsPEC.

Pour le SQL des requetes detail regarde dans l'aide pour TQuery.Datasource.

2- L'état :
La bande détail et l'etat : rien a signalé ils pointent sur la Requete PEC.
Puis tu ajoutes 2 bandes de sous detail et tu affectes à TQRSubDetail.dataset une requetes de détail.

@+

**Oluha** · 17/11/2005, 09h06

c'est ce que j'ai fais mais pas moyen d'avoir les infos du sous détail à l'affichage.
J'ai essayé pleins d'autres trucs que j'ai trouvé dans des exemples mais rien n'y fait.
Voici le code de ma fiche si ça inspire quelqu'un (pour le moment je ne me suis pas occupée de ROUT, juste DEDUP)

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
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
object Form7: TForm7
  Left = 271
  Top = 158
  Width = 1001
  Height = 832
  Caption = 'Form7'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 13
  object QuickRep1: TQuickRep
    Left = 8
    Top = 8
    Width = 794
    Height = 1123
    Frame.Color = clBlack
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    DataSet = Qpec
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Arial'
    Font.Style = []
    Functions.Strings = (
      'PAGENUMBER'
      'COLUMNNUMBER'
      'REPORTTITLE')
    Functions.DATA = (
      '0'
      '0'
      #39#39)
    Options = [FirstPageHeader, LastPageFooter]
    Page.Columns = 1
    Page.Orientation = poPortrait
    Page.PaperSize = A4
    Page.Values = (
      100
      2970
      100
      2100
      100
      100
      0)
    PrinterSettings.Copies = 1
    PrinterSettings.Duplex = False
    PrinterSettings.FirstPage = 0
    PrinterSettings.LastPage = 0
    PrinterSettings.OutputBin = Auto
    PrintIfEmpty = True
    SnapToGrid = True
    Units = Native
    Zoom = 100
    object QRBand1: TQRBand
      Left = 38
      Top = 38
      Width = 718
      Height = 81
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      AlignToBottom = False
      Color = clWhite
      ForceNewColumn = False
      ForceNewPage = False
      Size.Values = (
        214.3125
        1899.70833333333)
      BandType = rbTitle
    end
    object QRBand2: TQRBand
      Left = 38
      Top = 119
      Width = 718
      Height = 106
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      AlignToBottom = False
      Color = clWhite
      ForceNewColumn = False
      ForceNewPage = False
      LinkBand = QRSubDetail1
      Size.Values = (
        280.458333333333
        1899.70833333333)
      BandType = rbDetail
      object QRDBText1: TQRDBText
        Left = 0
        Top = 8
        Width = 13
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          0
          21.1666666666667
          34.3958333333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = Qpec
        DataField = 'ID'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRDBText2: TQRDBText
        Left = 16
        Top = 8
        Width = 69
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          42.3333333333333
          21.1666666666667
          182.5625)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = Qpec
        DataField = 'DATE_PEC'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRDBText3: TQRDBText
        Left = 96
        Top = 8
        Width = 45
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          254
          21.1666666666667
          119.0625)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = Qpec
        DataField = 'CLIENT'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRDBText4: TQRDBText
        Left = 288
        Top = 8
        Width = 46
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          762
          21.1666666666667
          121.708333333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = Qpec
        DataField = 'REVUE'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRDBText5: TQRDBText
        Left = 496
        Top = 8
        Width = 30
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          1312.33333333333
          21.1666666666667
          79.375)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = Qpec
        DataField = 'NUM'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRDBText6: TQRDBText
        Left = 16
        Top = 32
        Width = 43
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          42.3333333333333
          84.6666666666667
          113.770833333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = Qpec
        DataField = 'NB_FR'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRDBText7: TQRDBText
        Left = 16
        Top = 56
        Width = 42
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          42.3333333333333
          148.166666666667
          111.125)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = Qpec
        DataField = 'NB_ET'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRDBText8: TQRDBText
        Left = 16
        Top = 80
        Width = 50
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          42.3333333333333
          211.666666666667
          132.291666666667)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = Qpec
        DataField = 'NB_TOT'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRDBText9: TQRDBText
        Left = 288
        Top = 32
        Width = 105
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          762
          84.6666666666667
          277.8125)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = Qpec
        DataField = 'CP_ARECYCLER'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRDBText10: TQRDBText
        Left = 288
        Top = 56
        Width = 105
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          762
          148.166666666667
          277.8125)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = Qpec
        DataField = 'CP_RECYCLEES'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRDBText11: TQRDBText
        Left = 496
        Top = 32
        Width = 114
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          1312.33333333333
          84.6666666666667
          301.625)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = Qpec
        DataField = 'ADR_ARECYCLER'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRDBText12: TQRDBText
        Left = 496
        Top = 56
        Width = 114
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          1312.33333333333
          148.166666666667
          301.625)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = Qpec
        DataField = 'ADR_RECYCLEES'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
    end
    object QRSubDetail1: TQRSubDetail
      Left = 38
      Top = 225
      Width = 718
      Height = 40
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      AlignToBottom = False
      Color = clWhite
      ForceNewColumn = False
      ForceNewPage = False
      Size.Values = (
        105.833333333333
        1899.70833333333)
      Master = QuickRep1
      DataSet = QryDEDUP
      PrintBefore = False
      PrintIfEmpty = True
      object QRDBText13: TQRDBText
        Left = 32
        Top = 8
        Width = 87
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          84.6666666666667
          21.1666666666667
          230.1875)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = QryDEDUP
        DataField = 'DATE_DEDUP'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRDBText14: TQRDBText
        Left = 128
        Top = 8
        Width = 46
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          338.666666666667
          21.1666666666667
          121.708333333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = QryDEDUP
        DataField = 'NB_FIC'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRDBText15: TQRDBText
        Left = 192
        Top = 8
        Width = 78
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          508
          21.1666666666667
          206.375)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = QryDEDUP
        DataField = 'NB_ENTREE'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRDBText16: TQRDBText
        Left = 280
        Top = 8
        Width = 73
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          740.833333333333
          21.1666666666667
          193.145833333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = QryDEDUP
        DataField = 'NB_SORTIE'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRLabel1: TQRLabel
        Left = 416
        Top = 8
        Width = 58
        Height = 25
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          66.1458333333333
          1100.66666666667
          21.1666666666667
          153.458333333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = 'QRLabel1'
        Color = clWhite
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
    end
  end
  object DsPEC: TDataSource
    DataSet = Qpec
    Left = 856
    Top = 16
  end
  object QryROUT: TQuery
    Active = True
    DatabaseName = 'mediapost'
    SessionName = 'SessionMediapost'
    DataSource = DsPEC
    SQL.Strings = (
      'select * from '
 
        '(select ID,convert(char(10),DATE_ROUT,103) as DATE_ROUT,LOG_ROUT' +
        '.TYPE,POIDS,LOG_ROUT.NB_TOT as NB_ROUT,NB_SAC,IMPRESSION'
      'from LOG_ROUT'
      'where LOG_ROUT.OK = 1'
      'union'
 
        'select ID,convert(char(10),DATE_MULTI,103) as DATE_ROUT,LOG_MULT' +
        'I.TYPE,'#39#39' as POIDS,LOG_MULTI.NB_ETIQ as NB_ROUT,'#39#39' as NB_SAC,IMP' +
        'RESSION'
      'from LOG_MULTI'
      'where LOG_MULTI.OK = 1) A'
 
        'where A.DATE_ROUT >= '#39'01/01/2005'#39' and A.DATE_ROUT <= '#39'31/12/2005' +
        #39
      'order by A.ID,A.DATE_ROUT')
    Left = 816
    Top = 80
  end
  object Qpec: TQuery
    Active = True
    DatabaseName = 'mediapost'
    SessionName = 'SessionMediapost'
    SQL.Strings = (
 
        'select LOG_JOB.ID, convert(char(10),DATE_PEC,103) as DATE_PEC,CL' +
        'IENT,REVUE,NUM,COMMENTAIRE,TYPE,CP_ARECYCLER,CP_RECYCLEES,ADR_AR' +
        'ECYCLER,ADR_RECYCLEES,NB_TOT,NB_ET,NB_FR'
      'from LOG_PEC'
      'inner join LOG_JOB on LOG_PEC.ID = LOG_JOB.ID'
      'where OK = 1'
      'order by LOG_JOB.ID')
    Left = 816
    Top = 16
  end
  object QryDEDUP: TQuery
    DatabaseName = 'mediapost'
    SessionName = 'SessionMediapost'
    DataSource = DsPEC
    SQL.Strings = (
      'select * from LOG_DEDUP'
      'where OK = 1'
      'order by ID')
    Left = 816
    Top = 48
  end
end

**Oluha** · 17/11/2005, 10h52

c'est en progrès !
Maintenant il m'affiche bien les valeurs du sous détail mais il ne m'affiche que le 1er élément alors qu'il devrait y en avoir 3 pour chaque PEC

Quelqu'un aurait une idée d'où ça pourrait venir ?

merci

**Rayek** · 17/11/2005, 11h00

Envoyé par Oluha

c'est en progrès !
Maintenant il m'affiche bien les valeurs du sous détail mais il ne m'affiche que le 1er élément alors qu'il devrait y en avoir 3 pour chaque PEC

Quelqu'un aurait une idée d'où ça pourrait venir ?

merci

Tu n'aurais pas oublié d'indiquer le champs de référence dans le sous détail ? (le champs sur lequel il va boucler pour chercher les autres resultats)

**Oluha** · 17/11/2005, 11h06

possible, mais je ne vois pas où il faut l'indiquer

**Oluha** · 17/11/2005, 11h08

ah apparemment il m'avait viré la propriété dataset, maintenant c'est bon !

**Rayek** · 17/11/2005, 11h10

Je pourrais pas t'aider plus vu que je n'ai pas QR avec D2005, c'est des souvenirs de l'époque D5 ^^

Normalement dans ta band details tu dois pouvoir sélectionner un champ du datasource, la, il faut que tu indiques celui qui va servir de référence.
En clair celui qui va indiquer la fin du sous detail des qu'il va changer de valeur (L'id Pec par exemple)

**Oluha** · 17/11/2005, 11h16

c'est nickel et en plus il m'affiche pas la bande quand la requête ne renvoit rien, c'est parfait !
J'ai encore un petit truc à régler avant de mettre

Qreport avec groupe et plusieurs query

Bases de données Delphi

Discussions similaires

Partager

Partager