Total pages per group

Comments

• gordk St.Catherines On. Canada.

  April 2004 edited 9:18PM

  Hi a variable is affected each time it is processed, so when you use 2pass report,
  to gather info on the first pass to be used on the second or final pass, code must be written using if finalpass then or if not finalpass then blocks where necessary.
  Take a look at the main report demo see the grouptotals in header demo, it shows how to gather info in an array for each group and then sub the value stored in the array to the variable used to display value on the finalpass.
  regards
• kpowick

  April 2004 edited 9:18PM

  Thanks for the information.
  
  It has helped me get the page numbering output that I desired.
  
  Regards
• benjoe

  June 2004 edited 9:18PM

  gordk
  Can you give me a sample,thx!
• kpowick

  June 2004 edited June 2004

  benjoe wrote:

  :rolleyes: gordk
  Can you give me a sample,thx!

  
  Any variables you see that are not FastReport system variables, I set up in the Data Dictionary.
  
  You must set up the report as a Two Pass report under the Report Options.
  
  As suggested, I used an array to keep track of the total pages per group. I put the code to do this in the Group Header/Footer, keeping track of changes in the Order Number in my data set (kbHeader.OrderNo) and adding up the pages per group.
  
  [Group Header - OnBeforePrint]
  begin
  if [Page#] = 1 then begin
  MyOrderNo := [kbHeader."OrderNo"];
  MyPageNo := 0;
  if FINALPASS then GroupCount := 1 else GroupCount := 0;
  end;
  
  if MyOrderNo <> [kbHeader."OrderNo"] then begin
  MyPageNo := 0;
  MyOrderNo:= [kbHeader."OrderNo"];
  end;
  
  MyPageNo := MyPageNo + 1;
  
  if FINALPASS then TotPageOut := MyTotPages[GroupCount];
  end
  
  [Group Footer - OnBeforePrint]
  begin
  GroupCount := GroupCount + 1;
  if not(FINALPASS) then MyTotPages[GroupCount] := MyPageNo;
  end
  
  The output was at the top of my pages, using the following in a Rectangle object
  Page. [MyPageNo] of [TotPageOut]
  
  Hope this helps
  
  Kevin Powick
• kpowick

  June 2004 edited 9:18PM

  kpowick wrote:

  As suggested, I used an array to keep track of the total pages per group. I put the code to do this in the Group Header/Footer...

  I Don't know why the indenting on the code in my previous reply doesn't show up correctly. Hope you can still read it.
  
  Regards,
  
  Kevin Powick