M
Michael
Having trouble getting the result I want. I need to print a 14 day work
schedule for the Emergency Department. There are 23 shifts which need to
have a space on the printed schedule. I have the 'group on' set to group by
date, then shift. Makes sense so far, here is the problem.
Every available shift is not filled when the schedule is printed, so there
are not 23 corresponding data entries for the needed 23 spaces under each
day. I fiddled around with VBA long enough *OnFormat - detail section* so
that a blank field becomes visible (for the time slot with no assigned
staff) and the 'Me.NextRecord' property is set to False so it will run
through again to see if this data matches criteria for the next available
time slot. ^^^ I celebrate with this programming victory^^^
I need to know how to tell when the last record in that day's group has been
reached. As my programming *victory* stands now, the last record in the
group is an appropriate value for the form, so I can't set the
'Me.NextRecord' to false. The group header prints, then the last remaining
time slots (those with no data records) print. I'm not sure I've stated
this well, or if you have enough info to help. An example of what happens -
Tue, Jan 4, 2004 - first group header
07 Miller
07 Jones
07
09 Atkins
11
15 Rodriguez - last time slot with 'real' data item
Wed, Jan 5, 2004 - group header prints here after last 'real' data item
19
19
19
am Tech
pmTech - the value I WANT to be the last item in the group
07 Williams - the actual first value in the next group
07 Atkins
etc.
Help, suggestions?? Can I give you more info??
Michael
schedule for the Emergency Department. There are 23 shifts which need to
have a space on the printed schedule. I have the 'group on' set to group by
date, then shift. Makes sense so far, here is the problem.
Every available shift is not filled when the schedule is printed, so there
are not 23 corresponding data entries for the needed 23 spaces under each
day. I fiddled around with VBA long enough *OnFormat - detail section* so
that a blank field becomes visible (for the time slot with no assigned
staff) and the 'Me.NextRecord' property is set to False so it will run
through again to see if this data matches criteria for the next available
time slot. ^^^ I celebrate with this programming victory^^^
I need to know how to tell when the last record in that day's group has been
reached. As my programming *victory* stands now, the last record in the
group is an appropriate value for the form, so I can't set the
'Me.NextRecord' to false. The group header prints, then the last remaining
time slots (those with no data records) print. I'm not sure I've stated
this well, or if you have enough info to help. An example of what happens -
Tue, Jan 4, 2004 - first group header
07 Miller
07 Jones
07
09 Atkins
11
15 Rodriguez - last time slot with 'real' data item
Wed, Jan 5, 2004 - group header prints here after last 'real' data item
19
19
19
am Tech
pmTech - the value I WANT to be the last item in the group
07 Williams - the actual first value in the next group
07 Atkins
etc.
Help, suggestions?? Can I give you more info??
Michael