Supressing Page Footer-Complicated

Deb in LA

Registered User.
Local time
Today, 14:34
Joined
Apr 14, 2000
Messages
19
Hi everyone - hope someone can answer this question. I have two reports. An Invoice and a Lien. The Invoice has Patient information in the page header like Patient name, Insurance co name, address, etc. That needs to print on every page of the Patient's invoice.
In the detail section of the Invoice, I have a subreport that lists the transactions for that patient.
In the Invoice's group footer, I have the Lein there as a subreport.
In the Invoice's page footer, I have legal wording that needs to print on every page of the Invoice.

MY PROBLEM:
The Page footer and Page header prints on the Lien.
I used this code but it didnt work...

in declaration module:

Dim blPrintFooter As Boolean
Dim blPrintHeader AS Boolean

In the format event for the PageHeader:
If blPrintHeader=False then
me.PrintSection = False
blPrintHeader=True
EndIf

In the format event for the PageFooter:If blPrintFooter=False then
me.PrintSection = False
blPrintFooter=True
EndIf

In the format even for the Group Footer (where the lien is):
blPrintHeader = False
blPrintFooter = True

What happens is that the page footer prints on every page including the lien.


The lien is a one full page of legal wording that has data on it linked to the patient. It is only one page and needs to print after the invoice for each patient. BUT the patient's invoice MUST have the page header,footer info on every page of the invoice--NOT on the lien.

Thanks in advance for any help.
debnLA
 
Look at help on Section Property to see if it might cover what you want. A sample of code (you would need to determine what section # the lien falls in) might be:

'For the header:
Me.Section(5).Visible = False

'For the footer:
Me.Section(6).Visible = False
 
I'm sorry - I didn't understand..
frown.gif
where would I put the code you had mentioned? In the on format event for the group footer?

'For the header:
Me.Section(5).Visible = False

'For the footer:
Me.Section(6).Visible = False

And will that just make the header and footer not visible? Wouldn't it still put the space for it in the report?

Thanks in advance.
 
Sorry - any VBA coding on on format events for group footer that contains the subreport do not work.. if anyone can solve this would be a miracle!
smile.gif
 

Users who are viewing this thread

Back
Top Bottom