>>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 >>>>