Another similar approach would be:
* --- Somewhere prior, determine New Future Date ---
m.dStartDt = {07/25/03} && Beginning Date
m.nNoWks = 5 && Number of Weeks to Advance
m.nDaysPerWk = 7
m.dNewDate = m.dStartDt + (m.nNoWks * m.nDaysPerWk)
* --- Check Resultant Day-of-Week ---
IF DOW(m.dNewDate) = 1 OR DOW(m.dNewDate) = 7
IF DOW(m.dNewDate) = 1
* --- Sunday, Advance 1 day ---
m.dNewDate = m.dNewDate + 1
ELSE
* --- Saturday, Advance 2 days ---
m.dNewDate = m.dNewDate + 2
ENDIF
ENDIF
Good Luck,
JRB-Bldr
VisionQuest Consulting
Business Analyst & CIO Consulting Services
CIOServices@yahoo.com