program define loop
local i = 76
while `i'<100 {
if `i' != 84 & `i'!=86{
display "i is now `i'" 
use s:\cr`i'.dta, 

drop if typ>1
gen rtwage=rtsal/(4.3*horast)
gen lrtwage = log(rtwage)

/* A--Regression using all workers (excluding domserv)*/
	regress lrtwage s sex zone lhour public exp exp2 drama1 drama3 drama4 drama5 drama6 drama7 drama8 drama9 [w=expans] 
	/* a F test of the composite variable RAMA*/
	testparm drama*
	gen f_rama=r(F)
	gen bs=_b[s] 
	gen bsex=_b[sex] 
	gen bzone=_b[zone] 
	gen blhour=_b[lhour] 
	gen bpublic=_b[public] 
	gen bexp=_b[exp] 
	gen bexp2=_b[exp2]
	
	
collapse bs 
gen year=19`i'
save c:\data\b`i'

}
  local i= `i' + 1 
drop _all

}

end