* Basic recodes of the disability variables
* Disability variables are in the PR file

*drop under 5 - disability questions not asked for children 0-4
drop if hv105<5

**Disability vars - any difficulty coded as disability
	gen dsight= inrange(hdis2,2,7)
	replace dsight=. if hdis2==.
	lab var dsight "Vision disability - any"
		
	gen dhear= inrange(hdis4,2,7)
	replace dhear=. if hdis4==.
	lab var dhear "Hearing disability - any"
		
	gen dspeech= inrange(hdis5,2,7)
	replace dspeech=. if hdis5==.
	lab var dspeech "Speech/communication disability - any"
		
	gen dcog= inrange(hdis6,2,7)
	replace dcog=. if hdis6==.
	lab var dcog "Cognitive disability - any"
		 
	gen dwalk= inrange(hdis7,2,7)
	replace dwalk=. if hdis7==.
	lab var dwalk "Mobility disability - any"
		
	gen dcare=inrange(hdis8,2,7)
	replace dcare=. if hdis8==.
	lab var dcare "Self-care disability - any"
	
	gen disab=0
	replace disab=1 if dsight==1 | dhear==1 | dspeech==1 | dcog==1 | dwalk==1 | dcare==1
	replace disab=. if hdis2==. | hdis4==.| hdis5==.| hdis6==. | hdis7==.| hdis8==.
	lab var disab "Any disability"
	
		
	egen totdisany= rsum(dsight dhear dspeech dcog dwalk dcare)
	recode totdisany (0=0 "None") (1=1 "One") (2/6=2 "2+"), gen(disnumany)
	lab var disnumany "Number of disabilities - any"
	
	recode totdisany (2/6=1 "2+") (0/1=0 "0-1"), gen(dis2p)

	
**Disability vars - a lot of difficulty or cannot do at all
	gen dsightsv= inrange(hdis2,3,7)
	replace dsightsv=. if hdis2==.
	lab var dsightsv "Vision disability - severe"
		
	gen dhearsv= inrange(hdis4,3,7)
	replace dhearsv=. if hdis4==.
	lab var dhearsv "Hearing disability - severe"
		
	gen dspeechsv= inrange(hdis5,3,7)
	replace dspeechsv=. if hdis5==.
	lab var dspeechsv "Speech/communication disability - severe"
		
	gen dcogsv= inrange(hdis6,3,7)
	replace dcogsv=. if hdis6==.
	lab var dcogsv "Cognitive disability - severe"
		
	gen dwalksv= inrange(hdis7,3,7)
	replace dwalksv=. if hdis7==.
	lab var dwalksv "Mobility disability - severe"
		
	gen dcaresv=inrange(hdis8,3,7)
	replace dcaresv=. if hdis8==.
	lab var dcaresv "Self-care disability - severe"
		
	gen disabsv=0
	replace disabsv=1 if dsightsv==1 | dhearsv==1 | dspeechsv==1 | dcogsv==1 | dwalksv==1 | dcaresv==1
	replace disabsv=. if hdis2==. | hdis4==.| hdis5==.| hdis6==. | hdis7==.| hdis8==.
	lab var disabsv "Any disability - severe"
		
	egen totdissv= rsum(dsightsv dhearsv dspeechsv dcogsv dwalksv dcaresv)
	recode totdissv (0=0 "None") (1=1 "One") (2/6=2 "2+"), gen(disnumsv)
	lab var disnumsv "Number of disabilities  - severe"
	
	recode totdissv (2/6=1 "2+") (0/1=0 "0-1"), gen(dis2psv)