<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">
<TITLE>Message</TITLE>

<META content="MSHTML 5.00.3314.2100" name=GENERATOR></HEAD>
<BODY>
<DIV><FONT color=#0000ff face=Arial size=2><SPAN class=800320711-04092003>No, 
that did not work. For a project that was entered 8/27/03, it shows 12.522 days. 
The old code shows it 8 days past due, but I need it to show 3 days past 
due.</SPAN></FONT></DIV>
<DIV><FONT color=#0000ff face=Arial size=2><SPAN 
class=800320711-04092003></SPAN></FONT> </DIV>
<DIV><FONT color=#0000ff face=Arial size=2><SPAN class=800320711-04092003>I hope 
someone can help me with this because I had a user complain to upper mgmt about 
this, and it is causing me problems.</SPAN></FONT></DIV>
<DIV><FONT color=#0000ff face=Arial size=2><SPAN 
class=800320711-04092003></SPAN></FONT> </DIV>
<DIV><FONT color=#0000ff face=Arial size=2><SPAN 
class=800320711-04092003>Va.</SPAN></FONT></DIV>
<BLOCKQUOTE dir=ltr style="MARGIN-RIGHT: 0px">
  <DIV align=left class=OutlookMessageHeader dir=ltr><FONT face=Tahoma 
  size=2>-----Original Message-----<BR><B>From:</B> Dan Waters 
  [mailto:dwaters@usinternet.com]<BR><B>Sent:</B> Wednesday, September 03, 2003 
  3:24 PM<BR><B>To:</B> 'Access Developers discussion and problem 
  solving'<BR><B>Subject:</B> RE: [AccessD] Days Past Due - Grace 
  Period<BR><BR></DIV></FONT>
  <DIV><SPAN class=924281920-03092003><FONT color=#0000ff face=Arial 
  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 align=left class=OutlookMessageHeader dir=ltr lang=en-us><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 color=#0000ff 
    face=Arial size=2> </FONT></SPAN></DIV>
    <DIV><SPAN class=924281920-03092003><FONT color=#008000 face=Arial 
    size=2>       '-- Show number of days over 5 
    that the project review is late</FONT></SPAN></DIV>
    <DIV><SPAN class=924281920-03092003><FONT color=#0000ff face=Arial 
    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></BLOCKQUOTE></BODY></HTML>