You are here
Home › Cohorts › NLSY97 › Other Documentation › Codebook Supplement › Appendix 1: Education Variable Creation ›Date Received Diploma or Degree - Appendix 1
Date Received Diploma or Degree - Appendix 1
Variables Created:
- CVC_GED (CDTGED)
- CVC_HS_DIPLOMA (CDTHS)
- CVC_AA_DEGREE (CDTAA)
- CVC_BA_DEGREE (CDTBA)
- CVC_MA_DEGREE (CDTMA)
- CVC_DC_DEGREE (CDTDC)
- CVC_PROF_DEGREE (CDTPF)
This program creates the variables that indicate the dates on which the youth received GED, High School Diploma, Associate Degree, Bachelor's Degree, Master's Degree, Doctoral Degree and Professional Degree. The dates are calculated using continuous month numbers (see Appendix 7). These are cross-round variables using the most recent information available for every NLSY97 respondent.
Notes on variable decsion rules:
- If there are two or more valid but different dates for a degree receipt then we take the date reported in the earlier round as that would have been closer to the actual date, except GED receipt dates. In those cases we look at comments to see whether the earlier date that the respondent reported was the date that the respondent took the exam and the later date is the date R actually received the GED.
- If the respondent attends college without a High School diploma or GED then the respondent is asked for an explanation in question YSCH-13900. If the respondent reports receiving a HS diploma or GED but gives no date of receipt then we give corresponding date of degree received as -3.
- If the respondent reports receiving GED or H.S. Diploma in YSCH-3113 that has not been reported elsewhere then we give the date of degree received as -3. If R reports a highest degree received in this question as an AA or higher degree and we find evidence that R was indeed in college, had a major of study, was pursuing that degree and left the college because R graduated or finished coursework then we the stop date of that enrollment as the date of receiving that degree. The same rule (except for having decided on a mojor is used if R reports attending college to receive a GED.
Variables Used
/**Variable Names in the Program Variable Names on the Gator**/
INTDr14 YINTDATE~D_2010
INTMr14 YINTDATE~M_2010
INTYr14 YINTDATE~Y_2010
e3112r14 YSCH-3112_2010
e3113r14 YSCH-3113_2010
e11700r14 YSCH-11700_2010
e11900Mr14 YSCH-11900~M_2010
e11900Yr14 YSCH-11900~Y_2010
e13300r14 YSCH-13300_2010
e13500Mr14 YSCH-13500~M_2010
e13500Yr14 YSCH-13500~Y_2010
e13600r14 YSCH-13600_2010
e27337r14_1 YSCH-27337.01_2010
e27337r14_2 YSCH-27337.02_2010
e27337r14_3 YSCH-27337.03_2010
e27337r14_4 YSCH-27337.04_2010
e27337r14_5 YSCH-27337.05_2010
e21299r14_101 YSCH-21299.01.01_2010
e21299r14_102 YSCH-21299.01.02_2010
e21299r14_103 YSCH-21299.01.03_2010
e21299r14_104 YSCH-21299.01.04_2010
e21299r14_105 YSCH-21299.01.05_2010
e21299r14_106 YSCH-21299.01.06_2010
e21299r14_107 YSCH-21299.01.07_2010
e21299r14_108 YSCH-21299.01.08_2010
e21299r14_201 YSCH-21299.02.01_2010
e21299r14_202 YSCH-21299.02.02_2010
e21299r14_203 YSCH-21299.02.03_2010
e21299r14_204 YSCH-21299.02.04_2010
e21299r14_205 YSCH-21299.02.05_2010
e21299r14_206 YSCH-21299.02.06_2010
e21299r14_207 YSCH-21299.02.07_2010
e21299r14_208 YSCH-21299.02.08_2010
e21299r14_209 YSCH-21299.02.09_2010
e21299r14_210 YSCH-21299.02.10_2010
e21299r14_211 YSCH-21299.02.11_2010
e21299r14_212 YSCH-21299.02.12_2010
e21299r14_213 YSCH-21299.02.13_2010
e21299r14_214 YSCH-21299.02.14_2010
e21299r14_301 YSCH-21299.03.01_2010
e21299r14_302 YSCH-21299.03.02_2010
e21299r14_303 YSCH-21299.03.03_2010
e21299r14_304 YSCH-21299.03.04_2010
e21299r14_305 YSCH-21299.03.05_2010
e21299r14_306 YSCH-21299.03.06_2010
e21299r14_307 YSCH-21299.03.07_2010
e21299r14_308 YSCH-21299.03.08_2010
e21299r14_309 YSCH-21299.03.09_2010
e21299r14_310 YSCH-21299.03.10_2010
e21299r14_311 YSCH-21299.03.11_2010
e21299r14_401 YSCH-21299.04.01_2010
e21399r14_101 YSCH-21399.01.01_2010
e21399r14_102 YSCH-21399.01.02_2010
e21399r14_103 YSCH-21399.01.03_2010
e21399r14_104 YSCH-21399.01.04_2010
e21399r14_105 YSCH-21399.01.05_2010
e21399r14_106 YSCH-21399.01.06_2010
e21399r14_107 YSCH-21399.01.07_2010
e21399r14_108 YSCH-21399.01.08_2010
e21399r14_201 YSCH-21399.02.01_2010
e21399r14_202 YSCH-21399.02.02_2010
e21399r14_203 YSCH-21399.02.03_2010
e21399r14_204 YSCH-21399.02.04_2010
e21399r14_205 YSCH-21399.02.05_2010
e21399r14_206 YSCH-21399.02.06_2010
e21399r14_207 YSCH-21399.02.07_2010
e21399r14_208 YSCH-21399.02.08_2010
e21399r14_209 YSCH-21399.02.09_2010
e21399r14_210 YSCH-21399.02.10_2010
e21399r14_211 YSCH-21399.02.11_2010
e21399r14_212 YSCH-21399.02.12_2010
e21399r14_213 YSCH-21399.02.13_2010
e21399r14_214 YSCH-21399.02.14_2010
e21399r14_301 YSCH-21399.03.01_2010
e21399r14_302 YSCH-21399.03.02_2010
e21399r14_303 YSCH-21399.03.03_2010
e21399r14_304 YSCH-21399.03.04_2010
e21399r14_305 YSCH-21399.03.05_2010
e21399r14_306 YSCH-21399.03.06_2010
e21399r14_307 YSCH-21399.03.07_2010
e21399r14_308 YSCH-21399.03.08_2010
e21399r14_309 YSCH-21399.03.09_2010
e21399r14_310 YSCH-21399.03.10_2010
e21399r14_311 YSCH-21399.03.11_2010
e21399r14_401 YSCH-21399.04.01_2010
e23450r14_1 YSCH-23450.01_2010
e23450r14_2 YSCH-23450.02_2010
e23450r14_3 YSCH-23450.03_2010
e23460Mr14_1 YSCH-23460.01~M_2010
e23460Yr14_1 YSCH-23460.01~Y_2010
e23460Mr14_2 YSCH-23460.02~M_2010
e23460Yr14_2 YSCH-23460.02~Y_2010
e23460Mr14_3 YSCH-23460.03~M_2010
e23460Yr14_3 YSCH-23460.03~Y_2010
e7000r14_1 YSCH-7000.01_2010
e7000r14_2 YSCH-7000.02_2010
e7000r14_3 YSCH-7000.03_2010
e7000r14_4 YSCH-7000.04_2010
e7000r14_5 YSCH-7000.05_2010
t7000r14_1 YTRN-7000.01_2010
t7000r14_2 YTRN-7000.02_2010
t7000r14_3 YTRN-7000.03_2010
t7000r14_4 YTRN-7000.04_2010
t7000r14_5 YTRN-7000.05_2010
t7000r14_6 YTRN-7000.06_2010
t7000r14_7 YTRN-7000.07_2010
t7000r14_8 YTRN-7000.08_2010
PUBID PUBID_2010
sGEDr14_1 NEWSCHOOL_GED.01_2010
sGEDr14_2 NEWSCHOOL_GED.02_2010
lftscR14_1 NEWSCHOOL_LEFT.01_2010
lftscR14_2 NEWSCHOOL_LEFT.02_2010
lftscR14_3 NEWSCHOOL_LEFT.03_2010
lftscR14_4 NEWSCHOOL_LEFT.04_2010
schintR14_1 NEWSCHOOL_INTERVIEW.01_2010
schintR14_2 NEWSCHOOL_INTERVIEW.02_2010
schintR14_3 NEWSCHOOL_INTERVIEW.03_2010
schintR14_4 NEWSCHOOL_INTERVIEW.04_2010
schintR14_5 NEWSCHOOL_INTERVIEW.05_2010
scodeR14_1 NEWSCHOOL_SCHCODE.01_2010
scodeR14_2 NEWSCHOOL_SCHCODE.02_2010
scodeR14_3 NEWSCHOOL_SCHCODE.03_2010
scodeR14_4 NEWSCHOOL_SCHCODE.04_2010
scodeR14_5 NEWSCHOOL_SCHCODE.05_2010
strtMR14_11 NEWSCHOOL_START1.01~M_2010
strtYR14_11 NEWSCHOOL_START1.01~Y_2010
strtMR14_12 NEWSCHOOL_START1.02~M_2010
strtYR14_12 NEWSCHOOL_START1.02~Y_2010
strtMR14_13 NEWSCHOOL_START1.03~M_2010
strtYR14_13 NEWSCHOOL_START1.03~Y_2010
strtMR14_14 NEWSCHOOL_START1.04~M_2010
strtYR14_14 NEWSCHOOL_START1.04~Y_2010
strtMR14_15 NEWSCHOOL_START1.05~M_2010
strtYR14_15 NEWSCHOOL_START1.05~Y_2010
STOPMR14_11 NEWSCHOOL_STOP1.01~M_2010
STOPYR14_11 NEWSCHOOL_STOP1.01~Y_2010
STOPMR14_12 NEWSCHOOL_STOP1.02~M_2010
STOPYR14_12 NEWSCHOOL_STOP1.02~Y_2010
STOPMR14_13 NEWSCHOOL_STOP1.03~M_2010
STOPYR14_13 NEWSCHOOL_STOP1.03~Y_2010
STOPMR14_14 NEWSCHOOL_STOP1.04~M_2010
STOPYR14_14 NEWSCHOOL_STOP1.04~Y_2010
STOPMR14_15 NEWSCHOOL_STOP1.05~M_2010
STOPYR14_15 NEWSCHOOL_STOP1.05~Y_2010
strtMR14_21 NEWSCHOOL_START2.01~M_2010
strtYR14_21 NEWSCHOOL_START2.01~Y_2010
strtMR14_22 NEWSCHOOL_START2.02~M_2010
strtYR14_22 NEWSCHOOL_START2.02~Y_2010
stopMR14_21 NEWSCHOOL_STOP2.01~M_2010
stopYR14_21 NEWSCHOOL_STOP2.01~Y_2010
stopMR14_22 NEWSCHOOL_STOP2.02~M_2010
stopYR14_22 NEWSCHOOL_STOP2.02~Y_2010
stopMR14_23 NEWSCHOOL_STOP2.03~M_2010
stopYR14_23 NEWSCHOOL_STOP2.03~Y_2010
strtMR14_31 NEWSCHOOL_START3.01~M_2010
strtYR14_31 NEWSCHOOL_START3.01~Y_2010
strtMR14_32 NEWSCHOOL_START3.02~M_2010
strtYR14_32 NEWSCHOOL_START3.02~Y_2010
stopMR14_31 NEWSCHOOL_STOP3.01~M_2010
stopYR14_31 NEWSCHOOL_STOP3.01~Y_2010
schidR14_1 NEWSCHOOL_PUBID.01_2010
schidR14_2 NEWSCHOOL_PUBID.02_2010
schidR14_3 NEWSCHOOL_PUBID.03_2010
schidR14_4 NEWSCHOOL_PUBID.04_2010
schidR14_5 NEWSCHOOL_PUBID.05_2010
e11700r1 YSCH-11700_1997
e11900Mr1 YSCH-11900_M_1997
e11900Yr1 YSCH-11900_Y_1997
e13300r1 YSCH-13300_1997
t7000r1_1 YTRN-7000.01_1997
t7000r1_2 YTRN-7000.02_1997
t7000r1_3 YTRN-7000.03_1997
e3112r2 YSCH-3112_1998
e11700r2 YSCH-11700_1998
e11900Mr2 YSCH-11900~M_1998
e11900Yr2 YSCH-11900~Y_1998
e27337r2_1 YSCH-27337.01_1998
e27337r2_2 YSCH-27337.02_1998
e27337r2_3 YSCH-27337.03_1998
e27337r2_4 YSCH-27337.04_1998
e27337r2_5 YSCH-27337.05_1998
e23450r2_1 YSCH-23450.01_1998
e23450r2_2 YSCH-23450.02_1998
e23450r2_3 YSCH-23450.03_1998
e23450r2_4 YSCH-23450.04_1998
t7000r2_1 YTRN-7000.01_1998
t7000r2_2 YTRN-7000.02_1998
e3112r3 YSCH-3112_1999
e11700r3 YSCH-11700_1999
e11900Mr3 YSCH-11900~M_1999
e11900Yr3 YSCH-11900~Y_1999
e13300r3 YSCH-13300_1999
e13500Mr3 YSCH-13500~M_1999
e13500Yr3 YSCH-13500~Y_1999
e13600r3 YSCH-13600_1999
e27337r3_1 YSCH-27337.01_1999
e27337r3_2 YSCH-27337.02_1999
e27337r3_3 YSCH-27337.03_1999
e27337r3_4 YSCH-27337.04_1999
e27337r3_5 YSCH-27337.05_1999
e23450r3_1 YSCH-23450.01_1999
e23450r3_2 YSCH-23450.02_1999
e23450r3_3 YSCH-23450.03_1999
t7000r3_1 YTRN-7000.01_1999
t7000r3_2 YTRN-7000.02_1999
t7000r3_3 YTRN-7000.03_1999
t7000r3_4 YTRN-7000.04_1999
e3112r4 YSCH-3112_2000
e11700r4 YSCH-11700_2000
e11900Mr4 YSCH-11900~M_2000
e11900Yr4 YSCH-11900~Y_2000
e13300r4 YSCH-13300_2000
e13500Mr4 YSCH-13500~M_2000
e13500Yr4 YSCH-13500~Y_2000
e13600r4 YSCH-13600_2000
e27337r4_1 YSCH-27337.01_2000
e27337r4_2 YSCH-27337.02_2000
e27337r4_3 YSCH-27337.03_2000
e27337r4_4 YSCH-27337.04_2000
e23450r4_1 YSCH-23450.01_2000
e23450r4_2 YSCH-23450.02_2000
e23450r4_3 YSCH-23450.03_2000
t7000r4_1 YTRN-7000.01_2000
t7000r4_2 YTRN-7000.02_2000
t7000r4_3 YTRN-7000.03_2000
t7000r4_4 YTRN-7000.04_2000
e3112r5 YSCH-3112_2001
e11700r5 YSCH-11700_2001
e11900Mr5 YSCH-11900~M_2001
e11900Yr5 YSCH-11900~Y_2001
e13300r5 YSCH-13300_2001
e13500Mr5 YSCH-13500~M_2001
e13500Yr5 YSCH-13500~Y_2001
e13600r5 YSCH-13600_2001
e27337r5_1 YSCH-27337.01_2001
e27337r5_2 YSCH-27337.02_2001
e27337r5_3 YSCH-27337.03_2001
e27337r5_4 YSCH-27337.04_2001
e27337r5_5 YSCH-27337.05_2001
e27337r5_6 YSCH-27337.06_2001
e23450r5_1 YSCH-23450.01_2001
e23450r5_2 YSCH-23450.02_2001
e23450r5_3 YSCH-23450.03_2001
e23450r5_4 YSCH-23450.04_2001
e23450r5_5 YSCH-23450.05_2001
e23450r5_6 YSCH-23450.06_2001
t7000r5_1 YTRN-7000.01_2001
t7000r5_2 YTRN-7000.02_2001
t7000r5_3 YTRN-7000.03_2001
t7000r5_4 YTRN-7000.04_2001
e3112r6 YSCH-3112_2002
e11700r6 YSCH-11700_2002
e11900Mr6 YSCH-11900~M_2002
e11900Yr6 YSCH-11900~Y_2002
e13300r6 YSCH-13300_2002
e13500Mr6 YSCH-13500~M_2002
e13500Yr6 YSCH-13500~Y_2002
e13600r6 YSCH-13600_2002
e27337r6_1 YSCH-27337.01_2002
e27337r6_2 YSCH-27337.02_2002
e27337r6_3 YSCH-27337.03_2002
e27337r6_4 YSCH-27337.04_2002
e27337r6_5 YSCH-27337.05_2002
e23450r6_1 YSCH-23450.01_2002
e23450r6_2 YSCH-23450.02_2002
e23450r6_3 YSCH-23450.03_2002
e23450r6_5 YSCH-23450.05_2002
t7000r6_1 YTRN-7000.01_2002
t7000r6_2 YTRN-7000.02_2002
t7000r6_3 YTRN-7000.03_2002
t7000r6_4 YTRN-7000.04_2002
t7000r6_5 YTRN-7000.05_2002
e3112r7 YSCH-3112_2003
e3113r7 YSCH-3113_2003
e11700r7 YSCH-11700_2003
e11900Mr7 YSCH-11900~M_2003
e11900Yr7 YSCH-11900~Y_2003
e13300r7 YSCH-13300_2003
e13500Mr7 YSCH-13500~M_2003
e13500Yr7 YSCH-13500~Y_2003
e13600r7 YSCH-13600_2003
e27337r7_1 YSCH-27337.01_2003
e27337r7_2 YSCH-27337.02_2003
e27337r7_3 YSCH-27337.03_2003
e27337r7_4 YSCH-27337.04_2003
e27337r7_5 YSCH-27337.05_2003
e23450r7_1 YSCH-23450.01_2003
e23450r7_2 YSCH-23450.02_2003
e23450r7_3 YSCH-23450.03_2003
t7000r7_1 YTRN-7000.01_2003
t7000r7_2 YTRN-7000.02_2003
t7000r7_3 YTRN-7000.03_2003
t7000r7_4 YTRN-7000.04_2003
t7000r7_5 YTRN-7000.05_2003
t7000r7_6 YTRN-7000.06_2003
t7000r7_7 YTRN-7000.07_2003
e3112r8 YSCH-3112_2004
e3113r8 YSCH-3113_2004
e11700r8 YSCH-11700_2004
e11900Mr8 YSCH-11900~M_2004
e11900Yr8 YSCH-11900~Y_2004
e13300r8 YSCH-13300_2004
e13500Mr8 YSCH-13500~M_2004
e13500Yr8 YSCH-13500~Y_2004
e13600r8 YSCH-13600_2004
e27337r8_1 YSCH-27337.01_2004
e27337r8_2 YSCH-27337.02_2004
e27337r8_3 YSCH-27337.03_2004
e27337r8_4 YSCH-27337.04_2004
e27337r8_5 YSCH-27337.05_2004
e23450r8_1 YSCH-23450.01_2004
e23450r8_2 YSCH-23450.02_2004
e23450r8_3 YSCH-23450.03_2004
t7000r8_1 YTRN-7000.01_2004
t7000r8_2 YTRN-7000.02_2004
t7000r8_3 YTRN-7000.03_2004
t7000r8_4 YTRN-7000.04_2004
t7000r8_5 YTRN-7000.05_2004
t7000r8_6 YTRN-7000.06_2004
t7000r8_7 YTRN-7000.07_2004
e3112r9 YSCH-3112_2005
e3113r9 YSCH-3113_2005
e11700r9 YSCH-11700_2005
e11900Mr9 YSCH-11900~M_2005
e11900Yr9 YSCH-11900~Y_2005
e13300r9 YSCH-13300_2005
e13500Mr9 YSCH-13500~M_2005
e13500Yr9 YSCH-13500~Y_2005
e13600r9 YSCH-13600_2005
e27337r9_1 YSCH-27337.01_2005
e27337r9_2 YSCH-27337.02_2005
e27337r9_3 YSCH-27337.03_2005
e27337r9_4 YSCH-27337.04_2005
e23450r9_1 YSCH-23450.01_2005
e23450r9_2 YSCH-23450.02_2005
e23450r9_3 YSCH-23450.03_2005
t7000r9_1 YTRN-7000.01_2005
t7000r9_2 YTRN-7000.02_2005
t7000r9_3 YTRN-7000.03_2005
t7000r9_4 YTRN-7000.04_2005
t7000r9_5 YTRN-7000.05_2005
t7000r9_6 YTRN-7000.06_2005
t7000r9_7 YTRN-7000.07_2005
t7000r9_8 YTRN-7000.08_2005
t7000r9_9 YTRN-7000.09_2005
e3112r10 YSCH-3112_2006
e3113r10 YSCH-3113_2006
e11700r10 YSCH-11700_2006
e11900Mr10 YSCH-11900~M_2006
e11900Yr10 YSCH-11900~Y_2006
e13300r10 YSCH-13300_2006
e13500Mr10 YSCH-13500~M_2006
e13500Yr10 YSCH-13500~Y_2006
e13600r10 YSCH-13600_2006
e27337r10_1 YSCH-27337.01_2006
e27337r10_2 YSCH-27337.02_2006
e27337r10_3 YSCH-27337.03_2006
e27337r10_4 YSCH-27337.04_2006
e27337r10_5 YSCH-27337.05_2006
e23450r10_1 YSCH-23450.01_2006
e23450r10_2 YSCH-23450.02_2006
e23450r10_3 YSCH-23450.03_2006
e23450r10_4 YSCH-23450.04_2006
e23450r10_5 YSCH-23450.05_2006
t7000r10_1 YTRN-7000.01_2006
t7000r10_2 YTRN-7000.02_2006
t7000r10_3 YTRN-7000.03_2006
t7000r10_4 YTRN-7000.04_2006
e3112r11 YSCH-3112_2007
e3113r11 YSCH-3113_2007
e11700r11 YSCH-11700_2007
e11900Mr11 YSCH-11900~M_2007
e11900Yr11 YSCH-11900~Y_2007
e13300r11 YSCH-13300_2007
e13500Mr11 YSCH-13500~M_2007
e13500Yr11 YSCH-13500~Y_2007
e13600r11 YSCH-13600_2007
e27337r11_1 YSCH-27337.01_2007
e27337r11_2 YSCH-27337.02_2007
e27337r11_3 YSCH-27337.03_2007
e27337r11_4 YSCH-27337.04_2007
e27337r11_5 YSCH-27337.05_2007
e23450r11_1 YSCH-23450.01_2007
e23450r11_2 YSCH-23450.02_2007
e23450r11_3 YSCH-23450.03_2007
t7000r11_1 YTRN-7000.01_2007
t7000r11_2 YTRN-7000.02_2007
t7000r11_3 YTRN-7000.03_2007
t7000r11_4 YTRN-7000.04_2007
t7000r11_5 YTRN-7000.05_2007
t7000r11_6 YTRN-7000.06_2007
t7000r11_7 YTRN-7000.07_2007
t7000r11_8 YTRN-7000.08_2007
e3112r12 YSCH-3112_2008
e3113r12 YSCH-3113_2008
e11700r12 YSCH-11700_2008
e11900Mr12 YSCH-11900~M_2008
e11900Yr12 YSCH-11900~Y_2008
e13300r12 YSCH-13300_2008
e13500Mr12 YSCH-13500~M_2008
e13500Yr12 YSCH-13500~Y_2008
e13600r12 YSCH-13600_2008
e27337r12_1 YSCH-27337.01_2008
e27337r12_2 YSCH-27337.02_2008
e27337r12_3 YSCH-27337.03_2008
e27337r12_4 YSCH-27337.04_2008
e27337r12_5 YSCH-27337.05_2008
e27337r12_6 YSCH-27337.06_2008
e27337r12_7 YSCH-27337.07_2008
e27337r12_8 YSCH-27337.08_2008
e23450r12_1 YSCH-23450.01_2008
e23450r12_2 YSCH-23450.02_2008
e23450r12_3 YSCH-23450.03_2008
t7000r12_1 YTRN-7000.01_2008
t7000r12_2 YTRN-7000.02_2008
t7000r12_3 YTRN-7000.03_2008
t7000r12_4 YTRN-7000.04_2008
t7000r12_5 YTRN-7000.05_2008
t7000r12_6 YTRN-7000.06_2008
VERSION_R13r13 VERSION_R13_2009
e3112r13 YSCH-3112_2009
e3113r13 YSCH-3113_2009
e11700r13 YSCH-11700_2009
e11900Mr13 YSCH-11900~M_2009
e11900Yr13 YSCH-11900~Y_2009
e13300r13 YSCH-13300_2009
e13500Mr13 YSCH-13500~M_2009
e13500Yr13 YSCH-13500~Y_2009
e13600r13 YSCH-13600_2009
e27337r13_1 YSCH-27337.01_2009
e27337r13_2 YSCH-27337.02_2009
e27337r13_3 YSCH-27337.03_2009
e23450r13_1 YSCH-23450.01_2009
e23450r13_2 YSCH-23450.02_2009
e23450r13_3 YSCH-23450.03_2009
t7000r13_1 YTRN-7000.01_2009
t7000r13_2 YTRN-7000.02_2009
t7000r13_3 YTRN-7000.03_2009
t7000r13_4 YTRN-7000.04_2009
t7000r13_5 YTRN-7000.05_2009
t7000r13_6 YTRN-7000.06_2009
encatr1 CV_ENROLLSTAT_1997
gdr1 CV_GED_1997
hdgr1 CV_HIGHEST_DEGREE_EVER_1997
hsr1 CV_HS_DIPLOMA_1997
doicmr1 CV_INTERVIEW_CMONTH_1997
intdr1 CV_INTERVIEW_DATE_D_1997
intmr1 CV_INTERVIEW_DATE_M_1997
intyr1 CV_INTERVIEW_DATE_Y_1997
scodeR2_2 NEWSCHOOL_SCHCODE.01_1998
scodeR2_1 NEWSCHOOL_SCHCODE.02_1998
scodeR2_3 NEWSCHOOL_SCHCODE.03_1998
scodeR2_4 NEWSCHOOL_SCHCODE.04_1998
scodeR2_5 NEWSCHOOL_SCHCODE.05_1998
scodeR2_6 NEWSCHOOL_SCHCODE.06_1998
schidR2_1 NEWSCHOOL_PUBID.01_1998
schidR2_2 NEWSCHOOL_PUBID.02_1998
schidR2_3 NEWSCHOOL_PUBID.03_1998
schidR2_4 NEWSCHOOL_PUBID.04_1998
schidR2_5 NEWSCHOOL_PUBID.05_1998
schidR2_6 NEWSCHOOL_PUBID.06_1998
encatr2 CV_ENROLLSTAT_EDT_1998
gdr2 CV_GED_1998
hdgr2 CV_HIGHEST_DEGREE_EVER_EDT_1998
hdgYr2 CV_HIGHEST_DEGREE_9899_1998
hsr2 CV_HS_DIPLOMA_1998
doicmr2 CV_INTERVIEW_CMONTH_1998
intdr2 CV_INTERVIEW_DATE~D_1998
intmr2 CV_INTERVIEW_DATE~M_1998
intyr2 CV_INTERVIEW_DATE~Y_1998
lftscR2_1 NEWSCHOOL_LEFT.01_1998
lftscR2_2 NEWSCHOOL_LEFT.02_1998
lftscR2_3 NEWSCHOOL_LEFT.03_1998
lftscR2_4 NEWSCHOOL_LEFT.04_1998
lftscR2_5 NEWSCHOOL_LEFT.05_1998
lftscR2_6 NEWSCHOOL_LEFT.06_1998
lftscR1_1 NEWSCHOOL_LEFT_1997
SCODEr1_1 NEWSCHOOL_SCHCODE_1997
schIDr1_1 NEWSCHOOL_PUBID_1997
scodeR3_1 NEWSCHOOL_SCHCODE.01_1999
scodeR3_2 NEWSCHOOL_SCHCODE.02_1999
scodeR3_3 NEWSCHOOL_SCHCODE.03_1999
scodeR3_4 NEWSCHOOL_SCHCODE.04_1999
scodeR3_5 NEWSCHOOL_SCHCODE.05_1999
scodeR3_6 NEWSCHOOL_SCHCODE.06_1999
scodeR3_7 NEWSCHOOL_SCHCODE.07_1999
schidR3_1 NEWSCHOOL_PUBID.01_1999
schidR3_2 NEWSCHOOL_PUBID.02_1999
schidR3_3 NEWSCHOOL_PUBID.03_1999
schidR3_4 NEWSCHOOL_PUBID.04_1999
schidR3_5 NEWSCHOOL_PUBID.05_1999
schidR3_6 NEWSCHOOL_PUBID.06_1999
schidR3_7 NEWSCHOOL_PUBID.07_1999
encatr3 CV_ENROLLSTAT_EDT_1999
gdr3 CV_GED_1999
hdgr3 CV_HIGHEST_DEGREE_EVER_EDT_1999
hdgYr3 CV_HIGHEST_DEGREE_9900_1999
hsr3 CV_HS_DIPLOMA_1999
aar3 CV_AA_DEGREE_1999
doicmr3 CV_INTERVIEW_CMONTH_1999
intdr3 CV_INTERVIEW_DATE~D_1999
intmr3 CV_INTERVIEW_DATE~M_1999
intyr3 CV_INTERVIEW_DATE~Y_1999
lftscR3_1 NEWSCHOOL_LEFT.01_1999
lftscR3_2 NEWSCHOOL_LEFT.02_1999
lftscR3_3 NEWSCHOOL_LEFT.03_1999
lftscR3_4 NEWSCHOOL_LEFT.04_1999
lftscR3_5 NEWSCHOOL_LEFT.05_1999
lftscR3_6 NEWSCHOOL_LEFT.06_1999
lftscR3_7 NEWSCHOOL_LEFT.07_1999
lftsc2R3_1 NEWSCHOOL_LEFT2.01_1999
lftsc2R3_2 NEWSCHOOL_LEFT2.02_1999
lftscR4_1 NEWSCHOOL_LEFT.01_2000
lftscR4_2 NEWSCHOOL_LEFT.02_2000
lftscR4_3 NEWSCHOOL_LEFT.03_2000
lftscR4_4 NEWSCHOOL_LEFT.04_2000
lftscR4_5 NEWSCHOOL_LEFT.05_2000
scodeR4_1 NEWSCHOOL_SCHCODE.01_2000
scodeR4_2 NEWSCHOOL_SCHCODE.02_2000
scodeR4_3 NEWSCHOOL_SCHCODE.03_2000
scodeR4_4 NEWSCHOOL_SCHCODE.04_2000
scodeR4_5 NEWSCHOOL_SCHCODE.05_2000
schidR4_1 NEWSCHOOL_PUBID.01_2000
schidR4_2 NEWSCHOOL_PUBID.02_2000
schidR4_3 NEWSCHOOL_PUBID.03_2000
schidR4_4 NEWSCHOOL_PUBID.04_2000
schidR4_5 NEWSCHOOL_PUBID.05_2000
encatr4 CV_ENROLLSTAT_EDT_2000
gdr4 CV_GED_2000
hdgr4 CV_HIGHEST_DEGREE_EVER_EDT_2000
hdgYr4 CV_HIGHEST_DEGREE_0001_2000
hsr4 CV_HS_DIPLOMA_2000
aar4 CV_AA_DEGREE_2000
bar4 CV_BA_DEGREE_2000
doicmr4 CV_INTERVIEW_CMONTH_2000
intdr4 CV_INTERVIEW_DATE~D_2000
intmr4 CV_INTERVIEW_DATE~M_2000
intyr4 CV_INTERVIEW_DATE~Y_2000
lftsc2R4_1 NEWSCHOOL_LEFT2.01_2000
lftsc2R4_2 NEWSCHOOL_LEFT2.02_2000
lftscR5_1 NEWSCHOOL_LEFT.01_2001
lftscR5_2 NEWSCHOOL_LEFT.02_2001
lftscR5_3 NEWSCHOOL_LEFT.03_2001
lftscR5_4 NEWSCHOOL_LEFT.04_2001
lftscR5_5 NEWSCHOOL_LEFT.05_2001
lftscR5_6 NEWSCHOOL_LEFT.06_2001
scodeR5_1 NEWSCHOOL_SCHCODE.01_2001
scodeR5_2 NEWSCHOOL_SCHCODE.02_2001
scodeR5_3 NEWSCHOOL_SCHCODE.03_2001
scodeR5_4 NEWSCHOOL_SCHCODE.04_2001
scodeR5_5 NEWSCHOOL_SCHCODE.05_2001
scodeR5_6 NEWSCHOOL_SCHCODE.06_2001
schidR5_1 NEWSCHOOL_PUBID.01_2001
schidR5_2 NEWSCHOOL_PUBID.02_2001
schidR5_3 NEWSCHOOL_PUBID.03_2001
schidR5_4 NEWSCHOOL_PUBID.04_2001
schidR5_5 NEWSCHOOL_PUBID.05_2001
schidR5_6 NEWSCHOOL_PUBID.06_2001
encatr5 CV_ENROLLSTAT_EDT_2001
gdr5 CV_GED_2001
hdgr5 CV_HIGHEST_DEGREE_EVER_EDT_2001
hdgYr5 CV_HIGHEST_DEGREE_0102_2001
hsr5 CV_HS_DIPLOMA_2001
aar5 CV_AA_DEGREE_2001
bar5 CV_BA_DEGREE_2001
doicmr5 CV_INTERVIEW_CMONTH_2001
intdr5 CV_INTERVIEW_DATE~D_2001
intmr5 CV_INTERVIEW_DATE~M_2001
intyr5 CV_INTERVIEW_DATE~Y_2001
lftsc2R5_2 NEWSCHOOL_LEFT2.02_2001
lftsc2R5_3 NEWSCHOOL_LEFT2.03_2001
lftsc2R2_2 NEWSCHOOL_LEFT2.02_1998
lftsc2R2_3 NEWSCHOOL_LEFT2.03_1998
lftsc2R2_4 NEWSCHOOL_LEFT2.04_1998
lftscR6_1 NEWSCHOOL_LEFT.01_2002
lftscR6_2 NEWSCHOOL_LEFT.02_2002
lftscR6_3 NEWSCHOOL_LEFT.03_2002
lftscR6_4 NEWSCHOOL_LEFT.04_2002
schidR6_1 NEWSCHOOL_PUBID.01_2002
schidR6_2 NEWSCHOOL_PUBID.02_2002
schidR6_3 NEWSCHOOL_PUBID.03_2002
schidR6_4 NEWSCHOOL_PUBID.04_2002
scodeR6_1 NEWSCHOOL_SCHCODE.01_2002
scodeR6_2 NEWSCHOOL_SCHCODE.02_2002
scodeR6_3 NEWSCHOOL_SCHCODE.03_2002
scodeR6_4 NEWSCHOOL_SCHCODE.04_2002
encatr6 CV_ENROLLSTAT_EDT_2002
gdr6 CV_GED_2002
hdgr6 CV_HIGHEST_DEGREE_EVER_EDT_2002
hdgYr6 CV_HIGHEST_DEGREE_0203_2002
hsr6 CV_HS_DIPLOMA_2002
aar6 CV_AA_DEGREE_2002
bar6 CV_BA_DEGREE_2002
doicmr6 CV_INTERVIEW_CMONTH_2002
intdr6 CV_INTERVIEW_DATE~D_2002
intmr6 CV_INTERVIEW_DATE~M_2002
intyr6 CV_INTERVIEW_DATE~Y_2002
mar6 CV_MA_DEGREE_2002
encatr7 CV_ENROLLSTAT_EDT_2003
gdr7 CV_GED_2003
hdgr7 CV_HIGHEST_DEGREE_EVER_EDT_2003
hdgYr7 CV_HIGHEST_DEGREE_0304_2003
hsr7 CV_HS_DIPLOMA_2003
aar7 CV_AA_DEGREE_2003
bar7 CV_BA_DEGREE_2003
doicmr7 CV_INTERVIEW_CMONTH_2003
intdr7 CV_INTERVIEW_DATE~D_2003
intmr7 CV_INTERVIEW_DATE~M_2003
intyr7 CV_INTERVIEW_DATE~Y_2003
mar7 CV_MA_DEGREE_2003
lftscR7_1 NEWSCHOOL_LEFT.01_2003
lftscR7_2 NEWSCHOOL_LEFT.02_2003
lftscR7_3 NEWSCHOOL_LEFT.03_2003
lftscR7_5 NEWSCHOOL_LEFT.05_2003
schidR7_1 NEWSCHOOL_PUBID.01_2003
schidR7_2 NEWSCHOOL_PUBID.02_2003
schidR7_3 NEWSCHOOL_PUBID.03_2003
schidR7_4 NEWSCHOOL_PUBID.04_2003
schidR7_5 NEWSCHOOL_PUBID.05_2003
scodeR7_1 NEWSCHOOL_SCHCODE.01_2003
scodeR7_2 NEWSCHOOL_SCHCODE.02_2003
scodeR7_3 NEWSCHOOL_SCHCODE.03_2003
scodeR7_4 NEWSCHOOL_SCHCODE.04_2003
scodeR7_5 NEWSCHOOL_SCHCODE.05_2003
encatr8 CV_ENROLLSTAT_EDT_2004
gdr8 CV_GED_2004
hdgr8 CV_HIGHEST_DEGREE_EVER_EDT_2004
hdgYr8 CV_HIGHEST_DEGREE_0405_2004
hsr8 CV_HS_DIPLOMA_2004
aar8 CV_AA_DEGREE_2004
bar8 CV_BA_DEGREE_2004
doicmr8 CV_INTERVIEW_CMONTH_2004
intdr8 CV_INTERVIEW_DATE~D_2004
intmr8 CV_INTERVIEW_DATE~M_2004
intyr8 CV_INTERVIEW_DATE~Y_2004
mar8 CV_MA_DEGREE_2004
lftscR8_1 NEWSCHOOL_LEFT.01_2004
lftscR8_2 NEWSCHOOL_LEFT.02_2004
lftscR8_3 NEWSCHOOL_LEFT.03_2004
lftscR8_4 NEWSCHOOL_LEFT.04_2004
lftscR8_5 NEWSCHOOL_LEFT.05_2004
scodeR8_1 NEWSCHOOL_SCHCODE.01_2004
scodeR8_2 NEWSCHOOL_SCHCODE.02_2004
scodeR8_3 NEWSCHOOL_SCHCODE.03_2004
scodeR8_4 NEWSCHOOL_SCHCODE.04_2004
scodeR8_5 NEWSCHOOL_SCHCODE.05_2004
schidR8_1 NEWSCHOOL_PUBID.01_2004
schidR8_2 NEWSCHOOL_PUBID.02_2004
schidR8_3 NEWSCHOOL_PUBID.03_2004
schidR8_4 NEWSCHOOL_PUBID.04_2004
schidR8_5 NEWSCHOOL_PUBID.05_2004
encatr9 CV_ENROLLSTAT_2005
hdgr9 CV_HIGHEST_DEGREE_EVER_EDT_2005
hdgYr9 CV_HIGHEST_DEGREE_0506_2005
doicmr9 CV_INTERVIEW_CMONTH_2005
intdr9 CV_INTERVIEW_DATE~D_2005
intmr9 CV_INTERVIEW_DATE~M_2005
intyr9 CV_INTERVIEW_DATE~Y_2005
lftscR9_1 NEWSCHOOL_LEFT.01_2005
lftscR9_2 NEWSCHOOL_LEFT.02_2005
lftscR9_3 NEWSCHOOL_LEFT.03_2005
lftscR9_4 NEWSCHOOL_LEFT.04_2005
scodeR9_1 NEWSCHOOL_SCHCODE.01_2005
scodeR9_2 NEWSCHOOL_SCHCODE.02_2005
scodeR9_3 NEWSCHOOL_SCHCODE.03_2005
scodeR9_4 NEWSCHOOL_SCHCODE.04_2005
schidR9_1 NEWSCHOOL_PUBID.01_2005
schidR9_2 NEWSCHOOL_PUBID.02_2005
schidR9_3 NEWSCHOOL_PUBID.03_2005
schidR9_4 NEWSCHOOL_PUBID.04_2005
encatr10 CV_ENROLLSTAT_2006
hdgr10 CV_HIGHEST_DEGREE_EVER_EDT_2006
hdgYr10 CV_HIGHEST_DEGREE_0607_2006
doicmr10 CV_INTERVIEW_CMONTH_2006
intdr10 CV_INTERVIEW_DATE~D_2006
intmr10 CV_INTERVIEW_DATE~M_2006
intyr10 CV_INTERVIEW_DATE~Y_2006
lftscR10_1 NEWSCHOOL_LEFT.01_2006
lftscR10_2 NEWSCHOOL_LEFT.02_2006
lftscR10_3 NEWSCHOOL_LEFT.03_2006
lftscR10_4 NEWSCHOOL_LEFT.04_2006
lftscR10_5 NEWSCHOOL_LEFT.05_2006
scodeR10_1 NEWSCHOOL_SCHCODE.01_2006
scodeR10_2 NEWSCHOOL_SCHCODE.02_2006
scodeR10_3 NEWSCHOOL_SCHCODE.03_2006
scodeR10_4 NEWSCHOOL_SCHCODE.04_2006
scodeR10_5 NEWSCHOOL_SCHCODE.05_2006
schidR10_1 NEWSCHOOL_PUBID.01_2006
schidR10_2 NEWSCHOOL_PUBID.02_2006
schidR10_3 NEWSCHOOL_PUBID.03_2006
schidR10_4 NEWSCHOOL_PUBID.04_2006
schidR10_5 NEWSCHOOL_PUBID.05_2006
encatr11 CV_ENROLLSTAT_2007
hdgr11 CV_HIGHEST_DEGREE_EVER_EDT_2007
hdgYr11 CV_HIGHEST_DEGREE_0708_2007
doicmr11 CV_INTERVIEW_CMONTH_2007
intdr11 CV_INTERVIEW_DATE~D_2007
intmr11 CV_INTERVIEW_DATE~M_2007
intyr11 CV_INTERVIEW_DATE~Y_2007
lftscR11_1 NEWSCHOOL_LEFT.01_2007
lftscR11_2 NEWSCHOOL_LEFT.02_2007
lftscR11_3 NEWSCHOOL_LEFT.03_2007
lftscR11_4 NEWSCHOOL_LEFT.04_2007
scodeR11_1 NEWSCHOOL_SCHCODE.01_2007
scodeR11_2 NEWSCHOOL_SCHCODE.02_2007
scodeR11_3 NEWSCHOOL_SCHCODE.03_2007
scodeR11_4 NEWSCHOOL_SCHCODE.04_2007
scodeR11_5 NEWSCHOOL_SCHCODE.05_2007
schidR11_1 NEWSCHOOL_PUBID.01_2007
schidR11_2 NEWSCHOOL_PUBID.02_2007
schidR11_3 NEWSCHOOL_PUBID.03_2007
schidR11_4 NEWSCHOOL_PUBID.04_2007
schidR11_5 NEWSCHOOL_PUBID.05_2007
encatr12 CV_ENROLLSTAT_2008
hdgr12 CV_HIGHEST_DEGREE_EVER_EDT_2008
hdgYr12 CV_HIGHEST_DEGREE_0809_2008
doicmr12 CV_INTERVIEW_CMONTH_2008
intdr12 CV_INTERVIEW_DATE~D_2008
intmr12 CV_INTERVIEW_DATE~M_2008
intyr12 CV_INTERVIEW_DATE~Y_2008
lftscR12_1 NEWSCHOOL_LEFT.01_2008
lftscR12_2 NEWSCHOOL_LEFT.02_2008
lftscR12_3 NEWSCHOOL_LEFT.03_2008
lftscR12_4 NEWSCHOOL_LEFT.04_2008
lftscR12_5 NEWSCHOOL_LEFT.05_2008
lftscR12_6 NEWSCHOOL_LEFT.06_2008
lftscR12_7 NEWSCHOOL_LEFT.07_2008
scodeR12_1 NEWSCHOOL_SCHCODE.01_2008
scodeR12_2 NEWSCHOOL_SCHCODE.02_2008
scodeR12_3 NEWSCHOOL_SCHCODE.03_2008
scodeR12_4 NEWSCHOOL_SCHCODE.04_2008
scodeR12_5 NEWSCHOOL_SCHCODE.05_2008
scodeR12_6 NEWSCHOOL_SCHCODE.06_2008
scodeR12_7 NEWSCHOOL_SCHCODE.07_2008
scodeR12_8 NEWSCHOOL_SCHCODE.08_2008
schidR12_1 NEWSCHOOL_PUBID.01_2008
schidR12_2 NEWSCHOOL_PUBID.02_2008
schidR12_3 NEWSCHOOL_PUBID.03_2008
schidR12_4 NEWSCHOOL_PUBID.04_2008
schidR12_5 NEWSCHOOL_PUBID.05_2008
schidR12_6 NEWSCHOOL_PUBID.06_2008
schidR12_7 NEWSCHOOL_PUBID.07_2008
schidR12_8 NEWSCHOOL_PUBID.08_2008
VERSION_R13_r13 VERSION_R13_2009
encatr13 CV_ENROLLSTAT_2009
hdgr13 CV_HIGHEST_DEGREE_EVER_EDT_2009
hdgYr13 CV_HIGHEST_DEGREE_0910_2009
doicmr13 CV_INTERVIEW_CMONTH_2009
intdr13 CV_INTERVIEW_DATE~D_2009
intmr13 CV_INTERVIEW_DATE~M_2009
intyr13 CV_INTERVIEW_DATE~Y_2009
lftscR13_1 NEWSCHOOL_LEFT.01_2009
lftscR13_2 NEWSCHOOL_LEFT.02_2009
lftscR13_3 NEWSCHOOL_LEFT.03_2009
scodeR13_1 NEWSCHOOL_SCHCODE.01_2009
scodeR13_2 NEWSCHOOL_SCHCODE.02_2009
scodeR13_3 NEWSCHOOL_SCHCODE.03_2009
schidR13_1 NEWSCHOOL_PUBID.01_2009
schidR13_2 NEWSCHOOL_PUBID.02_2009
schidR13_3 NEWSCHOOL_PUBID.03_2009
PUBID PUBID_2010
CVC_HIGHEST_DEGREE_EVER_r9_XRND CVC_HIGHEST_DEGREE_EVER_2005_XRND
gdr9 CVC_GED_2005_XRND
hsr9 CVC_HS_DIPLOMA_2005_XRND
aar9 CVC_AA_DEGREE_2005_XRND
bar9 CVC_BA_DEGREE_2005_XRND
pfr9 CVC_PROF_DEGREE_2005_XRND
mar9 CVC_MA_DEGREE_2005_XRND
CVC_HIGHEST_DEGREE_EVER_r10_XRND CVC_HIGHEST_DEGREE_EVER_2006_XRND
gdr10 CVC_GED_2006_XRND
hsr10 CVC_HS_DIPLOMA_2006_XRND
aar10 CVC_AA_DEGREE_2006_XRND
bar10 CVC_BA_DEGREE_2006_XRND
pfr10 CVC_PROF_DEGREE_2006_XRND
dcr10 CVC_PHD_DEGREE_2006_XRND
mar10 CVC_MA_DEGREE_2006_XRND
CVC_HIGHEST_DEGREE_EVER_r11_XRND CVC_HIGHEST_DEGREE_EVER_2007_XRND
gdr11 CVC_GED_2007_XRND
hsr11 CVC_HS_DIPLOMA_2007_XRND
aar11 CVC_AA_DEGREE_2007_XRND
bar11 CVC_BA_DEGREE_2007_XRND
pfr11 CVC_PROF_DEGREE_2007_XRND
dcr11 CVC_PHD_DEGREE_2007_XRND
mar11 CVC_MA_DEGREE_2007_XRND
HGCr13 CVC_HGC_EVER_XRND
CVC_HIGHEST_DEGREE_EVER_XRND CVC_HIGHEST_DEGREE_EVER_XRND
gdr13 CVC_GED_XRND
hsr13 CVC_HS_DIPLOMA_XRND
aar13 CVC_AA_DEGREE_XRND
bar13 CVC_BA_DEGREE_XRND
pfr13 CVC_PROF_DEGREE_XRND
dcr13 CVC_PHD_DEGREE_XRND
mar13 CVC_MA_DEGREE_XRND
SAS Code for Variable Creation
*** Define all arrays to be used in this program:;
array CR1 (7) gdr1 hsr1 aar1 bar1 mar1 dcr1 pfr1;
array CR2 (7) gdr2 hsr2 aar2 bar2 mar2 dcr2 pfr2;
array CR3 (7) gdr3 hsr3 aar3 bar3 mar3 dcr3 pfr3;
array CR4 (7) gdr4 hsr4 aar4 bar4 mar4 dcr4 pfr4;
array CR5 (7) gdr5 hsr5 aar5 bar5 mar5 dcr5 pfr5;
array CR6 (7) gdr6 hsr6 aar6 bar6 mar6 dcr6 pfr6;
array CR7 (7) gdr7 hsr7 aar7 bar7 mar7 dcr7 pfr7;
array CR8 (7) gdr8 hsr8 aar8 bar8 mar8 dcr8 pfr8;
array CR9 (7) gdr9 hsr9 aar9 bar9 mar9 dcr9 pfr9;
array CR10 (7) gdr10 hsr10 aar10 bar10 mar10 dcr10 pfr10;
array CR11 (7) gdr11 hsr11 aar11 bar11 mar11 dcr11 pfr11;
array CR12 (7) gdr12 hsr12 aar12 bar12 mar12 dcr12 pfr12;
array CR13 (7) gdr13 hsr13 aar13 bar13 mar13 dcr13 pfr13;
array CRP (7) gdrP hsrP aarP barP marP dcrP pfrP;
array CRC (7) gdrC hsrC aarC barC marC dcrC pfrC;
array CRC_noIMP (7) gdrC_noIMP hsrC_noIMP aarC_noIMP barC_noIMP marC_noIMP dcrC_noIMP pfrC_noIMP;
array HE9 (7) he9_gd he9_hs he9_aa he9_ba he9_ma he9_dc he9_pf;
array HE10 (7) he10_gd he10_hs he10_aa he10_ba he10_ma he10_dc he10_pf;
array HE11 (7) he11_gd he11_hs he11_aa he11_ba he11_ma he11_dc he11_pf;
array HE12 (7) he12_gd he12_hs he12_aa he12_ba he12_ma he12_dc he12_pf;
array HE13 (7) he13_gd he13_hs he13_aa he13_ba he13_ma he13_dc he13_pf;
array HE14 (7) he14_gd he14_hs he14_aa he14_ba he14_ma he14_dc he14_pf;
array CDT (7) CDTGD CDTHS CDTAA CDTBA CDTMA CDTDC CDTPF;
array FLG (7) flgGD flgHS flgAA flgBA flgMA flgDC flgPF;
array QUX (7) quxGD quxHS quxAA quxBA quxMA quxDC quxPF;
array DEG (7) degGD degHS degAA degBA degMA degDC degPF;
array TMPDG (3) TMPDG1-TMPDG3;
array e23460mr14 (5) e23460mr14_1-e23460mr14_5;
array e23460yr14 (5) e23460yr14_1-e23460yr14_5;
array t7000r14 (8) t7000r14_1-t7000r14_8;
array t7000 t7000r:;
array e11700 e11700r1-e11700r14;
array e13300 e13300r1-e13300r14;
array scoder1 (2) scoder1_1-scoder1_2;
array scoder2 (6) scoder2_1-scoder2_6;
array scoder3 (7) scoder3_1-scoder3_7;
array scoder4 (5) scoder4_1-scoder4_5;
array scoder5 (6) scoder5_1-scoder5_6;
array scoder6 (5) scoder6_1-scoder6_5;
array scoder7 (5) scoder7_1-scoder7_5;
array scoder8 (5) scoder8_1-scoder8_5;
array scoder9 (4) scoder9_1-scoder9_4;
array scoder10 (5) scoder10_1-scoder10_5;
array scoder11 (5) scoder11_1-scoder11_5;
array scoder12 (8) scoder12_1-scoder12_8;
array scoder13 (3) scoder13_1-scoder13_3;
array scoder14 (5) scoder14_1-scoder14_5;
array lftscr1 (2) lftscr1_1-lftscr1_2;
array lftscr2 (6) lftscr2_1-lftscr2_6;
array lftscr3 (7) lftscr3_1-lftscr3_7;
array lftscr4 (5) lftscr4_1-lftscr4_5;
array lftscr5 (6) lftscr5_1-lftscr5_6;
array lftscr6 (5) lftscr6_1-lftscr6_5;
array lftscr7 (5) lftscr7_1-lftscr7_5;
array lftscr8 (5) lftscr8_1-lftscr8_5;
array lftscr9 (4) lftscr9_1-lftscr9_4;
array lftscr10 (5) lftscr10_1-lftscr10_5;
array lftscr11 (5) lftscr11_1-lftscr11_5;
array lftscr12 (8) lftscr12_1-lftscr12_8;
array lftscr13 (3) lftscr13_1-lftscr13_3;
array lftscr14 (5) lftscr14_1-lftscr14_5;
array lftsc2r2 (6) lftsc2r2_1-lftsc2r2_6;
array lftsc2r3 (7) lftsc2r3_1-lftsc2r3_7;
array lftsc2r4 (5) lftsc2r4_1-lftsc2r4_5;
array lftsc2r5 (6) lftsc2r5_1-lftsc2r5_6;
array e27337r2 (6) e27337r2_1-e27337r2_6;
array e27337r3 (7) e27337r31-e27337r37;
array e27337r4 (5) e27337r4_1-e27337r4_5;
array e27337r5 (6) e27337r5_1-e27337r5_6;
array e27337r6 (5) e27337r6_1-e27337r6_5;
array e27337r7 (5) e27337r7_1-e27337r7_5;
array e27337r8 (5) e27337r8_1-e27337r8_5;
array e27337r9 (4) e27337r9_1-e27337r9_4;
array e27337r10 (5) e27337r10_1-e27337r10_5;
array e27337r11 (5) e27337r11_1-e27337r11_5;
array e27337r12 (8) e27337r12_1-e27337r12_8;
array e27337r13 (3) e27337r13_1-e27337r13_3;
array e27337r14 (5) e27337r14_1-e27337r14_5;
array e27337 e27337r2_1-e27337r2_6
e27337r31-e27337r37
e27337r4_1-e27337r4_5
e27337r5_1-e27337r5_6
e27337r6_1-e27337r6_5
e27337r7_1-e27337r7_5
e27337r8_1-e27337r8_5
e27337r9_1-e27337r9_4
e27337r10_1-e27337r10_5
e27337r11_1-e27337r11_5
e27337r12_1-e27337r12_8
e27337r13_1-e27337r13_3
e27337r14_1-e27337r14_5;
array e23450r2 (6) e23450r2_1-e23450r2_6;
array e23450r3 (7) e23450r3_1-e23450r3_7;
array e23450r4 (5) e23450r4_1-e23450r4_5;
array e23450r5 (6) e23450r5_1-e23450r5_6;
array e23450r6 (5) e23450r6_1-e23450r6_5;
array e23450r7 (5) e23450r7_1-e23450r7_5;
array e23450r8 (5) e23450r8_1-e23450r8_5;
array e23450r9 (4) e23450r9_1-e23450r9_4;
array e23450r10 (5) e23450r10_1-e23450r10_5;
array e23450r11 (5) e23450r11_1-e23450r11_5;
array e23450r12 (8) e23450r12_1-e23450r12_8;
array e23450r13 (3) e23450r13_1-e23450r13_3;
array e23450r14 (5) e23450r14_1-e23450r14_5;
array e23450 e23450r2_1-e23450r2_6
e23450r3_1-e23450r3_7
e23450r4_1-e23450r4_5
e23450r5_1-e23450r5_6
e23450r6_1-e23450r6_5
e23450r7_1-e23450r7_5
e23450r8_1-e23450r8_5
e23450r9_1-e23450r9_4
e23450r10_1-e23450r10_5
e23450r11_1-e23450r11_5
e23450r12_1-e23450r12_8
e23450r13_1-e23450r13_3
e23450r14_1-e23450r14_5;
array schidr1 (2) schidr1_1-schidr1_2;
array schidr2 (6) schidr2_1-schidr2_6;
array schidr3 (7) schidr3_1-schidr3_7;
array schidr4 (5) schidr4_1-schidr4_5;
array schidr5 (6) schidr5_1-schidr5_6;
array schidr6 (5) schidr6_1-schidr6_5;
array schidr7 (5) schidr7_1-schidr7_5;
array schidr8 (5) schidr8_1-schidr8_5;
array schidr9 (4) schidr9_1-schidr9_4;
array schidr10 (5) schidr10_1-schidr10_5;
array schidr11 (5) schidr11_1-schidr11_5;
array schidr12 (8) schidr12_1-schidr12_8;
array schidr13 (3) schidr13_1-schidr13_3;
array schidr14 (5) schidr14_1-schidr14_5;
array major141 (*) e21299r14_101-e21299r14_108 e21399r14_101-e21399r14_108 e7000r14_1;
array major142 (*) e21299r14_201-e21299r14_214 e21399r14_201-e21399r14_214 e7000r14_2;
array major143 (*) e21299r14_301-e21299r14_311 e21399r14_301-e21399r14_311 e7000r14_3;
array major144 (*) e21299r14_401 e21399r14_401 e7000r14_4;
array major145 (*) e7000r14_5;
array stopmr14 (5,3) stopmr14_11 stopmr14_21 stopmr14_31
stopmr14_12 stopmr14_22 stopmr14_32
stopmr14_13 stopmr14_23 stopmr14_33
stopmr14_14 stopmr14_24 stopmr14_34
stopmr14_15 stopmr14_25 stopmr14_35;
array stopyr14 (5,3) stopyr14_11 stopyr14_21 stopyr14_31
stopyr14_12 stopyr14_22 stopyr14_32
stopyr14_13 stopyr14_23 stopyr14_33
stopyr14_14 stopyr14_24 stopyr14_34
stopyr14_15 stopyr14_25 stopyr14_35;
array stopcr2 (6) stopcr2_1-stopcr2_6;
array stopcr3 (7) stopcr3_1-stopcr3_7;
array stopcr4 (5) stopcr4_1-stopcr4_5;
array stopcr5 (6) stopcr5_1-stopcr5_6;
array stopcr6 (5) stopcr6_1-stopcr6_5;
array stopcr7 (5) stopcr7_1-stopcr7_5;
array stopcr8 (5) stopcr8_1-stopcr8_5;
array stopcr9 (4) stopcr9_1-stopcr9_4;
array stopcr10 (5) stopcr10_1-stopcr10_5;
array stopcr11 (5) stopcr11_1-stopcr11_5;
array stopcr12 (8) stopcr12_1-stopcr12_8;
array stopcr13 (3) stopcr13_1-stopcr13_3;
array stopcr14 (5) stopcr14_1-stopcr14_5;
array anymjr1 (2) anymjr1_1-anymjr1_2;
array anymjr2 (6) anymjr2_1-anymjr2_6;
array anymjr3 (7) anymjr3_1-anymjr3_7;
array anymjr4 (5) anymjr4_1-anymjr4_5;
array anymjr5 (6) anymjr5_1-anymjr5_6;
array anymjr6 (5) anymjr6_1-anymjr6_5;
array anymjr7 (5) anymjr7_1-anymjr7_5;
array anymjr8 (5) anymjr8_1-anymjr8_5;
array anymjr9 (4) anymjr9_1-anymjr9_4;
array anymjr10 (5) anymjr10_1-anymjr10_5;
array anymjr11 (5) anymjr11_1-anymjr11_5;
array anymjr12 (8) anymjr12_1-anymjr12_8;
array anymjr13 (3) anymjr13_1-anymjr13_3;
array anymjr14 (5) anymjr14_1-anymjr14_5;
array clgdgr2 (6) clgdgr2_1-clgdgr2_6;
array clgdgr3 (7) clgdgr3_1-clgdgr3_7;
array clgdgr4 (5) clgdgr4_1-clgdgr4_5;
array clgdgr5 (6) clgdgr5_1-clgdgr5_6;
array clgdgr6 (5) clgdgr6_1-clgdgr6_5;
array clgdgr7 (5) clgdgr7_1-clgdgr7_5;
array clgdgr8 (5) clgdgr8_1-clgdgr8_5;
array clgdgr9 (4) clgdgr9_1-clgdgr9_4;
array clgdgr10 (5) clgdgr10_1-clgdgr10_5;
array clgdgr11 (5) clgdgr11_1-clgdgr11_5;
array clgdgr12 (8) clgdgr12_1-clgdgr12_8;
array clgdgr13 (3) clgdgr13_1-clgdgr13_3;
array clgdgr14 (5) clgdgr14_1-clgdgr14_5;
***intialize the created variables;
if e11700r14=-5 then do;
do i=1 to 7;
crc(i)=-5; cdt(i)=cr13(i);
end;
hgdegr14=-5;
end;
else do;
do i=1 to 7;
CRC(i)=-4; CDT(i)=-4;
end;
end;
* Set all dummies to 0;
deg_unknown=0;
ged_trn=0;
do i=1 to 7;
DEG(i)=0; FLG(i)=0; QUX(i)=0;he14(i)=0;
end;
*** Initialize Variables.;
** Create enrollment stop dates in continuous month schemes for all rounds;
do i=1 to dim(stopmr14,1);
do j=1 to dim(stopmr14,2);
if stopmr14(i,j)>0 & stopyr14(i,j)>0 then stopcr14(i)=((stopyr14(i,j)-1980)*12)+stopmr14(i,j);
if stopmr14(i,j) in (-1,-2,-3)|stopyr14(i,j) in (-1,-2,-3) then stopcr14(i)=-3;
end;
end;
*** Identify the latest date of degree received variables from previous rounds.;
do i=1 to 7;
CRP(i)=CR13(i);
end;
*** Create the date of degree received variables using information from current round only
Note: The earlier code would not let a bad date be overwritten with a good one. So, we changed it.
The old code is at the end of the program.;
** Compute the date of receiving GED.;
if e13300r14=-3 then gdrC=-3;
if e13300r14=1 and gdrC<0 then do;
gdrC=-3;
if e13500mr14>0 and e13500yr14>0 then gdrC=(e13500yr14-1980)*12+e13500mr14;
if e13500mr14 in (-4,0) or e13500yr14 in (-4,0) then quxGD=1;
end;
** Compute the date of receiving HS Diploma.;
if e11700r14=-3 then hsrC=-3;
if e11700r14=1 and hsrC<0 then do;
hsrC=-3;
if e11900mr14>0 and e11900yr14>0 then hsrC=(e11900yr14-1980)*12+e11900mr14;
if e11900mr14 in (-4,0) or e11900yr14 in (-4,0) then quxHS=1;
end;
** Compute the dates of receiving GED, AA, BA/BS, MA/MS/MBA/MSW, Ph.D. and MS/LLD/DDS/JD.;
do j=1 to dim(TMPDG);
if e23450r14(j)=1 then TMPDG(j)=3; /* Associate/Junior College or two-year associate degree (AA) */
if e23450r14(j)=3 then TMPDG(j)=4; /* Bachelor's degree (BA, BS or unspecified) */
if e23450r14(j)=4 then TMPDG(j)=5; /* Master's degree (MA, MBA, MS, MSW) */
if e23450r14(j)=5 then TMPDG(j)=6; /* Doctoral Degree (Ph.D.) */
if e23450r14(j)=6 then TMPDG(j)=7; /* Professional Degree (MD, LLD, DDS, JD) */
if e23450r14(j)=9 then TMPDG(j)=1; /* GED */
end;
do j=1 to dim(TMPDG);
do i=1 to 7;
if TMPDG(j)=i and CRC(i)<0 then do;
CRC(i)=-3;
if e23460mr14(j)>0 & e23460yr14(j)>0 then CRC(i)=(e23460yr14(j)-1980)*12+e23460mr14(j);
if e23460mr14(j) in (-4,0) | e23460yr14(j) in (-4,0) then QUX(i)=1;
end;
end;
if e23450r14(j) in (8,999,-1,-2,-3) then deg_unknown=1;
end;
** Compute the date of receiving GED if respondent completes GED in a training program. Set the date
to -3 because we don't know completion date. Do not, however, overwrite a good date.;
do k=1 to dim(t7000r14);
if gdrC=-4 and t7000r14(k)=4 then do;
gdrC=-3;
ged_trn=1;
end;
end;
do i=1 to 7;
crc_noIMP(i)=crc(i);
end;
** Compute dummy for whether had decided on a major at the colelge. Sometimes when R reports being
enrolled in a college and that is a continuing college from DLI information for the major and other
college specific information is not collected (either bcos of quex problems or because R did not
complete the current term). In such cases we match the that college to a college reported in DLI
and use the major reported for that college.;
** Round 14;
do i=1 to dim(major141); if major141(i) in (0,98) & anymjr14_1~=1 then anymjr14_1=0; if major141(i)>0 & major141(i)~=98 then anymjr14_1=1; end;
do i=1 to dim(major142); if major142(i) in (0,98) & anymjr14_2~=1 then anymjr14_2=0; if major142(i)>0 & major142(i)~=98 then anymjr14_2=1; end;
do i=1 to dim(major143); if major143(i) in (0,98) & anymjr14_3~=1 then anymjr14_3=0; if major143(i)>0 & major143(i)~=98 then anymjr14_3=1; end;
do i=1 to dim(major144); if major144(i) in (0,98) & anymjr14_4~=1 then anymjr14_4=0; if major144(i)>0 & major144(i)~=98 then anymjr14_4=1; end;
do i=1 to dim(major145); if major145(i) in (0,98) & anymjr14_5~=1 then anymjr14_5=0; if major145(i)>0 & major145(i)~=98 then anymjr14_5=1; end;
do i=1 to dim(anymjr14);
if anymjr14[i]=. & e3112r14~=-5 then do;
if e3112r13~=-5 then do;
do k=1 to dim(schidr13);
if schidr14[i]=schidr13(k) & schidr13(k)>0 & anymjr13(k)>=0 then do;
anymjr14[i]=anymjr13(k);
major_FLG_r14=13;
end;
end;
end;
if e3112r13=-5 & e3112r12~=-5 then do;
do k=1 to dim(schidr12);
if schidr14[i]=schidr12(k) & schidr12(k)>0 & anymjr12(k)>=0 then do;
anymjr14[i]=anymjr12(k);
major_FLG_r14=12;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11~=-5 then do;
do k=1 to dim(schidr11);
if schidr14[i]=schidr11(k) & schidr11(k)>0 & anymjr11(k)>=0 then do;
anymjr14[i]=anymjr11(k);
major_FLG_r14=11;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10~=-5 then do;
do k=1 to dim(schidr10);
if schidr14[i]=schidr10(k) & schidr10(k)>0 & anymjr10(k)>=0 then do;
anymjr14[i]=anymjr10(k);
major_FLG_r14=10;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9~=-5 then do;
do k=1 to dim(schidr9);
if schidr14[i]=schidr9(k) & schidr9(k)>0 & anymjr9(k)>=0 then do;
anymjr14[i]=anymjr9(k);
major_FLG_r14=9;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9=-5 & e3112r8~=-5 then do;
do k=1 to dim(schidr8);
if schidr14[i]=schidr8(k) & schidr8(k)>0 & anymjr8(k)>=0 then do;
anymjr14[i]=anymjr8(k);
major_FLG_r14=8;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9=-5 & e3112r8=-5 & e3112r7~=-5 then do;
do k=1 to dim(schidr7);
if schidr14[i]=schidr7(k) & schidr7(k)>0 & anymjr7(k)>=0 then do;
anymjr14[i]=anymjr7(k);
major_FLG_r14=7;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9=-5 & e3112r8=-5 & e3112r7=-5 & e3112r6~=-5 then do;
do k=1 to dim(schidr6);
if schidr14[i]=schidr6(k) & schidr6(k)>0 & anymjr6(k)>=0 then do;
anymjr14[i]=anymjr6(k);
major_FLG_r14=6;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9=-5 & e3112r8=-5 & e3112r7=-5 & e3112r6=-5 & e3112r5~=-5 then do;
do k=1 to dim(schidr5);
if schidr14[i]=schidr5(k) & schidr5(k)>0 & anymjr5(k)>=0 then do;
anymjr14[i]=anymjr5(k);
major_FLG_r14=5;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9=-5 & e3112r8=-5 & e3112r7=-5 & e3112r6=-5 & e3112r5=-5 & e3112r4~=-5 then do;
do k=1 to dim(schidr4);
if schidr14[i]=schidr4(k) & schidr4(k)>0 & anymjr4(k)>=0 then do;
anymjr14[i]=anymjr4(k);
major_FLG_r14=4;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9=-5 & e3112r8=-5 & e3112r7=-5 & e3112r6=-5 & e3112r5=-5 & e3112r4=-5 & e3112r3~=-5 then do;
do k=1 to dim(schidr3);
if schidr14[i]=schidr3(k) & schidr3(k)>0 & anymjr3(k)>=0 then do;
anymjr14[i]=anymjr3(k);
major_FLG_r14=3;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9=-5 & e3112r8=-5 & e3112r7=-5 & e3112r6=-5 & e3112r5=-5 & e3112r4=-5 & e3112r3=-5 & e3112r2~=-5 then do;
do k=1 to dim(schidr2);
if schidr14[i]=schidr2(k) & schidr2(k)>0 & anymjr2(k)>=0 then do;
anymjr14[i]=anymjr2(k);
major_FLG_r14=2;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9=-5 & e3112r8=-5 & e3112r7=-5 & e3112r6=-5 & e3112r5=-5 & e3112r4=-5 & e3112r3=-5 & e3112r2=-5 then do;
do k=1 to dim(schidr1);
if schidr14[i]=schidr1(k) & schidr1(k)>0 & anymjr1(k)>=0 then do;
anymjr14[i]=anymjr1(k);
major_FLG_r14=1;
end;
end;
end;
end;
end;
** Identifying if R was enrolled in a legeitimate degree program in a 2/4 year college, reported having
some major and also reported leaving that college bcos finished coursework or received a degree.
This dummy is created only when R does not report receiving a college degree in (YSCH-23450).
The reason we use the condition anymjrRND(i)~=0 instead of anymjrRND(i)=1 is because anymjrRND(i)
may be missing if the question about major is not asked. This question is not asked if R did not
report enrolling in any term in that round. This situation could arise if R did not receive the
degree in the round that R reported completing the last term. R then reported receiving that
degree in the single item (YSCH-3113) in the next round. As long as R did not specifically report
having no major it is ok.;
do i=1 to dim(schidr2);
if e23450r2(i)<=0 & (lftscr2(i)=1|lftsc2r2(i)=1) & scoder2(i) in (4,5)
& e27337r2(i) in (1,3,4,5,6) & anymjr2(i)~=0 then clgdgr2(i)=1;
end;
do i=1 to dim(schidr3);
if e23450r3(i)<=0 & (lftscr3(i)=1|lftsc2r3(i)=1) & scoder3(i) in (4,5)
& e27337r3(i) in (1,3,4,5,6) & anymjr3(i)~=0 then clgdgr3(i)=1;
end;
do i=1 to dim(schidr4);
if e23450r4(i)<=0 & (lftscr4(i)=1|lftsc2r4(i)=1) & scoder4(i) in (4,5)
& e27337r4(i) in (1,3,4,5,6) & anymjr4(i)~=0 then clgdgr4(i)=1;
end;
do i=1 to dim(schidr5);
if e23450r5(i)<=0 & (lftscr5(i)=1|lftsc2r5(i)=1) & scoder5(i) in (4,5)
& e27337r5(i) in (1,3,4,5,6) & anymjr5(i)~=0 then clgdgr5(i)=1;
end;
do i=1 to dim(schidr6);
if e23450r6(i)<=0 & lftscr6(i)=1 & scoder6(i) in (4,5)
& e27337r6(i) in (1,3,4,5,6) & anymjr6(i)~=0 then clgdgr6(i)=1;
end;
do i=1 to dim(schidr7);
if e23450r7(i)<=0 & lftscr7(i)=1 & scoder7(i) in (4,5)
& e27337r7(i) in (1,3,4,5,6) & anymjr7(i)~=0 then clgdgr7(i)=1;
end;
do i=1 to dim(schidr8);
if e23450r8(i)<=0 & lftscr8(i)=1 & scoder8(i) in (4,5)
& e27337r8(i) in (1,3,10,4,5,6) & anymjr8(i)~=0 then clgdgr8(i)=1;
end;
do i=1 to dim(schidr9);
if e23450r9(i)<=0 & lftscr9(i)=1 & scoder9(i) in (4,5)
& e27337r9(i) in (1,3,10,4,5,6) & anymjr9(i)~=0 then clgdgr9(i)=1;
end;
do i=1 to dim(schidr10);
if e23450r10(i)<=0 & lftscr10(i)=1 & scoder10(i) in (4,5,6)
& e27337r10(i) in (1,3,10,4,5,6) & anymjr10(i)~=0 then clgdgr10(i)=1;
end;
do i=1 to dim(schidr11);
if e23450r11(i)<=0 & lftscr11(i)=1 & scoder11(i) in (4,5,6)
& e27337r11(i) in (1,3,10,4,5,6) & anymjr11(i)~=0 then clgdgr11(i)=1;
end;
do i=1 to dim(schidr12);
if e23450r12(i)<=0 & lftscr12(i)=1 & scoder12(i) in (4,5,6)
& e27337r12(i) in (1,3,10,4,5,6) & anymjr12(i)~=0 then clgdgr12(i)=1;
end;
do i=1 to dim(schidr13);
if e23450r13(i)<=0 & lftscr13(i)=1 & scoder13(i) in (4,5,6)
& e27337r13(i) in (1,3,10,4,5,6) & anymjr13(i)~=0 then clgdgr13(i)=1;
end;
do i=1 to dim(schidr14);
if e23450r14(i)<=0 & lftscr14(i)=1 & scoder14(i) in (4,5,6)
& e27337r14(i) in (1,3,10,4,5,6) & anymjr14(i)~=0 then clgdgr14(i)=1;
end;
** Compute dates of degree received for respondents when they report receiving a college degree in
YSCH-3113 but do not report receving one in YSCH-23450. In such cases, additional checks are used to
verify that the respondent has indeed received a college degree. To we use the degree working
towards (YSCH-27337), school type information (NEW_SCHOOL_CODE), reason they left the school
(NEWSCHOOL_LEFT) and whether they had decided on a major at that college. If we can verify that they
were indeed in a 2/4 year college, working towards a legitimate college degree, left that college
because they had completed coursework, or graduated and had decided on a major at that college then
we use the date of leaving that particular college as the date of receving the college degree
reported in YSCH-3113.;
do i=1 to dim(scoder14);
if clgdgr14(i)=1 then do;
if e27337r14(i)>=1 & e3113r14=4
& aarP=-4 & barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& aarC=-4 & barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
aarC=-3;
r14_degIMPr14=4;
aarC=stopcr14(i);
end;
if e27337r14(i)>=3 & e3113r14=5
& barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
barC=-3;
r14_degIMPr14=5;
barC=stopcr14(i);
end;
if e27337r14(i)>=4 & e3113r14=6
& marP=-4 & dcrP=-4 & pfrP=-4
& marC=-4 & dcrC=-4 & pfrC=-4 then do;
marC=-3;
r14_degIMPr14=6;
marC=stopcr14(i);
end;
if e27337r14(i)=5 & e3113r14=7 & dcrP=-4 & dcrC=-4 & (e3112r14>18|hgcr13>18) then do;
dcrC=-3;
r14_degIMPr14=7;
dcrC=stopcr14(i);
end;
if e27337r14(i)=6 & e3113r14=8 & pfrP=-4 & pfrC=-4 then do;
pfrC=-3;
r14_degIMPr14=8;
pfrC=stopcr14(i);
end;
end;
end;
do i=1 to dim(scoder13);
if clgdgr13(i)=1 then do;
if e27337r13(i)>=1 & (e3113r14=4 & e3113r13~=4)
& aarP=-4 & barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& aarC=-4 & barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
aarC=-3;
r14_degIMPr13=4;
aarC=stopcr13(i);
end;
if e27337r13(i)>=3 & (e3113r14=5 & e3113r13~=5)
& barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
barC=-3;
r14_degIMPr13=5;
barC=stopcr13(i);
end;
if e27337r13(i)>=4 & (e3113r14=6 & e3113r13~=6)
& marP=-4 & dcrP=-4 & pfrP=-4
& marC=-4 & dcrC=-4 & pfrC=-4 then do;
marC=-3;
r14_degIMPr13=6;
marC=stopcr13(i);
end;
if e27337r13(i)=5 & (e3113r14=7 & e3113r13~=7) & dcrP=-4 & dcrC=-4 & (e3112r14>18|hgcr13>18) then do;
dcrC=-3;
r14_degIMPr13=7;
dcrC=stopcr13(i);
end;
if e27337r13(i)=6 & (e3113r14=8 & e3113r13~=8) & pfrP=-4 & pfrC=-4 then do;
pfrC=-3;
r14_degIMPr13=8;
pfrC=stopcr13(i);
end;
end;
end;
do i=1 to dim(scoder12);
if clgdgr12(i)=1 then do;
if e27337r12(i)>=1 & (e3113r14=4 & e3113r13~=4 & e3113r12~=4)
& aarP=-4 & barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& aarC=-4 & barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
aarC=-3;
r14_degIMPr12=4;
aarC=stopcr12(i);
end;
if e27337r12(i)>=3 & (e3113r14=5 & e3113r13~=5 & e3113r12~=5)
& barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
barC=-3;
r14_degIMPr12=5;
barC=stopcr12(i);
end;
if e27337r12(i)>=4 & (e3113r14=6 & e3113r13~=6 & e3113r12~=6)
& marP=-4 & dcrP=-4 & pfrP=-4
& marC=-4 & dcrC=-4 & pfrC=-4 then do;
marC=-3;
r14_degIMPr12=6;
marC=stopcr12(i);
end;
if e27337r12(i)=5 & (e3113r14=7 & e3113r13~=7 & e3113r12~=7) & dcrP=-4 & dcrC=-4 & (e3112r14>18|hgcr13>18) then do;
dcrC=-3;
r14_degIMPr12=7;
dcrC=stopcr12(i);
end;
if e27337r12(i)=6 & (e3113r14=8 & e3113r13~=8 & e3113r12~=8) & pfrP=-4 & pfrC=-4 then do;
pfrC=-3;
r14_degIMPr12=8;
pfrC=stopcr12(i);
end;
end;
end;
do i=1 to dim(scoder11);
if clgdgr11(i)=1 then do;
if e27337r11(i)>=1 & (e3113r14=4 & e3113r13~=4 & e3113r12~=4 & e3113r11~=4)
& aarP=-4 & barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& aarC=-4 & barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
aarC=-3;
r14_degIMPr11=4;
aarC=stopcr11(i);
end;
if e27337r11(i)>=3 & (e3113r14=5 & e3113r13~=5 & e3113r12~=5 & e3113r11~=5)
& barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
barC=-3;
r14_degIMPr11=5;
barC=stopcr11(i);
end;
if e27337r11(i)>=4 & (e3113r14=6 & e3113r13~=6 & e3113r12~=6 & e3113r11~=6)
& marP=-4 & dcrP=-4 & pfrP=-4
& marC=-4 & dcrC=-4 & pfrC=-4 then do;
marC=-3;
r14_degIMPr11=6;
marC=stopcr11(i);
end;
if e27337r11(i)=5 & (e3113r14=7 & e3113r13~=7 & e3113r12~=7 & e3113r11~=7)
& dcrP=-4 & dcrC=-4 & (e3112r14>18|hgcr13>18) then do;
dcrC=-3;
r14_degIMPr11=7;
dcrC=stopcr11(i);
end;
if e27337r11(i)=6 & (e3113r14=8 & e3113r13~=8 & e3113r12~=8 & e3113r11~=8) & pfrP=-4 & pfrC=-4 then do;
pfrC=-3;
r14_degIMPr11=8;
pfrC=stopcr11(i);
end;
end;
end;
do i=1 to dim(scoder10);
if clgdgr10(i)=1 then do;
if e27337r10(i)>=1 & (e3113r14=4 & e3113r13~=4 & e3113r12~=4 & e3113r11~=4 & e3113r10~=4)
& aarP=-4 & barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& aarC=-4 & barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
aarC=-3;
r14_degIMPr10=4;
aarC=stopcr10(i);
end;
if e27337r10(i)>=3 & (e3113r14=5 & e3113r13~=5 & e3113r12~=5 & e3113r11~=5 & e3113r10~=5)
& barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
barC=-3;
r14_degIMPr10=5;
barC=stopcr10(i);
end;
if e27337r10(i)>=4 & (e3113r14=6 & e3113r13~=6 & e3113r12~=6 & e3113r11~=6 & e3113r10~=6)
& marP=-4 & dcrP=-4 & pfrP=-4
& marC=-4 & dcrC=-4 & pfrC=-4 then do;
marC=-3;
r14_degIMPr10=6;
marC=stopcr10(i);
end;
if e27337r10(i)=5 & (e3113r14=7 & e3113r13~=7 & e3113r12~=7 & e3113r11~=7 & e3113r10~=7)
& dcrP=-4 & dcrC=-4 & (e3112r14>18|hgcr13>18) then do;
dcrC=-3;
r14_degIMPr10=7;
dcrC=stopcr10(i);
end;
if e27337r10(i)=6 & (e3113r14=8 & e3113r13~=8 & e3113r12~=8 & e3113r11~=8 & e3113r10~=8)
& pfrP=-4 & pfrC=-4 then do;
pfrC=-3;
r14_degIMPr10=8;
pfrC=stopcr10(i);
end;
end;
end;
do i=1 to dim(scoder9);
if clgdgr9(i)=1 then do;
if e27337r9(i)>=1 & (e3113r14=4 & e3113r13~=4 & e3113r12~=4 & e3113r11~=4 & e3113r10~=4 & e3113r9~=4)
& aarP=-4 & barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& aarC=-4 & barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
aarC=-3;
r14_degIMPr9=4;
aarC=stopcr9(i);
end;
if e27337r9(i)>=3 & (e3113r14=5 & e3113r13~=5 & e3113r12~=5 & e3113r11~=5 & e3113r10~=5 & e3113r9~=5)
& barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
barC=-3;
r14_degIMPr9=5;
barC=stopcr9(i);
end;
if e27337r9(i)>=4 & (e3113r14=6 & e3113r13~=6 & e3113r12~=6 & e3113r11~=6 & e3113r10~=6 & e3113r9~=6)
& marP=-4 & dcrP=-4 & pfrP=-4
& marC=-4 & dcrC=-4 & pfrC=-4 then do;
marC=-3;
r14_degIMPr9=6;
marC=stopcr9(i);
end;
if e27337r9(i)=5 & (e3113r14=7 & e3113r13~=7 & e3113r12~=7 & e3113r11~=7 & e3113r10~=7 & e3113r9~=7)
& dcrP=-4 & dcrC=-4 & (e3112r14>18|hgcr13>18) then do;
dcrC=-3;
r14_degIMPr9=7;
dcrC=stopcr9(i);
end;
if e27337r9(i)=6 & (e3113r14=8 & e3113r13~=8 & e3113r12~=8 & e3113r11~=8 & e3113r10~=8 & e3113r9~=8)
& pfrP=-4 & pfrC=-4 then do;
pfrC=-3;
r14_degIMPr9=8;
pfrC=stopcr9(i);
end;
end;
end;
do i=1 to dim(scoder8);
if clgdgr8(i)=1 then do;
if e27337r8(i)>=1 & (e3113r14=4 & e3113r13~=4 & e3113r12~=4 & e3113r11~=4 & e3113r10~=4 & e3113r9~=4 & e3113r8~=4)
& aarP=-4 & barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& aarC=-4 & barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
aarC=-3;
r14_degIMPr8=4;
aarC=stopcr8(i);
end;
if e27337r8(i)>=3 & (e3113r14=5 & e3113r13~=5 & e3113r12~=5 & e3113r11~=5 & e3113r10~=5 & e3113r9~=5 & e3113r8~=5)
& barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
barC=-3;
r14_degIMPr8=5;
barC=stopcr8(i);
end;
if e27337r8(i)>=4 & (e3113r14=6 & e3113r13~=6 & e3113r12~=6 & e3113r11~=6 & e3113r10~=6 & e3113r9~=6 & e3113r8~=6)
& marP=-4 & dcrP=-4 & pfrP=-4
& marC=-4 & dcrC=-4 & pfrC=-4 then do;
marC=-3;
r14_degIMPr8=6;
marC=stopcr8(i);
end;
if e27337r8(i)=5 & (e3113r14=7 & e3113r13~=7 & e3113r12~=7 & e3113r11~=7 & e3113r10~=7 & e3113r9~=7 & e3113r8~=7)
& dcrP=-4 & dcrC=-4 & (e3112r14>18|hgcr13>18) then do;
dcrC=-3;
r14_degIMPr8=7;
dcrC=stopcr8(i);
end;
if e27337r8(i)=6 & (e3113r14=8 & e3113r13~=8 & e3113r12~=8 & e3113r11~=8 & e3113r10~=8 & e3113r9~=8 & e3113r8~=8)
& pfrP=-4 & pfrC=-4 then do;
pfrC=-3;
r14_degIMPr8=8;
pfrC=stopcr8(i);
end;
end;
end;
do i=1 to dim(scoder7);
if clgdgr7(i)=1 then do;
if e27337r7(i)>=1 & (e3113r14=4 & e3113r13~=4 & e3113r12~=4 & e3113r11~=4 & e3113r10~=4 & e3113r9~=4 & e3113r8~=4 & e3113r7~=4)
& aarP=-4 & barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& aarC=-4 & barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
aarC=-3;
r14_degIMPr7=4;
if stopcr7(i)>0 then aarC=stopcr7(i);
end;
if e27337r7(i)>=3 & (e3113r14=5 & e3113r13~=5 & e3113r12~=5 & e3113r11~=5 & e3113r10~=5 & e3113r9~=5 & e3113r8~=5 & e3113r7~=5)
& barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
barC=-3;
r14_degIMPr7=5;
if stopcr7(i)>0 then barC=stopcr7(i);
end;
if e27337r7(i)>=4 & (e3113r14=6 & e3113r13~=6 & e3113r12~=6 & e3113r11~=6 & e3113r10~=6 & e3113r9~=6 & e3113r8~=6 & e3113r7~=6)
& marP=-4 & dcrP=-4 & pfrP=-4
& marC=-4 & dcrC=-4 & pfrC=-4 then do;
marC=-3;
r14_degIMPr7=6;
if stopcr7(i)>0 then marC=stopcr7(i);
end;
if e27337r7(i)=5 & (e3113r14=7 & e3113r13~=7 & e3113r12~=7 & e3113r11~=7 & e3113r10~=7 & e3113r9~=7 & e3113r8~=7 & e3113r7~=7)
& dcrP=-4 & dcrC=-4 & (e3112r14>18|hgcr13>18) then do;
dcrC=-3;
r14_degIMPr7=7;
if stopcr7(i)>0 then dcrC=stopcr7(i);
end;
if e27337r7(i)=6 & (e3113r14=8 & e3113r13~=8 & e3113r12~=8 & e3113r11~=8 & e3113r10~=8 & e3113r9~=8 & e3113r8~=8 & e3113r7~=8)
& pfrP=-4 & pfrC=-4 then do;
pfrC=-3;
r14_degIMPr7=8;
if stopcr7(i)>0 then pfrC=stopcr7(i);
end;
end;
end;
do i=1 to dim(scoder6);
if clgdgr6(i)=1 & (hsr6>-4|gdr6>-4) then do;
if e27337r6(i)>=1 & (e3113r14=4 & e3113r13~=4 & e3113r12~=4 & e3113r11~=4 & e3113r10~=4 & e3113r9~=4 & e3113r8~=4 & e3113r7~=4)
& aarP=-4 & barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& aarC=-4 & barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
aarC=-3;
r14_degIMPr6=4;
if stopcr6(i)>0 then aarC=stopcr6(i);
end;
if e27337r6(i)>=3 & (e3113r14=5 & e3113r13~=5 & e3113r12~=5 & e3113r11~=5 & e3113r10~=5 & e3113r9~=5 & e3113r8~=5 & e3113r7~=5)
& barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
barC=-3;
r14_degIMPr6=5;
if stopcr6(i)>0 then barC=stopcr6(i);
end;
if e27337r6(i)>=4 & (e3113r14=6 & e3113r13~=6 & e3113r12~=6 & e3113r11~=6 & e3113r10~=6 & e3113r9~=6 & e3113r8~=6 & e3113r7~=6)
& marP=-4 & dcrP=-4 & pfrP=-4
& marC=-4 & dcrC=-4 & pfrC=-4 then do;
marC=-3;
r14_degIMPr6=6;
if stopcr6(i)>0 then marC=stopcr6(i);
end;
if e27337r6(i)=5 & (e3113r14=7 & e3113r13~=7 & e3113r12~=7 & e3113r11~=7 & e3113r10~=7 & e3113r9~=7 & e3113r8~=7 & e3113r7~=7)
& dcrP=-4 & dcrC=-4 & (e3112r14>18|hgcr13>18) then do;
dcrC=-3;
r14_degIMPr6=7;
if stopcr6(i)>0 then dcrC=stopcr6(i);
end;
if e27337r6(i)=6 & (e3113r14=8 & e3113r13~=8 & e3113r12~=8 & e3113r11~=8 & e3113r10~=8 & e3113r9~=8 & e3113r8~=8 & e3113r7~=8)
& pfrP=-4 & pfrC=-4 then do;
pfrC=-3;
r14_degIMPr6=8;
if stopcr6(i)>0 then pfrC=stopcr6(i);
end;
end;
end;
do i=1 to dim(scoder5);
if clgdgr5(i)=1 & (hsr5>-4|gdr5>-4) then do;
if e27337r5(i)>=1 & (e3113r14=4 & e3113r13~=4 & e3113r12~=4 & e3113r11~=4 & e3113r10~=4 & e3113r9~=4 & e3113r8~=4 & e3113r7~=4)
& aarP=-4 & barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& aarC=-4 & barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
aarC=-3;
r14_degIMPr5=4;
if stopcr5(i)>0 then aarC=stopcr5(i);
end;
if e27337r5(i)>=3 & (e3113r14=5 & e3113r13~=5 & e3113r12~=5 & e3113r11~=5 & e3113r10~=5 & e3113r9~=5 & e3113r8~=5 & e3113r7~=5)
& barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
barC=-3;
r14_degIMPr5=5;
if stopcr5(i)>0 then barC=stopcr5(i);
end;
if e27337r5(i)>=4 & (e3113r14=6 & e3113r13~=6 & e3113r12~=6 & e3113r11~=6 & e3113r10~=6 & e3113r9~=6 & e3113r8~=6 & e3113r7~=6)
& marP=-4 & dcrP=-4 & pfrP=-4
& marC=-4 & dcrC=-4 & pfrC=-4 then do;
marC=-3;
r14_degIMPr5=6;
if stopcr5(i)>0 then marC=stopcr5(i);
end;
if e27337r5(i)=5 & (e3113r14=7 & e3113r13~=7 & e3113r12~=7 & e3113r11~=7 & e3113r10~=7 & e3113r9~=7 & e3113r8~=7 & e3113r7~=7)
& dcrP=-4 & dcrC=-4 & (e3112r14>18|hgcr13>18) then do;
dcrC=-3;
r14_degIMPr5=7;
if stopcr5(i)>0 then dcrC=stopcr5(i);
end;
if e27337r5(i)=6 & (e3113r14=8 & e3113r13~=8 & e3113r12~=8 & e3113r11~=8 & e3113r10~=8 & e3113r9~=8 & e3113r8~=8 & e3113r7~=8)
& pfrP=-4 & pfrC=-4 then do;
pfrC=-3;
r14_degIMPr5=8;
if stopcr5(i)>0 then pfrC=stopcr5(i);
end;
end;
end;
do i=1 to dim(scoder4);
if clgdgr4(i)=1 & (hsr4>-4|gdr4>-4) then do;
if e27337r4(i)>=1 & (e3113r14=4 & e3113r13~=4 & e3113r12~=4 & e3113r11~=4 & e3113r10~=4 & e3113r9~=4 & e3113r8~=4 & e3113r7~=4)
& aarP=-4 & barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& aarC=-4 & barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
aarC=-3;
r14_degIMPr4=4;
if stopcr4(i)>0 then aarC=stopcr4(i);
end;
if e27337r4(i)>=3 & (e3113r14=5 & e3113r13~=5 & e3113r12~=5 & e3113r11~=5 & e3113r10~=5 & e3113r9~=5 & e3113r8~=5 & e3113r7~=5)
& barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
barC=-3;
r14_degIMPr4=5;
if stopcr4(i)>0 then barC=stopcr4(i);
end;
if e27337r4(i)>=4 & (e3113r14=6 & e3113r13~=6 & e3113r12~=6 & e3113r11~=6 & e3113r10~=6 & e3113r9~=6 & e3113r8~=6 & e3113r7~=6)
& marP=-4 & dcrP=-4 & pfrP=-4
& marC=-4 & dcrC=-4 & pfrC=-4 then do;
marC=-3;
r14_degIMPr4=6;
if stopcr4(i)>0 then marC=stopcr4(i);
end;
if e27337r4(i)=5 & (e3113r14=7 & e3113r13~=7 & e3113r12~=7 & e3113r11~=7 & e3113r10~=7 & e3113r9~=7 & e3113r8~=7 & e3113r7~=7)
& dcrP=-4 & dcrC=-4 & (e3112r14>18|hgcr13>18) then do;
dcrC=-3;
r14_degIMPr4=7;
if stopcr4(i)>0 then dcrC=stopcr4(i);
end;
if e27337r4(i)=6 & (e3113r14=8 & e3113r13~=8 & e3113r12~=8 & e3113r11~=8 & e3113r10~=8 & e3113r9~=8 & e3113r8~=8 & e3113r7~=8)
& pfrP=-4 & pfrC=-4 then do;
pfrC=-3;
r14_degIMPr4=8;
if stopcr4(i)>0 then pfrC=stopcr4(i);
end;
end;
end;
do i=1 to dim(scoder3);
if clgdgr3(i)=1 & (hsr3>-4|gdr3>-4) then do;
if e27337r3(i)>=1 & (e3113r14=4 & e3113r13~=4 & e3113r12~=4 & e3113r11~=4 & e3113r10~=4 & e3113r9~=4 & e3113r8~=4 & e3113r7~=4)
& aarP=-4 & barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& aarC=-4 & barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
aarC=-3;
r14_degIMPr3=4;
if stopcr3(i)>0 then aarC=stopcr3(i);
end;
if e27337r3(i)>=3 & (e3113r14=5 & e3113r13~=5 & e3113r12~=5 & e3113r11~=5 & e3113r10~=5 & e3113r9~=5 & e3113r8~=5 & e3113r7~=5)
& barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
barC=-3;
r14_degIMPr3=5;
if stopcr3(i)>0 then barC=stopcr3(i);
end;
if e27337r3(i)>=4 & (e3113r14=6 & e3113r13~=6 & e3113r12~=6 & e3113r11~=6 & e3113r10~=6 & e3113r9~=6 & e3113r8~=6 & e3113r7~=6)
& marP=-4 & dcrP=-4 & pfrP=-4
& marC=-4 & dcrC=-4 & pfrC=-4 then do;
marC=-3;
r14_degIMPr3=6;
if stopcr3(i)>0 then marC=stopcr3(i);
end;
if e27337r3(i)=5 & (e3113r14=7 & e3113r13~=7 & e3113r12~=7 & e3113r11~=7 & e3113r10~=7 & e3113r9~=7 & e3113r8~=7 & e3113r7~=7)
& dcrP=-4 & dcrC=-4 & (e3112r14>18|hgcr13>18) then do;
dcrC=-3;
r14_degIMPr3=7;
if stopcr3(i)>0 then dcrC=stopcr3(i);
end;
if e27337r3(i)=6 & (e3113r14=8 & e3113r13~=8 & e3113r12~=8 & e3113r11~=8 & e3113r10~=8 & e3113r9~=8 & e3113r8~=8 & e3113r7~=8)
& pfrP=-4 & pfrC=-4 then do;
pfrC=-3;
r14_degIMPr3=8;
if stopcr3(i)>0 then pfrC=stopcr3(i);
end;
end;
end;
do i=1 to dim(scoder2);
if clgdgr2(i)=1 & (hsr2>-4|gdr2>-4) then do;
if e27337r2(i)>=1 & (e3113r14=4 & e3113r13~=4 & e3113r12~=4 & e3113r11~=4 & e3113r10~=4 & e3113r9~=4 & e3113r8~=4 & e3113r7~=4)
& aarP=-4 & barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& aarC=-4 & barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
aarC=-3;
r14_degIMPr2=4;
if stopcr2(i)>0 then aarC=stopcr2(i);
end;
if e27337r2(i)>=3 & (e3113r14=5 & e3113r13~=5 & e3113r12~=5 & e3113r11~=5 & e3113r10~=5 & e3113r9~=5 & e3113r8~=5 & e3113r7~=5)
& barP=-4 & marP=-4 & dcrP=-4 & pfrP=-4
& barC=-4 & marC=-4 & dcrC=-4 & pfrC=-4 then do;
barC=-3;
r14_degIMPr2=5;
if stopcr2(i)>0 then barC=stopcr2(i);
end;
if e27337r2(i)>=4 & (e3113r14=6 & e3113r13~=6 & e3113r12~=6 & e3113r11~=6 & e3113r10~=6 & e3113r9~=6 & e3113r8~=6 & e3113r7~=6)
& marP=-4 & dcrP=-4 & pfrP=-4
& marC=-4 & dcrC=-4 & pfrC=-4 then do;
marC=-3;
r14_degIMPr2=6;
if stopcr2(i)>0 then marC=stopcr2(i);
end;
if e27337r2(i)=5 & (e3113r14=7 & e3113r13~=7 & e3113r12~=7 & e3113r11~=7 & e3113r10~=7 & e3113r9~=7 & e3113r8~=7 & e3113r7~=7)
& dcrP=-4 & dcrC=-4 & (e3112r14>18|hgcr13>18) then do;
dcrC=-3;
r14_degIMPr2=7;
if stopcr2(i)>0 then dcrC=stopcr2(i);
end;
if e27337r2(i)=6 & (e3113r14=8 & e3113r13~=8 & e3113r12~=8 & e3113r11~=8 & e3113r10~=8 & e3113r9~=8 & e3113r8~=8 & e3113r7~=8)
& pfrP=-4 & pfrC=-4 then do;
pfrC=-3;
r14_degIMPr2=8;
if stopcr2(i)>0 then pfrC=stopcr2(i);
end;
end;
end;
** If we have no or bad information about receipt of GED then we use the same technique as above to
impute the date of receipt of GED if the conditions mentioned above are satisfied. Of course, here
we do not use the restriction of having decided on a major.;
do i=1 to dim(scoder14);
if gdrC<=0 & e3113r14=2 & e23450r14(i)<=0 & lftscr14(i)=1 & scoder14(i) in (4,5,6) & e27337r14(i)=9
then do;
gdrC=-3;
r14_degIMPr14=2;
if stopcr14(i)>0 then gdrC=stopcr14(i);
end;
end;
** If we have no or bad information about receipt of H.S.Diploma then we use the same technique as above
to impute the date of receipt of H.S.Diploma if the conditions mentioned above are satisfied. Of
course, here we do not use the restriction of having decided on a major.;
do i=1 to dim(scoder14);
if hsrP<=-4 & hsrC<=0 & e3113r14=3 & e23450r14(i)<=0 & lftscr14(i)=1 & scoder14(i) in (1,2,3) then do;
hsrC=-3;
r14_degIMPr14=3;
if stopcr14(i)~=. then hsrC=stopcr14(i);
end;
end;
** Taking care of missing BA/BS degree information when R enrolls in a MA/MS program in the same school
where R was enrolled in a BA/BS program.;
do i=1 to dim(schidr14);
if e23450r14(i)<=0 & e3113r14=5 & barC=-4 & scoder14(i) in (4,5,6) & e27337r14(i) in (4,5,6) then do;
if e3112r13~=-5 then do;
do j=1 to dim(schidr13);
if schidr13(j)=schidr14(i) & scoder13(j)=5 & e27337r13(j)=3 & anymjr13(j)~=0 then do;
barC=-3;
r14_degIMPr13=5;
newBA=14;
end;
end;
end;
if e3112r13=-5 & e3112r12~=-5 then do;
do j=1 to dim(schidr12);
if schidr12(j)=schidr14(i) & scoder12(j)=5 & e27337r12(j)=3 & anymjr12(j)~=0 then do;
barC=-3;
r14_degIMPr12=5;
newBA=14;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11~=-5 then do;
do j=1 to dim(schidr11);
if schidr11(j)=schidr14(i) & scoder11(j)=5 & e27337r11(j)=3 & anymjr11(j)~=0 then do;
barC=-3;
r14_degIMPr11=5;
newBA=14;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10~=-5 then do;
do j=1 to dim(schidr10);
if schidr10(j)=schidr14(i) & scoder10(j)=5 & e27337r10(j)=3 & anymjr10(j)~=0 then do;
barC=-3;
r14_degIMPr10=5;
newBA=14;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9~=-5 then do;
do j=1 to dim(schidr9);
if schidr9(j)=schidr14(i) & scoder9(j)=5 & e27337r9(j)=3 & anymjr9(j)~=0 then do;
barC=-3;
r14_degIMPr9=5;
newBA=14;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9=-5 & e3112r8~=-5 then do;
do j=1 to dim(schidr8);
if schidr8(j)=schidr14(i) & scoder8(j)=5 & e27337r8(j)=3 & anymjr8(j)~=0 then do;
barC=-3;
r14_degIMPr8=5;
newBA=14;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9=-5 & e3112r8=-5 & e3112r7~=-5 then do;
do j=1 to dim(schidr7);
if schidr7(j)=schidr14(i) & scoder7(j)=5 & e27337r7(j)=3 & anymjr7(j)~=0 then do;
barC=-3;
r14_degIMPr7=5;
newBA=14;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9=-5 & e3112r8=-5 & e3112r7=-5 & e3112r6~=-5 then do;
do j=1 to dim(schidr6);
if schidr6(j)=schidr14(i) & scoder6(j)=5 & e27337r6(j)=3 & anymjr6(j)~=0 then do;
barC=-3;
r14_degIMPr6=5;
newBA=14;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9=-5 & e3112r8=-5 & e3112r7=-5 & e3112r6=-5 & e3112r5~=-5 then do;
do j=1 to dim(schidr5);
if schidr5(j)=schidr14(i) & scoder5(j)=5 & e27337r5(j)=3 & anymjr5(j)~=0 then do;
barC=-3;
r14_degIMPr5=5;
newBA=14;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9=-5 & e3112r8=-5 & e3112r7=-5 & e3112r6=-5 & e3112r5=-5 & e3112r4~=-5 then do;
do j=1 to dim(schidr4);
if schidr4(j)=schidr14(i) & scoder4(j)=5 & e27337r4(j)=3 & anymjr4(j)~=0 then do;
barC=-3;
r14_degIMPr4=5;
newBA=14;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9=-5 & e3112r8=-5 & e3112r7=-5 & e3112r6=-5 & e3112r5=-5 & e3112r4=-5 & e3112r3~=-5 then do;
do j=1 to dim(schidr3);
if schidr3(j)=schidr14(i) & scoder3(j)=5 & e27337r3(j)=3 & anymjr3(j)~=0 then do;
barC=-3;
r14_degIMPr3=5;
newBA=14;
end;
end;
end;
if e3112r13=-5 & e3112r12=-5 & e3112r11=-5 & e3112r10=-5 & e3112r9=-5 & e3112r8=-5 & e3112r7=-5 & e3112r6=-5 & e3112r5=-5 & e3112r4=-5 & e3112r3=-5 & e3112r2~=-5
then do;
do j=1 to dim(schidr2);
if schidr2(j)=schidr14(i) & scoder2(j)=5 & e27337r2(j)=3 & anymjr2(j)~=0 then do;
barC=-3;
r14_degIMPr2=5;
newBA=14;
end;
end;
end;
end;
end;
*** Convert all -1 & -2s to -3.;
do i=1 to 7;
if CRP(i) in (-1,-2) then CRP(i)=-3;
if CRC(i) in (-1,-2) then CRC(i)=-3;
if CRC_noIMP(i) in (-1,-2) then CRC_noIMP(i)=-3;
end;
*** Check if there is some conflict between information from the current round and that available from
previous rounds.;
do i=1 to 7;
if CRC(i)>0 and CRP(i)>0 & CRC(i)~=CRP(i) then FLG(i)=1;
if CRP(i)>0 and CRC(i)=-3 then FLG(i)=2;
if CRC(i)>0 and CRP(i)=-3 then FLG(i)=3;
end;
*** Merge the results from previous rounds.;
if e3112r14 ne -5 then do;
do i=1 to 7;
if FLG(i)=0 then do;
if CRP(i)~=-4 then CDT(i)=CRP(i);
if CRC(i)~=-4 then CDT(i)=CRC(i);
end;
end;
end;
** If two dates are available for any degree - one from previous rounds and one from this then resolve
the conflict. To resolve the conflict.:
(i) Take the date reported in the earlier round if both dates are valid. If AA or higher have two
valid dates then that is not necessarily a data or questionnaire mistake. A person may have
received the same type of degree in different majors. But it is a data inconsisteny issue if R
reports receiving the same type of degree in the same major from the same institution. So these
must be looked at case by case
(ii) Only the valid date if only one of them is a valid date.;
do i=1 to 7;
if FLG(i) in (1,2) then CDT(i)=CRP(i);
if FLG(i)=3 then CDT(i)=CRC(i);
end;
if barP>-4 & newBA=14 then newBA=0;
if cdtBA>-3 & newBA=14 then newBA=0;
*** Compute degrees received and highest degree received variables from CDT & YSCH-23450;
if e3112r14 ne -5 then do;
hgdegr14=1;
do i=1 to 7;
DEG(i)=0;
if CDT(i)>-4 then do;
DEG(i)=1;
hgdegr14=i+1;
end;
end;
end;
do i=1 to dim(e23450r14);
if e23450r14(i) in (-1, -2, -3) then hgdegr14=-3; * If degree received cannot be determined;
end;
*** Compute dummy to check if highest degree computed from CDT and that reported in YSCH-3113 are
the same;
if e3113r14=hgdegr14 & e3113r14>1 & hgdegr14>1 then do;
e3lower=0;
e3higher=0;
end;
if e3113r14~=hgdegr14 then do;
if e3113r14=1 & hgdegr14>1 then e3lower=10+hgdegr14;
if e3113r14=2 & hgdegr14>2 then e3lower=20+hgdegr14;
if e3113r14=3 & hgdegr14>3 then e3lower=30+hgdegr14;
if e3113r14=4 & hgdegr14>4 then e3lower=40+hgdegr14;
if e3113r14=5 & hgdegr14>5 then e3lower=50+hgdegr14;
if e3113r14=6 & hgdegr14>6 then e3lower=60+hgdegr14;
if e3113r14=7 & hgdegr14>7 then e3lower=70+hgdegr14;
if e3113r14=8 & hgdegr14>8 then e3lower=80+hgdegr14;
end;
if e3113r14~=hgdegr14 then do;
if hgdegr14=1 & e3113r14>1 then e3higher=10+e3113r14;
if hgdegr14=2 & e3113r14>2 then e3higher=20+e3113r14;
if hgdegr14=3 & e3113r14>3 then e3higher=30+e3113r14;
if hgdegr14=4 & e3113r14>4 then e3higher=40+e3113r14;
if hgdegr14=5 & e3113r14>5 then e3higher=50+e3113r14;
if hgdegr14=6 & e3113r14>6 then e3higher=60+e3113r14;
if hgdegr14=7 & e3113r14>7 then e3higher=70+e3113r14;
if hgdegr14=8 & e3113r14>8 then e3higher=80+e3113r14;
end;
if e3higher=12 and e13300r14=0 then e3higher=0;
if e3higher=13 and e11700r14=0 then e3higher=0;
**** START of Handedits;
do i=1 to 7;
if he13(i)=1 & e3112r14 ne -5 then do;
if (cdt(i) le 0 and crc_noIMP(i)=-4) or cdt(i) le -4 then do;
cdt(i)=cr13(i); he14(i)=1;
end;
end;
end;
**************************************************************************************;
if pubid=7949 then cdtgd=-4;
if pubid=3746 then cdtgd=-4;
if pubid=8855 then cdths=-4;
if pubid=537 then cdths=-4;
if pubid in (7897 8092) then do;
cdths=-4; he14_hs=1;
end;
if pubid in (7457 1093 4419 4455 4557 7470 7683) then cdtaa=aarc;
if pubid=2405 then do;
cdtba=barc; r8_degIMPr8=.; degIMP_round8=.;
end;
if pubid=8651 then do;
cdtba=barc; r12_degIMPr12=.; degIMP_round12=.;
end;
************************* Those who have both GED and HS dates;
if CDTHS>-4 & CDTGD>-4 then checkGEDHSD=1;
do over e11700;
if e11700=1 then HS_ever_r14=1;
end;
do over t7000; if t7000=4 then GED_t7000_r14=1; end;
do over e27337; if e27337=9 then GED_27337_r14=1; end;
do over e23450; if e23450=9 then GED_23450_r14=1; end;
do over e13300; if e13300=1 then GED_13300_r14=1; end;
if GED_t7000_r14=1 or GED_27337_r14=1 or GED_23450_r14=1 or GED_13300_r14=1 then GED_ever_r14=1;
if pubid in (2001 2019 2457 2991 3174 5149 6288 6598 7131 7878 8377 8737) then do;
cdths=-4;
hs_gone_ged_r14=1;
end;
************************ Those who has "e3higher ne 0". ;
if pubid=1054 then do;
cdtgd=360; r14_degIMPr14=2;
end;
if pubid=6345 then cdths=245;
if pubid=977 then do;
cdtba=-3; he14_ba=1;
cdtma=360; he14_ma=1;
end;
if pubid=3641 then do;
cdtba=-3; he14_ba=1;
end;
if pubid in (340 6385) then do;
cdtba=-3; he14_ba=1;
end;
if pubid=2855 then do;
cdtba=370; he14_ba=1;
end;
if pubid=2384 then do;
cdtpf=317; he14_pf=1;
end;
if pubid in (2493 3349) then do;
cdtpf=cdtdc; cdtdc=-4;
end;
************************ hand edit those whose e3lower is positive and the degree date was imputed in previous rounds.;
if pubid=336 then do;
cdtpf=-4; r13_degIMPr13=.; degIMP_round13=.;
end;
if pubid=3295 then do;
cdtaa=-4; r13_degIMPr9=.; degIMP_round13=.;
end;
if pubid=3592 then do;
cdtaa=-4; r13_degIMPr7=.; degIMP_round13=.;
end;
if pubid=5806 then do;
cdtaa=-4; r13_degIMPr13=.; degIMP_round13=.;
end;
if pubid=6997 then do;
cdtma=-4; r12_degIMPr12=.; degIMP_round12=.;
end;
************************* degree date imputed in round 14;
if pubid=1250 then do;
cdtaa=-4; r14_degIMPr14=.; degIMP_round14=.;
end;
if pubid in (2079 7846) then do;
cdtma=-4; r14_degIMPr14=.; degIMP_round14=.;
end;
if pubid=3507 then do;
cdtaa=-4; r14_degIMPr6=.; degIMP_round14=.;
end;
if pubid=3666 then do;
cdtaa=-4; r14_degIMPr13=.; degIMP_round14=.;
end;
if pubid=7147 then do;
cdtaa=-4; r14_degIMPr4=.; degIMP_round14=.;
end;
if pubid=7173 then do;
cdtaa=-4; r14_degIMPr5=.; degIMP_round14=.;
end;
if pubid in (1750 2001 1750) then do;
r14_degIMPr14=.; degIMP_round14=.;
end;
************************* HE resulted when we check the cases from HGC_R13.sas;
if pubid=1112 then do;
cdths=246; he14_hs=1;
end;
if pubid=3452 then do;
cdths=269; he14_hs=1;
end;
if pubid=5761 then do;
cdths=-3; he14_hs=1;
end;
if pubid=3291 then do;
cdths=-4; he14_hs=1;
end;
if pubid=7247 then do;
cdtgd=-4; he14_gd=1;
end;
************************* end of the final hand edits;
endsas;