# days between 2 dates - excluding weekends

[psykoProgrammer]

All,

I'm going to be a little bold and start thanking you ahead of time, because i'm certain someone out there knows how to do this fairly easily.

I'm a VB programmer, and as such can do this in that language, but am a newbie when it comes to VFP9; hence the reason i could use a hand.

Someone in my office was asking how you can take 2 dates and determine the number of days between them (i located an answer in the forum), but the request is to actually exclude weekends. I know i could use some function to test the day of the week and then determine if i should include the day in my total, but that sounds like it would be really slow.

Any other good solutions out there?

Thanks!

 

[markros]

Solution by Sergey Karimov:

FUNCTION WorkDays(d1, d2)
* Returns the number of working days (Mondays - Fridays)
* in the date range d1 - d2.
*
* This function evolved from Mike Yearwood's function
* WEEKDAYS.PRG, see:
* [URL unfurl="true"]http://www.finn.wikis.com/wc.dll?Wiki~Weekdays~VFP[/URL]
* as well as from its modifications published on
* [URL unfurl="true"]www.universalthread.com.[/URL]
*
* Sergey Karimov

LOCAL nDays, nDow

nDays= ABS(d1-d2)+1
nDow= 7-DOW(MIN(d1,d2),2)

RETURN nDays - INT(nDays/7)*2 - SIGN(nDays%7-nDow) - SIGN(nDow)

 

[markros]

The correct link is

http://fox.wikis.com/wc.dll?Wiki~Weekdays

 

[psykoProgrammer]

Well thank you kindly!

That was fast, and i knew the solution had to be posted somewhere

I appreciate the effort; cheers!

 

[markros]

You're welcome.