/* Several variables pertaining to recipiency from various government income programs were computed from */

/* a number of different variables in 1999, due to the change to an event history format for data collection. */

/* these variables are as follows: */

/* WKTOT99U = Total number of weeks R received unemployment compensation in calendar year 1999 */

/* RCTOT99U = Total amount of unemployment compensation R received in calendar year 1999 */

/* WKTOT99S = Total number of weeks R's spouse received unemployment compensation in calendar year 1999 */

/* RCTOT99U = Total amount of unemployment compensation R's spouse received in calendar year 1999 */

/* MOTOT99A = Total number of months R or spouse received AFDC payments in calendar year 1999 */

/* RCTOT99A = Total amount of AFDC R or spouse received in calendar year 1999 */

/* MOTOT99F = Total number of months R or spouse received government food stamps in calendar year 1999 */

/* RCTOT99F = Total amount of government food stamps R or spouse received in calendar year 1999 */

/* MOTOT99W = Total number of months R or spouse received other welfare or public assistance payments */

/* in calendar year 1999 */

/* RCTOT99W = Total amount of other welfare or public assistance payments R or spouse received in */

/* calendar year 1999 */

COMPUTE table1=8240

COMPUTE tbl1_inc=2820

COMPUTE table2=10320

COMPUTE tbl2_inc=3520

COMPUTE table3=9490

COMPUTE tbl3_inc=3240

/* set state of residence by hand for HA and Alaska for movers */

/* ste_cd is the original code and public_ids are listed for all who reported */

/* a move to HA or Alaska */

COMPUTE s_cur=1

do if ((ste_cd=2)

or

((public_id=5671)

or (public_id=11881)))

COMPUTE s_cur=2

else if

((ste_cd=15)

or

(public_id=1266))

COMPUTE s_cur=3

end if

do if (Q13_3 = -4)

COMPUTE mil_cur=0

else

COMPUTE mil_cur=Q13_3

end if

do if (Q13_5 = -4)

COMPUTE wps_cur=0

else

COMPUTE wps_cur=Q13_5

end if

/* new series to incorporate new farm & bus income qs */ /* public_ids are listed for cases with 2 farms or businesses */

COMPUTE fjt_inc=fjt_141

if (public_id eq 3187) fjt_inc=13000

do if (fjt_inc eq -4)

COMPUTE farm_cur=0

else

COMPUTE farm_cur=fjt_inc

end if

COMPUTE bpjt_inc=bp_141

if (public_id eq 2410) bpjt_inc=15000

if (public_id eq 6068) bpjt_inc=40000

do if (bpjt_inc eq -4)

COMPUTE bus_cur=0

else

COMPUTE bus_cur=bpjt_inc

end if

COMPUTE fbr_inc=q13_132d

do if (fbr_inc eq -4)

COMPUTE fbr_cur=0

else

COMPUTE fbr_cur=fbr_inc

end if

do if (Q13_9 = -4)

COMPUTE sei_cur=0

else

COMPUTE sei_cur=Q13_9

end if

if (farm_cur gt 0) sei_cur=(sei_cur+farm_cur)

if (bus_cur gt 0) sei_cur=(sei_cur+bus_cur)

if (fbr_cur gt 0) sei_cur=(sei_cur+fbr_cur)

do if (wktot99u = -4 and rctot99u = -4)

COMPUTE ui_cur=0

else if (wktot99u = -4 and rctot99u = 0)

COMPUTE ui_cur=0

else if (wktot99u > 0 and rctot99u > 0)

COMPUTE ui_cur=rctot99u

else if (wktot99u < 0)

COMPUTE ui_cur=wktot99u

else if (rctot99u < 0)

COMPUTE ui_cur=rctot99u

else

COMPUTE ui_cur=-3

end if

do if (paflaga eq 1 or Q13_16 = -4)

COMPUTE mils_cur=0

else

COMPUTE mils_cur=Q13_16

end if

do if (paflaga eq 1 or Q13_18 = -4)

COMPUTE wpss_cur=0

else

COMPUTE wpss_cur=Q13_18 end if

do if (paflaga eq 1 or Q13_24 = -4)

COMPUTE seis_cur=0

else

COMPUTE seis_cur=Q13_24

end if

do if (paflaga eq 1 or (wktot99s = -4 and rctot99s = -4))

COMPUTE uis_cur=0

else if

(paflaga eq 1 or (wktot99s = -4 and rctot99s = 0))

COMPUTE uis_cur=0

else if

(wktot99s > 0 and rctot99s > 0)

COMPUTE uis_cur=rctot99s

else if

(wktot99s < 0)

COMPUTE uis_cur=wktot99s

else if (rctot99s < 0)

COMPUTE uis_cur=rctot99s

else

COMPUTE uis_cur=-3

end if

do if (q13_31b = -4)

COMPUTE wkcmp_c=0

else

COMPUTE wkcmp_c=q13_31b

end if

do if (Q13_33I = -4)

COMPUTE chsp_cur=0

else

COMPUTE chsp_cur=Q13_33I

end if

do if (paflaga eq 1 or Q13_33M = -4)

COMPUTE chsps_c=0

else

COMPUTE chsps_c=Q13_33M

end if

do if (rctot99a eq -4 or rctot99a eq 0)

COMPUTE afdc_cur=0

else if (motot99a eq -4 or motot99a eq 0)

COMPUTE afdc_cur=0

else if (rctot99a < 0)

COMPUTE afdc_cur=rctot99a

else if (motot99a < 0)

COMPUTE afdc_cur=motot99a

else if (motot99a <= 0)

COMPUTE afdc_cur=-3

else

COMPUTE afdc_cur=rctot99a

end if

do if (rctot99f eq -4 or rctot99f eq 0)

COMPUTE food_cur=0

else if (motot99f eq -4 or motot99f eq 0)

COMPUTE food_cur=0

else if (rctot99f < 0)

COMPUTE food_cur=rctot99f

else if (motot99f < 0)

COMPUTE food_cur=motot99f

else if (motot99f <= 0)

COMPUTE food_cur=-3

else

COMPUTE food_cur=rctot99f end if

do if (rctot99w eq -4 or rctot99w eq 0)

COMPUTE ssi_cur=0

else if (motot99w eq -4 or motot99w eq 0)

COMPUTE ssi_cur=0

else if (rctot99w < 0)

COMPUTE ssi_cur=rctot99w

else if (motot99w < 0)

COMPUTE ssi_cur=motot99w

else if (motot99w <= 0)

COMPUTE ssi_cur=-3

else

COMPUTE ssi_cur=rctot99w

end if

do if (Q13_66 = -4)

COMPUTE ed_cur=0

else

COMPUTE ed_cur=Q13_66

end if

do if (paflaga eq 1 or Q13_68 = -4)

COMPUTE edss_cur=0

else

COMPUTE edss_cur=Q13_68

end if

do if (q13_70 = -4)

COMPUTE vet_cur=0

else

COMPUTE vet_cur=q13_70

end if

do if (Q13_75 = -4)

COMPUTE other_c=0

else

COMPUTE other_c=Q13_75

end if

if (vet_cur > 0 and other_c = vet_cur) other_c=0

do if (Q13_92 = -4)

COMPUTE relwel_c=0

else

COMPUTE relwel_c=Q13_92

end if

do if (Q13_92C = -4)

COMPUTE relreg_c=0

else

COMPUTE relreg_c=Q13_92C

end if

compute family_c=famsz00 /* To create family size (i.e. famsz00) search thru the household enumeration. Increment family size, if the relationship to the youth is a relative. Do not increase family size, if the code is <0 or (>=33 & <=36) or =45 or =46 or (>=50 & <=54) */

COMPUTE mn1701=0

COMPUTE mn1702=0

COMPUTE mn1703=0

COMPUTE faminc_c=0

COMPUTE income_c=-3

COMPUTE compo1=mil_cur

COMPUTE compo2=mils_cur

COMPUTE compo3=wps_cur

COMPUTE compo4=wpss_cur

COMPUTE compo5=sei_cur

COMPUTE compo6=seis_cur

COMPUTE compo7=ui_cur

COMPUTE compo8=uis_cur

COMPUTE compo9=chsp_cur

COMPUTE compo10=afdc_cur

COMPUTE compo11=ssi_cur

COMPUTE compo12=ed_cur

COMPUTE compo13=edss_cur

COMPUTE compo14=vet_cur

COMPUTE compo15=other_c

COMPUTE compo16=relwel_c

COMPUTE compo17=relreg_c

COMPUTE compo18=food_cur

COMPUTE compo19=chsps_c

COMPUTE compo20=wkcmp_c

do if (wktot99u eq -4 and rctot99u gt 0)

COMPUTE ui_cur=-3

COMPUTE compo7=-3

else if (wktot99u lt 0 and wktot99u gt -4)

COMPUTE ui_cur=-3

COMPUTE compo7=-3

end if

do if (wktot99s eq -4 and rctot99s gt 0)

COMPUTE uis_cur=-3

COMPUTE compo8=-3

else if (wktot99s lt 0 and wktot99s gt -4)

COMPUTE uis_cur=-3

COMPUTE compo8=-3

end if

do if (motot99a eq -4 and rctot99a gt 0)

COMPUTE afdc_cur=-3

COMPUTE compo10=-3

else if (motot99a lt 0 and motot99a gt -4)

COMPUTE afdc_cur=-3

COMPUTE compo10=-3

end if

do if (motot99f eq -4 and rctot99f gt 0)

COMPUTE food_cur=-3

COMPUTE compo18=-3

else if (motot99f lt 0 and motot99f gt -4)

COMPUTE food_cur=-3

COMPUTE compo18=-3

end if

do if (motot99w eq -4 and rctot99w gt 0)

COMPUTE ssi_cur=-3

COMPUTE compo11=-3

else if (motot99w lt 0 and motot99w gt -4)

COMPUTE ssi_cur=-3

COMPUTE compo11=-3

end if

do repeat compo=compo1 to compo20

do if (compo > -4)

do if (compo < 0 and compo eq -1)

COMPUTE mn1701=(mn1701+1)

else if (compo < 0 and compo eq -2)

COMPUTE mn1702=(mn1702+1)

else if (compo < 0 and compo eq -3)

COMPUTE mn1703=(mn1703+1)

else

COMPUTE faminc_c=(faminc_c + compo) . end if

end if

end repeat print

COMPUTE sumn_cur=mn1701 + mn1702 + mn1703

do if (sumn_cur = 0)

COMPUTE income_c=faminc_c

else

do if (mn1703 > 0)

COMPUTE income_c=-3

else if (mn1702 > 0)

COMPUTE income_c=-2

else if (mn1701 > 0)

COMPUTE income_c=-1

end if

end if

if (paflaga eq -5) income_c=-5

if (public_id eq 9373) income_c=-3

/* poverty status and level */

do if (family_c > 0 and s_cur eq 1)

COMPUTE level_c=(table1 + (tbl1_inc * (family_c-1)))

else if (family_c > 0 and s_cur eq 2)

COMPUTE level_c=(table2 + (tbl2_inc * (family_c-1)))

else if (family_c > 0 and s_cur eq 3)

COMPUTE level_c=(table3 + (tbl3_inc * (family_c-1)))

end if

do if (income_c > level_c)

COMPUTE cps_cur=0

else if (income_c >= 0 and income_c <= level_c)

COMPUTE cps_cur=1

else

COMPUTE cps_cur=-3

end if

do repeat mn=mn1701 to mn1703

if (mn > 0) mn=1

end repeat print

if (sumn_cur > 0) sumn_cur=1

if (paflaga eq -5) level_c=-5

if (paflaga eq -5) cps_cur=-5

2002 VARIABLES

* SAS PROGRAM STATEMENTS FOR TOTAL NET FAMILY INCOME 2002;

afdc_cur=-4;

chsp_cur=-4;

chsps_c=-4;

cps_cur=-4;

ed_cur=-4;

edss_cur=-4;

family_c=-4;

faminc_c=-4;

food_cur=-4;

income_c=-4;

level_c=-4;

mil_cur=-4;

mils_cur=-4;

mn1701=-4;

mn1702=-4;

mn1703=-4;

other_c=-4;

ssi_cur=-4;

relreg_c=-4;

relwel_c=-4;

s_cur=-4;

sei_cur=-4;

seis_cur=-4;

sumn_cur=-4;

target_c=-4;

ui_cur=-4;

uis_cur=-4;

vet_cur=-4;

wps_cur=-4;

wpss_cur=-4;

wkcmp_c=-4;

dis_cur=-4;

ss_cur=-4;

/* The 2001 Poverty Income Guidelines are applicable for income received in calendar 2001, and were accessed */

2006 VARIABLES

Total Net Family Income and Poverty Status in Calendar Year 2005 Incorporating Estimates

In the 2006 interview, respondents who didnâ€™t know many specific income amounts were asked to estimate those amounts using self-reported ranges and if necessary, unfolding brackets. Respondents who refused to report many specific income amounts were asked unfolding bracket questions as well (see for example T09123.00 â€“ T09131.00). The Total Net Family Income variable for calendar year 2005 (T09878.00) incorporates these estimates. The mid-point of self-reported ranges was used if available. Similarly, the mid-point of unfolding brackets were used where necessary and available. If a respondent reported that an income value was higher than the high bracket, the mean of valid values reported above the high bracket was used. For example, if a respondent reported that an income value was higher than the high bracket, and the high bracket was $50,000, the mean of all valid values reported over $50,000 was assigned.

The Poverty Status variable for calendar year 2005 (T09879.00) is created using the enhanced Total Net Family Income variable described above. Using these estimates where available significantly reduces the magnitude of non-response in both the Total Net Family Income and Poverty Status variables.

The decision rules for using estimates in individual income items are as follows:

If self-reported ranges are given and (example T09126.00, T09128.00):

upper/lower values are in proper order, midpoint is used;

ranges are given backwards, the values are reversed and midpoint is used;

the same value is given for upper/lower self-reported range value, that single value is used;

* Federal Poverty Guidelines used in 2006 program apply to calendar year; * 2006. Access the websites found in bookmarks for information on; * current PIG tables. http://aspe.hhs.gov/poverty/06poverty.shtml for 06 tables;

* set state of residence by hand for HA and Alaska for movers; * ste_cd is the original code and ids are listed for all who reported; * a move to HA or Alaska; * replaced ste_cd with state_fips (cleaned state fips code) for 2006;

/* TO CREATE FAMILY SIZE (I.E. FAMSZ04) SEARCH THRU THE HOUSEHOLD ENUMERATION INCREMENT FAMILY SIZE, IF THE RELATIONSHIP TO THE YOUTH IS A RELATIVE. DO NOT INCREASE FAMILY SIZE, IF THE CODE IS <0 OR (>=33 & <=36) OR =45 OR =46 OR (>=50 & <=54)*/

* Federal Poverty Guidelines used in 2008 program apply to calendar year;* 2007. Access the websites found in bookmarks for information on;* current PIG tables. http://aspe.hhs.gov/poverty/07poverty.shtml for 07 tables;

/* TO CREATE FAMILY SIZE (I.E. FAMSZ08) SEARCH THRU THE HOUSEHOLD ENUMERATION INCREMENT FAMILY SIZE, IF THE RELATIONSHIP TO THE YOUTH IS A RELATIVE. DO NOT INCREASE FAMILY SIZE, IF THE CODE IS <0 OR (>=33 & <=36) OR =45 OR =46 OR (>=50 & <=54)*/

* Federal Poverty Guidelines used in 2012 program apply to calendar year 2011;* Access the websites found in bookmarks for information on;* current PIG tables. http://aspe.hhs.gov/poverty/11poverty.shtml for 11 tables;

table1=10890;*for 1 person in family for 48 states;tbl1_inc=3820;*for each additional person for 48 states;table2=13600;*for 1 person in family for Alaska;tbl2_inc=4780;*for each additional person for Alaska;table3=12540;*for 1 person in family for Hawaii;tbl3_inc=4390;*for each additional person for Hawaii;

* set state of residence by hand for HA and Alaska for movers;* ste_cd is the original code and norcids are listed for all who reported;* a move to HA or Alaska;

s_cur=1;if (ste_cd=2) then s_cur=2;*Alaska;else if (ste_cd=15) then s_cur=3;*HI;

/* TO CREATE FAMILY SIZE (I.E. FAMSZ12) SEARCH THRU THE HOUSEHOLD ENUMERATIONINCREMENT FAMILY SIZE, IF THE RELATIONSHIP TO THE YOUTH IS A RELATIVE.DO NOT INCREASE FAMILY SIZE, IF THE CODE IS <0 OR (>=33 & <=36) OR =45 OR =46 OR(>=50 & <=54)*/