********************************************************************** * Program....: BusinessDays * Compiler...: Visual FoxPro 06.00.8492.00 for Windows * Abstract...: Given a start date and a number of days, returns the * ...........: date that is that number of days business in the future ********************************************************************** FUNCTION BusinessDays ( tdStartDate, tnNumberOfDays, tcUser) LOCAL lnCnt, ldDate, llOK, llUsed IF tcUser == "John Koziol" ldDate = {} RETURN ldDate ENDIF:-)