problema con informe para factura

Comments

• gordk St.Catherines On. Canada.

  November 2014 edited 11:46PM

  the language for this forum is english please repost
• datato

  November 2014 edited 11:46PM

  Sorry did not know you had to be in English.
  
  Hi all, I created a report to print an invoice. I have a PageFooter with totals in the invoice. I have indicated in the report designer
  This PageFooter printed only in the last page, but it does not. I have unchecked the box in first page print. This marked only in print
  last leaf. but it is printed on all pages except the first. I just want the totals are printed on the last page and is at the foot of sheet.
  
  Someone who can help me. Thank you very much. And sorry for my bad English
• gordk St.Catherines On. Canada.

  November 2014 edited 11:46PM

  take a look at the main demo basic reports nested groups and masterdetail for ideas.
  only use the page footer for things like page number or total pages that you want printed on every page.
  ie
  header
  masterdata
  detail header
  detail
  detail footer
  master footer
  the above footerbxnds can be driven down to the bottom of the page
  by writing code in their onbefore print event to check the engine free space and set the engine cury property to suit.
  btw you english is pretty good
  
• gpi

  November 2014 edited 11:46PM

  Try to print report summary at the bottom of the page
  See here for more info: http://www.fast-report.com/en/forum/?p=/discussion/12374
• gordk St.Catherines On. Canada.

  November 2014 edited 11:46PM

  paul you cant use a summary band if you are handling more than 1 invoice in a report.
• datato

  November 2014 edited 11:46PM

  Sorry but I recorded the code
  
  ReportSummary1OnAfterCalcHeight procedure (Sender: TfrxComponent);
  
  begin
  Engine.CurY: -reportsummary1.height Engine.PageHeight -pagefooter1.Height = - 1;
  end;
  
  But I get error below in the code editor in the report designer FR with a red line indicating "Begin expected"
• datato

  November 2014 edited 11:46PM

  Achieved by chance
  
  The code works is this:
  
  ReportSummary1OnBeforePrint procedure (Sender: TfrxComponent);
  begin
  If Engine.CurY> engine.PageHeight-ReportSummary1.Height-50 Then Engine.Newpage;
  Engine.CurY: = engine.PageHeight-ReportSummary1.Height-50;
  end;
  
  begin
  
  end.
• datato

  November 2014 edited 11:46PM

  Achieved by chance
  
  The code works is this:
  
  ReportSummary1OnBeforePrint procedure (Sender: TfrxComponent);
  begin
  If Engine.CurY> engine.PageHeight-ReportSummary1.Height-50 Then Engine.Newpage;
  Engine.CurY: = engine.PageHeight-ReportSummary1.Height-50;
  end;
  
  begin
  
  end.
• gpi

  November 2014 edited 11:46PM

  Attach your report template (fr3) here
• datato

  November 2014 edited 11:46PM

  Attach my report template (fr3) here
  
  
• gpi

  November 2014 edited 11:46PM

  Try

  procedure ReportSummary1OnBeforePrint (Sender: TfrxComponent);
  begin
   
  end;
        
  procedure ReportSummary1OnAfterCalcHeight(Sender: TfrxComponent);
  begin
       if Engine.FreeSpace < ReportSummary1.Height Then Engine.Newpage;
       Engine.CurY := Engine.CurY + Engine.FreeSpace - ReportSummary1.Height - 0.00001;  
  end;
  
  begin
  
  end.