* Merge CR and AR files for Lesotho*

*HIV File - women*

set more off
use "\LSAR72FL.DTA", clear
rename hivclust v001
rename hivnumb v002
rename hivline v003
rename hiv03 vhiv03
rename hiv05 vhiv05
keep v*

sort v001 v002 v003
save "\LSAR72_vtemp.dta", replace


*HIV file - men*

use "\LSAR72FL.DTA", clear
rename hivclust mv001
rename hivnumb mv002
rename hivline mv003
rename hiv03 mvhiv03
rename hiv05 mvhiv05
keep mv*

sort mv001 mv002 mv003
save "\LSAR72_mvtemp.dta", replace


*Couples recode MERGE*

use "\LSCR71FL.DTA", clear
sort v001 v002 v003
merge v001 v002 v003 using "\LSAR72_vtemp.dta"
rename _merge _merge_woman

sort mv001 mv002 mv003
merge mv001 mv002 mv003 using "\LSAR72_mvtemp.dta"
rename _merge _merge_man


*lets look at these results*

tab _merge*,m


*and now we can rename variables for couples HIV status*

gen couple_hiv_status=.
replace couple_hiv_status=1 if vhiv03==0 & mvhiv03==0
replace couple_hiv_status=2 if vhiv03==0 & mvhiv03==1
replace couple_hiv_status=3 if vhiv03==1 & mvhiv03==0
replace couple_hiv_status=4 if vhiv03==1 & mvhiv03==1

label define status 1 "conneg" 2 "maledisc" 3 "femaledisc" 4 "conpos"
label values couple_hiv_status status

tab couple_hiv_status,m