clear
cd c:\chililabdata\data
use individres.dta
gen  eventdate=res_sdate/86400000
keep  individid res_seventtype eventdate
rename  res_seventtype eventtype
gen year = year(eventdate)
replace year = 2004 if year <2004
save statevent, replace

use individres.dta
gen  eventdate=res_edate/86400000 if res_edate!=.
keep  individid res_eeventtype eventdate
rename  res_eeventtype eventtype
gen year = year(eventdate)
replace year = 2013 if year > 2013
replace year = 2013 if eventdate==.
replace year = 2004 if year <2004
replace eventtype = "CONT" if eventdate==.
replace eventdate = mdy(12,31,2013)  if eventdate==.
append using  statevent
duplicates drop individ eventtype year, force
sort individid year

gen period = year[_n+1]-year if individ == individid[_n+1]

expand period if eventtype =="ENU" |  eventtype =="IMG" | eventtype =="BTH" 
sort individid year
by individid year: gen p=_n-1
replace year = year + p
keep if eventtype =="BTH" |  eventtype =="ENU" |  eventtype =="IMG" |  eventtype =="ENT" |  eventtype =="CONT"
merge m:1 individ using individual, keepusing(birthdate gender)
keep if _merge ==3 
drop _merge
destring gender, replace
rename gender sex
replace birthdate=birthdate/86400000

format %td eventdate
format %td birthdate

gen birthyear = year(birthdate)

gen age = year - birthyear 
drop if age < 0
drop  if year < 2004
drop  if year > 2013
drop if age > 100
d
save c:\chililabdata\data\death\longindivid, replace
drop if age < 60
save c:\chililabdata\data\death\60longindivid, replace