Count details of SubReport

rbuser

I have a report that prints on TextFile. In this report I have one
SubReport and in Summary is necessary to print the number of lines (of
Detail?s SubReport).
In modules I have a global variable xCount: integer
In this Subreport:
I have one group with Header, footer and detail.
On BeforePrint of Detail I have a code:
Detail.Visible:= { then any records can don?t print.}
if (Detail.Visible) and (Report.FirstPass) then
xCount:= xCount + 1

In report Principal, on Summary I have a Label with event OnGetText:
Text:= InttoStr(xCount);

But, the number of lines in the file is not equal the xCount. I tryed others
events, but don?t is OK.

How I do?

Thank?s

Giovana Nunes
giovana@futuranet.com.br

nicocizik

Hi Giovana,

Try using the OnCalc event of a TppVariable set to calculate on traversal to
keep track of the record count.

--
Regards,

Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com