Date caculation for workdays only

DenSter

Hello,

Does anyone here know if there is a standard Navision function to calculate a date, using only days marked as workdays in the base calendar? So for instance I'd send a date in there, and a date expression (or a number of days, say 4 days), and the date that it returns would be 4 workdays from the date that I send in, basically excluding weekend days and holidays as marked in the base calendar. So assuming that only weekends are not workdays, I want to calculate 4 days from a Friday, it will return the Thursday after that.

I can write a function like this myself, but I am pretty sure it's already in there. I just haven't been able to find it yet.

Thanks

cdstude

CalcDateFormula DateFomula
TargetDate Date
SourceDate Date
CompanyInfo Record Company Information
CalendarMgt Codeunit Calendar Management
NonWorking Boolean
DateDscr Text(30)

TargetDate := CALCDATE(CalcDateFormula,SourceDate);
CompanyInfo.GET;
REPEAT
NonWorking := CalendarMgt.CheckDateStatus(CompanyInfo."Base Calendar Code",TargetDate,DateDscr);
IF NonWorking THEN
TargetDate := CALCDATE('-1D',TargetDate);
UNTIL NOT NonWorking;

DenSter

Thanks Chris I had forgotten all about that question