DO WHILE ld_firstdrop < ld_enddate *-- If the item is schedule for this day, create a record in the billing table IF RIGHT(STR(DOW(ld_firstdrop)),1) = a_acrech->DAYOFWEEK ** process the day ld_firstdrop = ld_firstdrop + 7 ELSE ld_firstdrop = ld_firstdrop + 1 ENDIF ENDDOGlad I was able to help.