gen msale=.
gen dev=.
forvalues i=2006(1)2011{
gen YEAR=year-`i'
reg sales YEAR if YEAR<6 & YEAR>0
predict p if YEAR<6 & YEAR>0,r
forvalues j=1(1)2{
sum p if stkcd==`j',de
dis "i=`i' j=`j'"
replace dev=r(sd) if stkcd==`j' & YEAR==5
sum sales if stkcd==`j' & YEAR<6 & YEAR>0 ,de
replace msale=r(mean) if stkcd==`j' & YEAR==5
}
drop YEAR p
}
dis "loop is over"
gen eu=dev/msale
gen msale=.
gen dev=.
forvalues i = 2006(1)2011{
forvalues j = 1(1)2{
gen YEAR= year-`i'
qui reg sale YEAR if YEAR <6 &YEAR>0 & stkcd ==`j'
qui predict p if YEAR<6 & YEAR>0& stkcd ==`j',r
qui sum p if stkcd==`j',de
qui dis "i=`i' j=`j'"
qui replace dev=r(sd) if stkcd==`j' & YEAR==5
qui sum sale if stkcd==`j' & YEAR<6 & YEAR>0 ,de
qui replace msale=r(mean) if stkcd==`j' & YEAR==5