use PKIR61FL.DTA, clear

recode v739 (1=1 "mainly wife") (2=2 "jointly") (4=3 "mainly husband") (5/6=4 other) (9=5 missing), gen(decidecash_rep)

* this will match the total
ta decidecash_rep [iw=v005/1000000]

gen women_hus_earn =v746
replace women_hus_earn=9 if v746==8
replace women_hus_earn=4 if v743f==7
replace women_hus_earn=5 if v731>0 & (v741==0 | v741>2)
replace women_hus_earn=6 if v731==0

label define women_hus_earn 1"more than husband" 2"less than husband" 3"same as husband" 4"husband has no cash/work" /// 
                                                                                                         5"woman work but no cash" 6 "woman did not work"
label values women_hus_earn women_hus_earn

* this will match the crosstab for the women's earnings, ignore the category 9 which is not shown in the table
ta women_hus_earn decidecash_rep [iw=v005/1000000], row

recode v743f (1=1 "mainly wife") (2=2 "jointly") (4=3 "mainly husband") (5 6 8=4 other) (9=5 missing) (7=.), gen(decidecash_hus)
ta decidecash_hus [iw=v005/1000000]

* this will match the crosstab for the husband's earnings, ignore the category 9 which is not shown in the table
ta women_hus_earn decidecash_hus [iw=v005/1000000], row