Derivation
variable: ident (table[s]: gen_spouse)
variable: idspouse (table[s]: gen_spouse)
variable: birth_date (table[s]: gen_identity_clean [derived table])
rename (ident idspouse) (ident1 ident)
merge m:1 ident using ${newstata}\gen_identity_clean.dta, keepusing(sex birth_date idmoth idfath) keep(master match) nogen
gen idspouse_age=int((intdate-birth_date)/365.25) if birth_date~=.
gen idspouse_yob=year(birth_date) if birth_date~=.
drop birth_date
rename (ident1 ident sex idmoth idfath) (ident idspouse idspouse_sex idspouse_idmoth idspouse_idfath)
gen agediff=abs(ident_age-idspouse_age)