LPARAMETERS dDate1, dDate2
LOCAL nDays

nDays = ABS(dDate1-dDate2)+1

RETURN nDays - INT(nDays/7)*2 - SIGN(EVL(DOW(MIN(dDate1,dDate2),2)-7, -EVL(nDays % 7,7)) + (nDays % 7)) -1