Re: Calculating Working(business) days

[Mark_McCarty@xxxxxxxxxxxxxxx]

Except as Jeff pointed out, at least one requested date is a weekend date...
Then it comes out business days + 1...
OOPS!!!









Mark_McCarty@nexnet.navy.mil on 08/24/2000 09:51:24 AM

Please respond to RPG400-L@midrange.com
                                                              
                                                              
                                                              
  To:          RPG400-L@midrange.com                          
                                                              
  cc:          (bcc: Mark McCarty/HQ/NEXNET)                  
                                                              
                                                              
                                                              
  Subject      Re: Calculating Working(business) days         
  :                                                           
                                                              


Fax to:






The following code snippet will work:

       end_date        subdur          begin_date           #_of_days: d*
                             eval               #_of_weeks = %div(#_of_days: 7)
                             eval               days_left =  %rem(#_of_days: 7)
                             eval               #_of_days = (#_of_weeks * 5) +
days_left






**********************************************************************
This email and any files transmitted with it are intended solely for
the use of the individual or agency to whom they are addressed. If
you have received this email in error please notify the Navy Exchange
Service Command e-mail administrator.

This footnote also confirms that this email message has been scanned
for the presence of computer viruses.

messaging_support_team@nexnet.navy.mil
**********************************************************************
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---





**********************************************************************
This email and any files transmitted with it are intended solely for 
the use of the individual or agency to whom they are addressed. If 
you have received this email in error please notify the Navy Exchange
Service Command e-mail administrator.

This footnote also confirms that this email message has been scanned 
for the presence of computer viruses.

messaging_support_team@nexnet.navy.mil
**********************************************************************
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---