[AccessD] Continuing Group on Report Print out

Heenan, Lambert Lambert.Heenan at AIG.com
Wed Oct 1 10:38:54 CDT 2008


Odd. I have been using HasContinued for quite some time. Nothing fancy: I
use it in the detail section of some reports where I have alternating shaded
rows, like the old style green and white banded paper listings used to be
printed on. I use code like this, which works fine...

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Static bShaded As Boolean
    If Detail.HasContinued = False Then bShaded = Not bShaded
    If bShaded = False Then
        Me.Detail.BackColor = BGLightGray
    Else
        Me.Detail.BackColor = BGwhite
    End If
End Sub 

... Now admittedly this is a Detail section, not a Header section. Perhaps
it's only headers that have the bug?

Lambert

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David McAfee
Sent: Tuesday, September 30, 2008 5:12 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Continuing Group on Report Print out

I have tried that and I still couldn't get it working.

I got the group header to display (with my continue textbox) by turning on
the Report's RepeatSection property

Using your HasContinued clue, I started doing a google search and found
several sites talking about it being a bug.

Rogersaccesslibrary has a work around:
http://www.rogersaccesslibrary.com/download3.asp?SampleName=HasContinued.mdb

It seems that you have to store the name of each header each time it is
printed in a global variable.
If the next printed header is the same, you append "continued" to it.

Thanks,
David






On Tue, Sep 30, 2008 at 1:13 PM, Heenan, Lambert
<Lambert.Heenan at aig.com>wrote:

> Well you say...
>
> "In that group's header, I display the Bill Type (Billable, 
> Non-Billable,
> Upgrade...) "
>
> So I would just have another textbox  (say named "txtContinued") right 
> next to the bill type textbox with a data source of ="(Continued)" and 
> then in the header Format event you would say
>
>        txtContinued.Visible = GroupHeader0.HasContinued
>
> Replacing "GroupHeader0" with the correct name of the group header.
>
> Lambert
>
> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David 
> McAfee
> Sent: Tuesday, September 30, 2008 4:04 PM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Continuing Group on Report Print out
>
> Thanks for the quick response Lambert.
>
> I've tried using the .RepeatSection as well as just showing the label 
> and it seems to be skipping the whole group.
>
> Private Sub GroupHeader0_Format(Cancel As Integer, FormatCount As 
> Integer) If Me.GroupHeader0.HasContinued Then
>    Me.lblContinue.Visible = True
>   Me.Section("GroupHeader0").RepeatSection = True  
> 'Reports("rptRGAPrintOut").Section("GroupHeader0").RepeatSection = 
> True End If End Sub
>
> 'have also tried
> just printing the name, in case I was wrong about the name of the 
> group header.
> It seems to repeat six times if I put a optional stop in there.
>
> Debug.Print Me.GroupHeader0.Name
> GroupHeader0
> GroupHeader0
> GroupHeader0
> GroupHeader0
> GroupHeader0
> GroupHeader0
>
> Debug.Print Me.GroupHeader0.RepeatSection False False False False 
> False False
>
> Any idea what I am doing wrong?
>
>
> On Tue, Sep 30, 2008 at 12:02 PM, Heenan, Lambert
> <Lambert.Heenan at aig.com>wrote:
>
> >  Check out the HasContinued property of report sections. If you 
> > reference it in the OnFormat event of your group header you can 
> > determine if you need to output "(continued)"
> >
> > Lambert
> >
> > -----Original Message-----
> > From: accessd-bounces at databaseadvisors.com
> > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David 
> > McAfee
> > Sent: Tuesday, September 30, 2008 2:23 PM
> > To: Access Developers discussion and problem solving
> > Subject: [AccessD] Continuing Group on Report Print out
> >
> > Brain Fart...
> >
> > Is it possible to display a label and/or Group text box on a report 
> > that has had its group broken up on multiple pages?
> >
> > I have a report that has a huge list of parts. The list is grouped 
> > on a field "BillTypeID".
> >
> > In that group's header, I display the Bill Type (Billable, 
> > Non-Billable,
> > Upgrade...)
> >
> > I'd like to be able to print out something like "Non-Billable
> (continued)"
> > on the top of the next page that has had its group broken up. Is 
> > this possible?
> >
> > Thanks,
> > David
> > --
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> > http://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> > --
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> > http://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> >
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>
--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com



More information about the AccessD mailing list