124 lines
3.9 KiB
Plaintext
124 lines
3.9 KiB
Plaintext
clear all
|
|
cd c:\chililabdata\data
|
|
use individres.dta
|
|
gen householdid = substr(res_sobserveid,1,9)
|
|
gen round = substr(res_sobserveid,10,3)
|
|
gen individkey = individid + round
|
|
sort individid res_sobserveid
|
|
by individid: gen lastrow = _N
|
|
by individid: gen firstrow= _n
|
|
gen EnterDate = res_sdate
|
|
replace EnterDate = EnterDate
|
|
rename res_seventtype EnterTpe
|
|
by individid: gen ExitDate = res_edate[lastrow]
|
|
by individid: gen ExitType = res_eeventtype[lastrow]
|
|
keep if lastrow == firstrow
|
|
drop res_episodeid res_sdate res_sobserveid res_eeventtype res_eobserveid res_edate res_sobserveidGuid res_eobserveidGuid lastrow firstrow
|
|
sort individid
|
|
merge 1:1 individid using individual
|
|
drop fatheridGuid motheridGuid individidGuid bornid appround fatherid ethnicid ind_name
|
|
rename birthdate Bod
|
|
rename gender Sex
|
|
keep if _merge == 3
|
|
drop _merge
|
|
sort individkey
|
|
merge 1:1 individkey using standard\std_marstatus, keepusing(marstatusid)
|
|
keep if _merge == 3
|
|
drop _merge individkey
|
|
|
|
/*format */
|
|
replace Bod = Bod/86400000
|
|
format %td Bod
|
|
replace EnterDate = EnterDate/86400000
|
|
format EnterDate %td
|
|
replace ExitDate = ExitDate /86400000
|
|
format ExitDate %td
|
|
save ..\fertility\data\recidency, replace
|
|
|
|
use standard\std_births
|
|
sort individid
|
|
duplicates drop individid, force
|
|
merge 1:1 individid using individual, keepusing (bornid)
|
|
keep if _merge ==3
|
|
drop bth_place supportper bth_type weight cried socialgpid round locationid gender ethnicid individkey householdkey communeid _merge
|
|
rename bornid rank
|
|
save ..\fertility\data\births, replace
|
|
use relationship.dta, clear
|
|
drop rel_partneridGuid rel_eobserveid rel_eeventtype rel_edate rel_episodeid
|
|
rename rel_partnerid partnerid
|
|
rename rel_sdate MarriageDate
|
|
replace MarriageDate=MarriageDate/86400000
|
|
rename rel_seventtype MarriageType
|
|
rename rel_sobserveid observeid
|
|
drop if MarriageType == "ENU"
|
|
gen round = substr(observeid, 10,3)
|
|
gen householdid = substr(observeid, 1,9)
|
|
save ..\fertility\data\marriage, replace
|
|
|
|
use relationship.dta, clear
|
|
drop rel_partneridGuid rel_sobserveid rel_seventtype rel_sdate rel_episodeid
|
|
rename rel_partnerid partnerid
|
|
rename rel_edate DivorceDate
|
|
rename rel_eeventtype DivorceType
|
|
rename rel_eobserveid observeid
|
|
keep if DivorceType == "DIV" | DivorceType == "SEP"
|
|
replace DivorceDate=DivorceDate/86400000
|
|
format DivorceDate %td
|
|
gen round = substr(observeid, 10,3)
|
|
gen householdid = substr(observeid, 1,9)
|
|
sort individid
|
|
duplicates drop individid, force
|
|
save ..\fertility\data\divorce, replace
|
|
use indmarstatus
|
|
keep if marstatusid ==2 | marstatusid ==3
|
|
duplicates drop individid, force
|
|
sort individid
|
|
merge 1:1 individid using individual, keepusing (gender)
|
|
keep if _merge ==3
|
|
keep if gender =="2"
|
|
drop mar_episodeid mar_sobserveid mar_eobserveid gender _merge
|
|
sort individid
|
|
merge 1:1 individid using ..\fertility\data\divorce
|
|
replace DivorceType ="SEP" if marstatusid==2 & DivorceType==""
|
|
replace DivorceType = "DIV" if marstatusid==3 & DivorceType== ""
|
|
drop _merge marstatusid
|
|
save ..\fertility\data\divorce, replace
|
|
|
|
/*WDW */
|
|
|
|
clear all
|
|
cd c:\chililabdata\data
|
|
use relationship.dta, clear
|
|
drop rel_partneridGuid rel_sobserveid rel_seventtype rel_sdate rel_episodeid
|
|
rename rel_partnerid partnerid
|
|
rename rel_edate WidowDate
|
|
rename rel_eeventtype WidowType
|
|
rename rel_eobserveid observeid
|
|
keep if WidowType == "WDW"
|
|
replace WidowDate=WidowDate/86400000
|
|
format WidowDate %td
|
|
gen round = substr(observeid, 10,3)
|
|
gen householdid = substr(observeid, 1,9)
|
|
sort individid
|
|
duplicates drop individid, force
|
|
save ..\fertility\data\wdw, replace
|
|
use indmarstatus
|
|
keep if marstatusid ==4
|
|
duplicates drop individid, force
|
|
sort individid
|
|
merge 1:1 individid using individual, keepusing (gender)
|
|
keep if _merge ==3
|
|
keep if gender =="2"
|
|
drop mar_episodeid mar_sobserveid mar_eobserveid gender _merge
|
|
sort individid
|
|
merge 1:1 individid using ..\fertility\data\wdw
|
|
replace WidowType ="WDW" if marstatusid==4 & WidowType==""
|
|
drop _merge marstatusid
|
|
save ..\fertility\data\wdw, replace
|
|
|
|
|
|
|
|
|
|
|
|
|
|
brow |