|
/*-------------ORIGINAL CODE--------------*/
|
|
/* THIS PROGRAMME USES $_IVFIO_DV, AND POINTERS TO SIGNIFICANT OTHERS TO DERIVE $_ADRESP15_DV
|
|
*/
|
|
capture drop ${wave}adresp15_dv
|
|
if ${cohort}== 1 {
|
|
cap gen ${wave}aivfio=.
|
|
cap gen ${wave}ivfio=.
|
|
}
|
|
gen ${wave}adresp15_dv=-9
|
|
gen age015=(inrange(${wave}age_dv,0,16)) // age group to which !-8
|
|
gen iout015=(inlist(${wave}ivfio,21,22,23,24,25,63)) // plus, if age missing
|
|
replace ${wave}adresp15_dv =-8 if (age015~=1) & (iout015~=1) // R is an adult
|
|
lab def ${wave}adresp15_dv -9 "missing", replace
|
|
lab def ${wave}adresp15_dv -8 "inapplicable", add
|
|
lab val ${wave}adresp15_dv ${wave}adresp15_dv
|
|
replace ${wave}adresp15_dv =${wave}mnpno if (age015==1 | (${wave}age_dv<0 & iout015))
|
|
replace ${wave}adresp15_dv =${wave}fnpno if ${wave}adresp15_dv<=0 & (age015 | (${wave}age_dv<0 & iout015))
|
|
replace ${wave}adresp15_dv =${wave}mnspno if ${wave}adresp15_dv<=0 & (age015 | (${wave}age_dv<0 & iout015))
|
|
replace ${wave}adresp15_dv =${wave}fnspno if ${wave}adresp15_dv<=0 & (age015 | (${wave}age_dv<0 & iout015))
|
|
replace ${wave}adresp15_dv =${wave}fmpno_dv if ${wave}adresp15_dv<=0 & (age015 | (${wave}age_dv<0 & iout015))
|
|
replace ${wave}adresp15_dv =${wave}ffpno_dv if ${wave}adresp15_dv<=0 & (age015 | (${wave}age_dv<0 & iout015))
|
|
replace ${wave}adresp15_dv =${wave}grmpno if ${wave}adresp15_dv<=0 & (age015 | (${wave}age_dv<0 & iout015))
|
|
replace ${wave}adresp15_dv =${wave}grfpno if ${wave}adresp15_dv<=0 & (age015 | (${wave}age_dv<0 & iout015))
|
|
|
|
|
|
//This doesn't exist anymore past wave 5
|
|
if ${waveno} <= 5 {
|
|
replace ${wave}adresp15_dv =${wave}adresp15 if ${wave}adresp15_dv<=0 & ///
|
|
${wave}adresp15>0 & (inrange(${wave}age_dv,0,15))
|