page footer STUMPER

[CaptainDahlin]

I know the basics about access reports and putting page totals in the
page footers. What I can't figure out is along with the current page
total to display the previous page total:

At the bottom of every page:
Page 1 page footer:
Total brought forward= $0.00
Current Page total = $100.00
Grand Total= $100.00
Page 2 page footer:
Total brought forward= $100.00
Current Page total = $75.00
Grand Total = $175.00
Page 3 page footer
Total Brought forward= $175.00
Page Total= $20.00
Grand Total= $195.00
How can I get the the previous page total to display if the code
automatically resets
the page total to zero when it draws the next page?
Here is the code for doing the page totals in the page footer:
Private Sub Detail_Print(Ca ncel As Integer, PrintCount As Integer)
txtPageCashSum = txtPageCashSum + txtDonorCashAmm ount
txtPageCheckSum = txtPageCheckSum + txtDonorCheckAm mount
End Sub
Private Sub PageHeaderSecti on_Print(Cancel As Integer, PrintCount As
Integer)
txtPageCashSum = 0
txtPageCheckSum = 0
End Sub

[ManningFan]

It won't. You need to either add groups to your report and subtotal by
group, or just total by report.

CaptainDahlin wrote:

I know the basics about access reports and putting page totals in the
page footers. What I can't figure out is along with the current page
total to display the previous page total:

At the bottom of every page:
Page 1 page footer:
Total brought forward= $0.00
Current Page total = $100.00
Grand Total= $100.00
Page 2 page footer:
Total brought forward= $100.00
Current Page total = $75.00
Grand Total = $175.00
Page 3 page footer
Total Brought forward= $175.00
Page Total= $20.00
Grand Total= $195.00
How can I get the the previous page total to display if the code
automatically resets
the page total to zero when it draws the next page?
Here is the code for doing the page totals in the page footer:
Private Sub Detail_Print(Ca ncel As Integer, PrintCount As Integer)
txtPageCashSum = txtPageCashSum + txtDonorCashAmm ount
txtPageCheckSum = txtPageCheckSum + txtDonorCheckAm mount
End Sub
Private Sub PageHeaderSecti on_Print(Cancel As Integer, PrintCount As
Integer)
txtPageCashSum = 0
txtPageCheckSum = 0
End Sub

[Bob Quintal]

"ManningFan " <ma********@gma il.comwrote in
news:11******** **************@ m73g2000cwd.goo glegroups.com:

It won't. You need to either add groups to your report and
subtotal by group, or just total by report.

Total bogosity. All it takes is a little VB code.

In the reports declarations section define three variables
PbfTTL, PgTtl and RptTtl.for your three totals.

In the Page header format Event, set
PgTtl = 0
In the Detail Format Event, update two variables
PgTtl = PgTtl + me.fieldToTotal
RptTtl = RptTtl + me.fieldToTotal
In the page footer, total brought forward is RptTtl - PgTtl

Bob Q

CaptainDahlin wrote:

>I know the basics about access reports and putting page
totals in the page footers. What I can't figure out is along
with the current page total to display the previous page
total:

At the bottom of every page:
Page 1 page footer:
Total brought forward= $0.00
Current Page total = $100.00
Grand Total= $100.00
Page 2 page footer:
Total brought forward= $100.00
Current Page total = $75.00
Grand Total = $175.00
Page 3 page footer
Total Brought forward= $175.00
Page Total= $20.00
Grand Total= $195.00
How can I get the the previous page total to display if the
code automatically resets
the page total to zero when it draws the next page?
Here is the code for doing the page totals in the page
footer:
Private Sub Detail_Print(Ca ncel As Integer, PrintCount As
Integer)
txtPageCashSum = txtPageCashSum + txtDonorCashAmm ount
txtPageCheckSum = txtPageCheckSum +
txtDonorCheckAm mount
End Sub
Private Sub PageHeaderSecti on_Print(Cancel As Integer,
PrintCount As Integer)
txtPageCashSum = 0
txtPageCheckSum = 0
End Sub

--
Bob Quintal

PA is y I've altered my email address.

--
Posted via a free Usenet account from http://www.teranews.com