>store space(10) to mn1,yr1,dd2,cvar1, mn12,yr12,dd22,cvar12,curmon >store 0 to lnMonths,lnMonths2,lnMonths3 >Select year >SCATTE MEMV >dd1=dtoc(M.b_date) && 01-07-2005 type D >mn1=alltrim(substr(dd1,4,2)) && separate month >yr1=alltrim(right(dd1,4)) && separate year >dd2=alltrim(mn1)+alltrim("-")+alltrim(yr1) && month & year > >dd12=dtoc(M.e_date) && 30-06-2006 type D >mn12=alltrim(substr(dd12,4,2))&& separate month >yr12=alltrim(right(dd12,4)) && separate year >dd22=alltrim(mn12)+alltrim("-")+alltrim(yr12) && month & year >>