Solved

Count in sub detail report

Posted on 2000-03-26
8
269 Views
Last Modified: 2010-04-04
I have a report, include detail and sub detail. I want to print a order number subdetail.

For ex.
No CustNo
      No   Orders
1   001
      1    001
      2    002
      3    003

2   003
      1    007
      2    009
      3    010

0
Comment
Question by:ngalt
8 Comments
 
LVL 7

Expert Comment

by:RBertora
ID: 2659980
Hi,
Let me see your SQL query, I can then help you get the data in the format you require.
Right now I don't know if No (custno) is a number generated by the report, or generated by sql, similarily with that
of No(Orders)..

also when you want to print an order number, are you talking about Orders or No???

actually forget all my questions just show me your sql query, and I'll show you how to produce your output.

Rob;-)
0
 
LVL 9

Expert Comment

by:ITugay
ID: 2660084
listen...
0
 

Author Comment

by:ngalt
ID: 2662444
"No" is a numeric of line. "No" is not CustNo.
0
 
LVL 9

Expert Comment

by:ITugay
ID: 2663173
Hi Rob,

it sound like he want to print count of subdetails in header of detail section;)

Igor.
0
Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

 
LVL 7

Expert Comment

by:RBertora
ID: 2663277
Well I have no idea what he means by a subdetail.. perhaps I have a different version of quick reports.


But all bands have events :
beforeprint
afterprint

so add a qrlabel on the report where you want to display the count.

in your code
var
  Mycount  : integer;

procedure TForm1.QuickRep1BeforePrint(Sender: TCustomQuickRep;
  var PrintReport: Boolean);
begin
  Mycount := 0;
end;


headerbandBeforeprint
MyCount :=0;

DetailbandAfterPrint
Inc(MyCount);

FooterBandBeforePrint
  MyQrLabel.Caption := IntToStr(MyCount);


perhaps thats not exactly perfect but that is a solid technique for printing counts.

Rob;-)

0
 
LVL 9

Expert Comment

by:ITugay
ID: 2663471
Or place TQRSysData component into desired band. And then set it property Data = qrsDetailCount (qrsDetailNo sometimes usefull too).

Igor.
0
 
LVL 7

Expert Comment

by:RBertora
ID: 2663597
Yes Igor, I found though that if certain flags are set like reprintonnewpage etc.. sometimes qr count functions have bugs..
thus prefer to handle it myself :-)
Rob;-)
0
 
LVL 2

Accepted Solution

by:
NetoMan earned 50 total points
ID: 2671004
If I understand your question. Just put a TQRExpr object in each band and set the expresion propery to :

   COUNT(NameofCustNoField)

and:

   COUNT(NameofOrderNoField)

0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

In this tutorial I will show you how to use the Windows Speech API in Delphi. I will only cover basic functions such as text to speech and controlling the speed of the speech. SAPI Installation First you need to install the SAPI type library, th…
In my programming career I have only very rarely run into situations where operator overloading would be of any use in my work.  Normally those situations involved math with either overly large numbers (hundreds of thousands of digits or accuracy re…
Video by: Mark
This lesson goes over how to construct ordered and unordered lists and how to create hyperlinks.
Hi friends,  in this video  I'll show you how new windows 10 user can learn the using of windows 10. Thank you.

863 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

21 Experts available now in Live!

Get 1:1 Help Now