Date Received Diploma or Degree - Appendix 1

National Longitudinal Survey of Youth - 1997 Cohort

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:

  1. 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.
  2. 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.
  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;