nd = '14';                   /* number of days to subtract from today  */    
sdate = date('S',(date('B')-nd),'B'); /* set date - by:Bruce Gillispie */


Use this code to completely replace the "adate" function in the SortCntl
example.