use "...IAPR7DFL.DTA", clear
gen dis_hearing =9
gen dis_speech =9
gen dis_visual =9
gen dis_mental =9
gen dis_locomotor=9
gen dis_other =9
local letters "a b c d"
foreach ll of local letters {
replace dis_hearing =sh33`ll'1a if sh33`ll'==hvidx
replace dis_speech =sh33`ll'1b if sh33`ll'==hvidx
replace dis_visual =sh33`ll'1c if sh33`ll'==hvidx
replace dis_mental =sh33`ll'1d if sh33`ll'==hvidx
replace dis_locomotor=sh33`ll'1e if sh33`ll'==hvidx
replace dis_other =sh33`ll'1x if sh33`ll'==hvidx
}
label define dis 0 "No" 1 "Yes" 8 "DK" 9 "No one in hh has a disability"
label values dis_hearing dis
label values dis_speech dis
label values dis_visual dis
label values dis_mental dis
label values dis_locomotor dis
label values dis_other dis
keep hv024 hv001 hv002 hvidx dis*
gen state=hv024
gen cluster=hv001
gen hh=hv002
gen line=hvidx
sort state cluster hh line
]]>