<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=us-ascii">
<TITLE>Message</TITLE>
<META content="MSHTML 6.00.2800.1226" name=GENERATOR></HEAD>
<BODY>
<DIV><SPAN class=924281920-03092003><FONT face=Arial color=#0000ff
size=2>Virginia, I added some code into your example. Would this
work?</FONT></SPAN></DIV>
<BLOCKQUOTE dir=ltr style="MARGIN-RIGHT: 0px">
<DIV></DIV>
<DIV class=OutlookMessageHeader lang=en-us dir=ltr align=left><FONT
face=Tahoma size=2>-----Original Message-----<BR><B>From:</B>
accessd-bounces@databaseadvisors.com
[mailto:accessd-bounces@databaseadvisors.com] <B>On Behalf Of
</B>Hollis,Virginia<BR><B>Sent:</B> Wednesday, September 03, 2003 1:25
PM<BR><B>To:</B> 'accessD@databaseadvisors.com'<BR><B>Subject:</B> [AccessD]
Days Past Due - Grace Period<BR><BR></FONT></DIV>
<DIV><FONT face=Arial size=2><SPAN class=920580919-03092003>A project review
must be completed within 5 days. If a project review is over 5 days past due
and the status is Pending, a label shows "Past Due & the number of days it
is past due". The Past Due date is based on the date the record was entered
into the system.</SPAN></FONT></DIV>
<DIV><FONT face=Arial size=2><SPAN
class=920580919-03092003></SPAN></FONT> </DIV>
<DIV><FONT face=Arial size=2><SPAN class=920580919-03092003>Problem: I need
the past due label to show not the days past due from the DateEntered, but
count the days Over 5. For example, the project was entered 8/28/2003, once
the project is >= 5 days past 8/28/2003 or on 9/4/2003 the label shows this
project is past due 6 days. What I really need is the label to show it is
past due 1 day, because they do have a 5 day grace period. I use this on
forms & the reports.</SPAN></FONT></DIV>
<DIV><FONT face=Arial size=2><SPAN
class=920580919-03092003></SPAN></FONT> </DIV>
<DIV><FONT face=Arial size=2><SPAN
class=920580919-03092003>Virginia</SPAN></FONT></DIV>
<DIV> </DIV>
<DIV><FONT face=Arial size=2><SPAN
class=920580919-03092003>***************</SPAN></FONT></DIV>
<DIV><FONT size=2><FONT face=Arial><SPAN class=920580919-03092003>Used in the
query to de</SPAN><SPAN class=920580919-03092003>termine </SPAN><SPAN
class=920580919-03092003>the number of days past
due:</SPAN></FONT></FONT></DIV>
<DIV><FONT size=2><FONT face=Arial><SPAN
class=920580919-03092003></SPAN>PastDue:
DateDiff("d",[DateEntered],Now())</FONT></FONT></DIV>
<DIV> </DIV>
<DIV><FONT face=Arial size=2><SPAN class=920580919-03092003>OnCurrent of
the form:</SPAN></FONT></DIV>
<DIV>If DateEntered <= DateAdd("d", -5, Date) And StatusID = 1 Then 'Status
is pending and review is 5 days past
due.<BR> Me!DateEntered.ForeColor = lngRed
'Date entered is red<BR>
Me!LateDate.Visible = True ' Show the sad
face<BR> Me.DaysPastDue.Visible = True
'Show past due label<SPAN class=924281920-03092003><FONT face=Arial
color=#0000ff size=2> </FONT></SPAN></DIV>
<DIV><SPAN class=924281920-03092003><FONT face=Arial color=#008000
size=2> '-- Show number of days over 5
that the project review is late</FONT></SPAN></DIV>
<DIV><SPAN class=924281920-03092003><FONT face=Arial color=#0000ff
size=2> Me.DaysPastDue.Caption = (Date() -
DateEntered) + 5</FONT></SPAN><SPAN
class=924281920-03092003> </SPAN><BR>
Else<BR> Me!DateEntered.ForeColor =
lngBlack 'Review is not past due, Date Entered is
black<BR> Me!LateDate.Visible =
False 'No sad face<BR>
Me.DaysPastDue.Visible = False 'No past due label.<BR> End
If</DIV></BLOCKQUOTE></BODY></HTML>