Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Group totals at page end
Message
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Miscellaneous
Thread ID:
00190377
Message ID:
00190381
Views:
12
In your calling code:

SET PROCEDURE TO MyProc.prg
PRIVATE nPoTotal
REPORT FORM MyReport TO PRINT

In MyProc.prg:

PROCEDURE FromReport
PARAMETERS nPoNumber
mRec =RECNO()
SUM Total FOR nPoNumber TO nPoTotal
GOTO mRec && I don't know if the two mRec lines are necessary--try it
RETURN

In the footer of MyReport, add the object nPoTotal

Double-click on the footer band and in the Run Expression/On Entry box, type FromReport(PoNumber)

This assumes that Total is your line total field and that PoNumber is the field name for your PO #.

JR

>Is there anyway to use the page footer band to print totals at the end of a group?
>
>For example, I have a group on purchase order # and would like to use the page footer band to print the purchase order totals on the last page.
>
>I'm not using the group footer b/c they always want a constant height detail band and I don't want to mess around with adding blank detail records.
>
>I'm planning on adding a logical to each record in the report cursor, .T. if the record is the last line item on the PO. Then I can use the print when option of the totals. Just wondering if there was a clever way to do this with just the report ...
CLARC Services, Inc.
3500 Tamiami Trail
Port Charlotte, FL 33952
www.clarc.com
(941) 743-0108
(800) 246-5488
Previous
Reply
Map
View

Click here to load this message in the networking platform