Sorry, I mistakenly posted this post. Sorry once again.
Code:
cmp (dsct=$xlist1 i.year || idperson:) (dcharpt22=$xlist1 i.year || idperson:) if country==3 & dch==1, ind($cmp_probit $cmp_probit)