/*Class of worker code: provides the class of worker for each job QNAME=YEMP_COW */ PUBID_1997 = 'PUBID'n YEMP-58500.01_1997 = 'cow_01_1997'n YEMP-58500.02_1997 = 'cow_02_1997'n YEMP-58500.03_1997 = 'cow_03_1997'n YEMP-58500.04_1997 = 'cow_04_1997'n YEMP-58500.05_1997 = 'cow_05_1997'n YEMP-58500.06_1997 = 'cow_06_1997'n YEMP-58500.07_1997 = 'cow_07_1997'n YEMP_UID.01_1997 = 'UID_01_1997'n YEMP_UID.02_1997 = 'UID_02_1997'n YEMP_UID.03_1997 = 'UID_03_1997'n YEMP_UID.04_1997 = 'UID_04_1997'n YEMP_UID.05_1997 = 'UID_05_1997'n YEMP_UID.06_1997 = 'UID_06_1997'n YEMP_UID.07_1997 = 'UID_07_1997'n YEMP-58500.01_1998 = 'cow_01_1998'n YEMP-58500.02_1998 = 'cow_02_1998'n YEMP-58500.03_1998 = 'cow_03_1998'n YEMP-58500.04_1998 = 'cow_04_1998'n YEMP-58500.05_1998 = 'cow_05_1998'n YEMP-58500.06_1998 = 'cow_06_1998'n YEMP-58500.07_1998 = 'cow_07_1998'n YEMP-58500.08_1998 = 'cow_08_1998'n YEMP-58500.09_1998 = 'cow_09_1998'n YEMP_UID.01_1998 = 'UID_01_1998'n YEMP_UID.02_1998 = 'UID_02_1998'n YEMP_UID.03_1998 = 'UID_03_1998'n YEMP_UID.04_1998 = 'UID_04_1998'n YEMP_UID.05_1998 = 'UID_05_1998'n YEMP_UID.06_1998 = 'UID_06_1998'n YEMP_UID.07_1998 = 'UID_07_1998'n YEMP_UID.08_1998 = 'UID_08_1998'n YEMP_UID.09_1998 = 'UID_09_1998'n YEMP-58500.01_1999 = 'cow_01_1999'n YEMP-58500.02_1999 = 'cow_02_1999'n YEMP-58500.03_1999 = 'cow_03_1999'n YEMP-58500.04_1999 = 'cow_04_1999'n YEMP-58500.05_1999 = 'cow_05_1999'n YEMP-58500.06_1999 = 'cow_06_1999'n YEMP-58500.07_1999 = 'cow_07_1999'n YEMP-58500.08_1999 = 'cow_08_1999'n YEMP-58500.09_1999 = 'cow_09_1999'n YEMP_UID.01_1999 = 'UID_01_1999'n YEMP_UID.02_1999 = 'UID_02_1999'n YEMP_UID.03_1999 = 'UID_03_1999'n YEMP_UID.04_1999 = 'UID_04_1999'n YEMP_UID.05_1999 = 'UID_05_1999'n YEMP_UID.06_1999 = 'UID_06_1999'n YEMP_UID.07_1999 = 'UID_07_1999'n YEMP_UID.08_1999 = 'UID_08_1999'n YEMP_UID.09_1999 = 'UID_09_1999'n YEMP-58500.01_2000 = 'cow_01_2000'n YEMP-58500.02_2000 = 'cow_02_2000'n YEMP-58500.03_2000 = 'cow_03_2000'n YEMP-58500.04_2000 = 'cow_04_2000'n YEMP-58500.05_2000 = 'cow_05_2000'n YEMP-58500.06_2000 = 'cow_06_2000'n YEMP-58500.07_2000 = 'cow_07_2000'n YEMP-58500.08_2000 = 'cow_08_2000'n YEMP-58500.09_2000 = 'cow_09_2000'n YEMP_SELFEMP.01_2000 = 'self_01_2000'n YEMP_SELFEMP.02_2000 = 'self_02_2000'n YEMP_SELFEMP.03_2000 = 'self_03_2000'n YEMP_SELFEMP.04_2000 = 'self_04_2000'n YEMP_SELFEMP.05_2000 = 'self_05_2000'n YEMP_SELFEMP.06_2000 = 'self_06_2000'n YEMP_SELFEMP.07_2000 = 'self_07_2000'n YEMP_SELFEMP.08_2000 = 'self_08_2000'n YEMP_SELFEMP.09_2000 = 'self_09_2000'n YEMP_UID.01_2000 = 'UID_01_2000'n YEMP_UID.02_2000 = 'UID_02_2000'n YEMP_UID.03_2000 = 'UID_03_2000'n YEMP_UID.04_2000 = 'UID_04_2000'n YEMP_UID.05_2000 = 'UID_05_2000'n YEMP_UID.06_2000 = 'UID_06_2000'n YEMP_UID.07_2000 = 'UID_07_2000'n YEMP_UID.08_2000 = 'UID_08_2000'n YEMP_UID.09_2000 = 'UID_09_2000'n YEMP-58500.01_2001 = 'cow_01_2001'n YEMP-58500.02_2001 = 'cow_02_2001'n YEMP-58500.03_2001 = 'cow_03_2001'n YEMP-58500.04_2001 = 'cow_04_2001'n YEMP-58500.05_2001 = 'cow_05_2001'n YEMP-58500.06_2001 = 'cow_06_2001'n YEMP-58500.07_2001 = 'cow_07_2001'n YEMP_SELFEMP.01_2001 = 'self_01_2001'n YEMP_SELFEMP.02_2001 = 'self_02_2001'n YEMP_SELFEMP.03_2001 = 'self_03_2001'n YEMP_SELFEMP.04_2001 = 'self_04_2001'n YEMP_SELFEMP.05_2001 = 'self_05_2001'n YEMP_SELFEMP.06_2001 = 'self_06_2001'n YEMP_SELFEMP.07_2001 = 'self_07_2001'n YEMP_SELFEMP.08_2001 = 'self_08_2001'n YEMP_UID.01_2001 = 'UID_01_2001'n YEMP_UID.02_2001 = 'UID_02_2001'n YEMP_UID.03_2001 = 'UID_03_2001'n YEMP_UID.04_2001 = 'UID_04_2001'n YEMP_UID.05_2001 = 'UID_05_2001'n YEMP_UID.06_2001 = 'UID_06_2001'n YEMP_UID.07_2001 = 'UID_07_2001'n YEMP_UID.08_2001 = 'UID_08_2001'n YEMP-58500.01_2002 = 'cow_01_2002'n YEMP-58500.02_2002 = 'cow_02_2002'n YEMP-58500.03_2002 = 'cow_03_2002'n YEMP-58500.04_2002 = 'cow_04_2002'n YEMP-58500.05_2002 = 'cow_05_2002'n YEMP-58500.06_2002 = 'cow_06_2002'n YEMP-58500.07_2002 = 'cow_07_2002'n YEMP-58500.08_2002 = 'cow_08_2002'n YEMP-58500.09_2002 = 'cow_09_2002'n YEMP-58500.10_2002 = 'cow_10_2002'n YEMP-58500.11_2002 = 'cow_11_2002'n YEMP_SELFEMP.01_2002 = 'self_01_2002'n YEMP_SELFEMP.02_2002 = 'self_02_2002'n YEMP_SELFEMP.03_2002 = 'self_03_2002'n YEMP_SELFEMP.04_2002 = 'self_04_2002'n YEMP_SELFEMP.05_2002 = 'self_05_2002'n YEMP_SELFEMP.06_2002 = 'self_06_2002'n YEMP_SELFEMP.07_2002 = 'self_07_2002'n YEMP_SELFEMP.08_2002 = 'self_08_2002'n YEMP_SELFEMP.09_2002 = 'self_09_2002'n YEMP_SELFEMP.10_2002 = 'self_10_2002'n YEMP_SELFEMP.11_2002 = 'self_11_2002'n YEMP_UID.01_2002 = 'UID_01_2002'n YEMP_UID.02_2002 = 'UID_02_2002'n YEMP_UID.03_2002 = 'UID_03_2002'n YEMP_UID.04_2002 = 'UID_04_2002'n YEMP_UID.05_2002 = 'UID_05_2002'n YEMP_UID.06_2002 = 'UID_06_2002'n YEMP_UID.07_2002 = 'UID_07_2002'n YEMP_UID.08_2002 = 'UID_08_2002'n YEMP_UID.09_2002 = 'UID_09_2002'n YEMP_UID.10_2002 = 'UID_10_2002'n YEMP_UID.11_2002 = 'UID_11_2002'n YEMP-58500.01_2003 = 'cow_01_2003'n YEMP-58500.02_2003 = 'cow_02_2003'n YEMP-58500.03_2003 = 'cow_03_2003'n YEMP-58500.04_2003 = 'cow_04_2003'n YEMP-58500.05_2003 = 'cow_05_2003'n YEMP-58500.06_2003 = 'cow_06_2003'n YEMP-58500.07_2003 = 'cow_07_2003'n YEMP-58500.08_2003 = 'cow_08_2003'n YEMP-58500.09_2003 = 'cow_09_2003'n YEMP_SELFEMP.01_2003 = 'self_01_2003'n YEMP_SELFEMP.02_2003 = 'self_02_2003'n YEMP_SELFEMP.03_2003 = 'self_03_2003'n YEMP_SELFEMP.04_2003 = 'self_04_2003'n YEMP_SELFEMP.05_2003 = 'self_05_2003'n YEMP_SELFEMP.06_2003 = 'self_06_2003'n YEMP_SELFEMP.07_2003 = 'self_07_2003'n YEMP_SELFEMP.08_2003 = 'self_08_2003'n YEMP_SELFEMP.09_2003 = 'self_09_2003'n YEMP_SELFEMP.10_2003 = 'self_10_2003'n YEMP_UID.01_2003 = 'UID_01_2003'n YEMP_UID.02_2003 = 'UID_02_2003'n YEMP_UID.03_2003 = 'UID_03_2003'n YEMP_UID.04_2003 = 'UID_04_2003'n YEMP_UID.05_2003 = 'UID_05_2003'n YEMP_UID.06_2003 = 'UID_06_2003'n YEMP_UID.07_2003 = 'UID_07_2003'n YEMP_UID.08_2003 = 'UID_08_2003'n YEMP_UID.09_2003 = 'UID_09_2003'n YEMP_UID.10_2003 = 'UID_10_2003'n YEMP-58500.01_2004 = 'cow_01_2004'n YEMP-58500.02_2004 = 'cow_02_2004'n YEMP-58500.03_2004 = 'cow_03_2004'n YEMP-58500.04_2004 = 'cow_04_2004'n YEMP-58500.05_2004 = 'cow_05_2004'n YEMP-58500.06_2004 = 'cow_06_2004'n YEMP-58500.07_2004 = 'cow_07_2004'n YEMP_UID.01_2004 = 'UID_01_2004'n YEMP_UID.02_2004 = 'UID_02_2004'n YEMP_UID.03_2004 = 'UID_03_2004'n YEMP_UID.04_2004 = 'UID_04_2004'n YEMP_UID.05_2004 = 'UID_05_2004'n YEMP_UID.06_2004 = 'UID_06_2004'n YEMP_UID.07_2004 = 'UID_07_2004'n YEMP_SELFEMP.01_2004 = 'self_01_2004'n YEMP_SELFEMP.02_2004 = 'self_02_2004'n YEMP_SELFEMP.03_2004 = 'self_03_2004'n YEMP_SELFEMP.04_2004 = 'self_04_2004'n YEMP_SELFEMP.05_2004 = 'self_05_2004'n YEMP_SELFEMP.06_2004 = 'self_06_2004'n YEMP_SELFEMP.07_2004 = 'self_07_2004'n YEMP-58500.01_2005 = 'cow_01_2005'n YEMP-58500.02_2005 = 'cow_02_2005'n YEMP-58500.03_2005 = 'cow_03_2005'n YEMP-58500.04_2005 = 'cow_04_2005'n YEMP-58500.05_2005 = 'cow_05_2005'n YEMP-58500.06_2005 = 'cow_06_2005'n YEMP-58500.07_2005 = 'cow_07_2005'n YEMP-58500.08_2005 = 'cow_08_2005'n YEMP_UID.01_2005 = 'UID_01_2005'n YEMP_UID.02_2005 = 'UID_02_2005'n YEMP_UID.03_2005 = 'UID_03_2005'n YEMP_UID.04_2005 = 'UID_04_2005'n YEMP_UID.05_2005 = 'UID_05_2005'n YEMP_UID.06_2005 = 'UID_06_2005'n YEMP_UID.07_2005 = 'UID_07_2005'n YEMP_UID.08_2005 = 'UID_08_2005'n YEMP_UID.09_2005 = 'UID_09_2005'n YEMP_SELFEMP.01_2005 = 'self_01_2005'n YEMP_SELFEMP.02_2005 = 'self_02_2005'n YEMP_SELFEMP.03_2005 = 'self_03_2005'n YEMP_SELFEMP.04_2005 = 'self_04_2005'n YEMP_SELFEMP.05_2005 = 'self_05_2005'n YEMP_SELFEMP.06_2005 = 'self_06_2005'n YEMP_SELFEMP.07_2005 = 'self_07_2005'n YEMP_SELFEMP.08_2005 = 'self_08_2005'n YEMP_SELFEMP.09_2005 = 'self_09_2005'n YEMP-58500.01_2006 = 'cow_01_2006'n YEMP-58500.02_2006 = 'cow_02_2006'n YEMP-58500.03_2006 = 'cow_03_2006'n YEMP-58500.04_2006 = 'cow_04_2006'n YEMP-58500.05_2006 = 'cow_05_2006'n YEMP-58500.06_2006 = 'cow_06_2006'n YEMP-58500.07_2006 = 'cow_07_2006'n YEMP-58500.08_2006 = 'cow_08_2006'n YEMP-58500.09_2006 = 'cow_09_2006'n YEMP_UID.01_2006 = 'UID_01_2006'n YEMP_UID.02_2006 = 'UID_02_2006'n YEMP_UID.03_2006 = 'UID_03_2006'n YEMP_UID.04_2006 = 'UID_04_2006'n YEMP_UID.05_2006 = 'UID_05_2006'n YEMP_UID.06_2006 = 'UID_06_2006'n YEMP_UID.07_2006 = 'UID_07_2006'n YEMP_UID.08_2006 = 'UID_08_2006'n YEMP_UID.09_2006 = 'UID_09_2006'n YEMP_SELFEMP.01_2006 = 'self_01_2006'n YEMP_SELFEMP.02_2006 = 'self_02_2006'n YEMP_SELFEMP.03_2006 = 'self_03_2006'n YEMP_SELFEMP.04_2006 = 'self_04_2006'n YEMP_SELFEMP.05_2006 = 'self_05_2006'n YEMP_SELFEMP.06_2006 = 'self_06_2006'n YEMP_SELFEMP.07_2006 = 'self_07_2006'n YEMP_SELFEMP.08_2006 = 'self_08_2006'n YEMP_SELFEMP.09_2006 = 'self_09_2006'n YEMP-58500.01_2007 = 'cow_01_2007'n YEMP-58500.02_2007 = 'cow_02_2007'n YEMP-58500.03_2007 = 'cow_03_2007'n YEMP-58500.04_2007 = 'cow_04_2007'n YEMP-58500.05_2007 = 'cow_05_2007'n YEMP-58500.06_2007 = 'cow_06_2007'n YEMP-58500.07_2007 = 'cow_07_2007'n YEMP-58500.08_2007 = 'cow_08_2007'n YEMP_UID.01_2007 = 'UID_01_2007'n YEMP_UID.02_2007 = 'UID_02_2007'n YEMP_UID.03_2007 = 'UID_03_2007'n YEMP_UID.04_2007 = 'UID_04_2007'n YEMP_UID.05_2007 = 'UID_05_2007'n YEMP_UID.06_2007 = 'UID_06_2007'n YEMP_UID.07_2007 = 'UID_07_2007'n YEMP_UID.08_2007 = 'UID_08_2007'n YEMP_SELFEMP.01_2007 = 'self_01_2007'n YEMP_SELFEMP.02_2007 = 'self_02_2007'n YEMP_SELFEMP.03_2007 = 'self_03_2007'n YEMP_SELFEMP.04_2007 = 'self_04_2007'n YEMP_SELFEMP.05_2007 = 'self_05_2007'n YEMP_SELFEMP.06_2007 = 'self_06_2007'n YEMP_SELFEMP.07_2007 = 'self_07_2007'n YEMP_SELFEMP.08_2007 = 'self_08_2007'n YEMP-58500.01_2008 = 'cow_01_2008'n YEMP-58500.02_2008 = 'cow_02_2008'n YEMP-58500.03_2008 = 'cow_03_2008'n YEMP-58500.04_2008 = 'cow_04_2008'n YEMP-58500.05_2008 = 'cow_05_2008'n YEMP-58500.06_2008 = 'cow_06_2008'n YEMP-58500.07_2008 = 'cow_07_2008'n YEMP-58500.08_2008 = 'cow_08_2008'n YEMP_UID.01_2008 = 'UID_01_2008'n YEMP_UID.02_2008 = 'UID_02_2008'n YEMP_UID.03_2008 = 'UID_03_2008'n YEMP_UID.04_2008 = 'UID_04_2008'n YEMP_UID.05_2008 = 'UID_05_2008'n YEMP_UID.06_2008 = 'UID_06_2008'n YEMP_UID.07_2008 = 'UID_07_2008'n YEMP_UID.08_2008 = 'UID_08_2008'n YEMP_SELFEMP.01_2008 = 'self_01_2008'n YEMP_SELFEMP.02_2008 = 'self_02_2008'n YEMP_SELFEMP.03_2008 = 'self_03_2008'n YEMP_SELFEMP.04_2008 = 'self_04_2008'n YEMP_SELFEMP.05_2008 = 'self_05_2008'n YEMP_SELFEMP.06_2008 = 'self_06_2008'n YEMP_SELFEMP.07_2008 = 'self_07_2008'n YEMP_SELFEMP.08_2008 = 'self_08_2008'n YEMP-58500.01_2009 = 'cow_01_2009'n YEMP-58500.02_2009 = 'cow_02_2009'n YEMP-58500.03_2009 = 'cow_03_2009'n YEMP-58500.04_2009 = 'cow_04_2009'n YEMP-58500.05_2009 = 'cow_05_2009'n YEMP-58500.06_2009 = 'cow_06_2009'n YEMP-58500.07_2009 = 'cow_07_2009'n YEMP-58500.08_2009 = 'cow_08_2009'n YEMP_UID.01_2009 = 'UID_01_2009'n YEMP_UID.02_2009 = 'UID_02_2009'n YEMP_UID.03_2009 = 'UID_03_2009'n YEMP_UID.04_2009 = 'UID_04_2009'n YEMP_UID.05_2009 = 'UID_05_2009'n YEMP_UID.06_2009 = 'UID_06_2009'n YEMP_UID.07_2009 = 'UID_07_2009'n YEMP_UID.08_2009 = 'UID_08_2009'n YEMP_UID.09_2009 = 'UID_09_2009'n YEMP_SELFEMP.01_2009 = 'self_01_2009'n YEMP_SELFEMP.02_2009 = 'self_02_2009'n YEMP_SELFEMP.03_2009 = 'self_03_2009'n YEMP_SELFEMP.04_2009 = 'self_04_2009'n YEMP_SELFEMP.05_2009 = 'self_05_2009'n YEMP_SELFEMP.06_2009 = 'self_06_2009'n YEMP_SELFEMP.07_2009 = 'self_07_2009'n YEMP_SELFEMP.08_2009 = 'self_08_2009'n YEMP_SELFEMP.09_2009 = 'self_09_2009'n YEMP-58500.01_2010 = 'cow_01_2010'n YEMP-58500.02_2010 = 'cow_02_2010'n YEMP-58500.03_2010 = 'cow_03_2010'n YEMP-58500.04_2010 = 'cow_04_2010'n YEMP-58500.05_2010 = 'cow_05_2010'n YEMP-58500.06_2010 = 'cow_06_2010'n YEMP-58500.07_2010 = 'cow_07_2010'n YEMP-58500.08_2010 = 'cow_08_2010'n YEMP_UID.01_2010 = 'UID_01_2010'n YEMP_UID.02_2010 = 'UID_02_2010'n YEMP_UID.03_2010 = 'UID_03_2010'n YEMP_UID.04_2010 = 'UID_04_2010'n YEMP_UID.05_2010 = 'UID_05_2010'n YEMP_UID.06_2010 = 'UID_06_2010'n YEMP_UID.07_2010 = 'UID_07_2010'n YEMP_UID.08_2010 = 'UID_08_2010'n YEMP_UID.09_2010 = 'UID_09_2010'n YEMP_SELFEMP.01_2010 = 'self_01_2010'n YEMP_SELFEMP.02_2010 = 'self_02_2010'n YEMP_SELFEMP.03_2010 = 'self_03_2010'n YEMP_SELFEMP.04_2010 = 'self_04_2010'n YEMP_SELFEMP.05_2010 = 'self_05_2010'n YEMP_SELFEMP.06_2010 = 'self_06_2010'n YEMP_SELFEMP.07_2010 = 'self_07_2010'n YEMP_SELFEMP.08_2010 = 'self_08_2010'n YEMP_SELFEMP.09_2010 = 'self_09_2010'n YEMP-58500.01_2011 = 'cow_01_2011'n YEMP-58500.02_2011 = 'cow_02_2011'n YEMP-58500.03_2011 = 'cow_03_2011'n YEMP-58500.04_2011 = 'cow_04_2011'n YEMP-58500.05_2011 = 'cow_05_2011'n YEMP-58500.06_2011 = 'cow_06_2011'n YEMP-58500.07_2011 = 'cow_07_2011'n YEMP-58500.08_2011 = 'cow_08_2011'n YEMP-58500.09_2011 = 'cow_09_2011'n YEMP-58500.10_2011 = 'cow_10_2011'n YEMP-58500.11_2011 = 'cow_11_2011'n YEMP-58500.12_2011 = 'cow_12_2011'n YEMP_UID.01_2011 = 'UID_01_2011'n YEMP_UID.02_2011 = 'UID_02_2011'n YEMP_UID.03_2011 = 'UID_03_2011'n YEMP_UID.04_2011 = 'UID_04_2011'n YEMP_UID.05_2011 = 'UID_05_2011'n YEMP_UID.06_2011 = 'UID_06_2011'n YEMP_UID.07_2011 = 'UID_07_2011'n YEMP_UID.08_2011 = 'UID_08_2011'n YEMP_UID.09_2011 = 'UID_09_2011'n YEMP_UID.10_2011 = 'UID_10_2011'n YEMP_UID.11_2011 = 'UID_11_2011'n YEMP_UID.12_2011 = 'UID_12_2011'n YEMP_UID.13_2011 = 'UID_13_2011'n YEMP_SELFEMP.01_2011 = 'self_01_2011'n YEMP_SELFEMP.02_2011 = 'self_02_2011'n YEMP_SELFEMP.03_2011 = 'self_03_2011'n YEMP_SELFEMP.04_2011 = 'self_04_2011'n YEMP_SELFEMP.05_2011 = 'self_05_2011'n YEMP_SELFEMP.06_2011 = 'self_06_2011'n YEMP_SELFEMP.07_2011 = 'self_07_2011'n YEMP_SELFEMP.08_2011 = 'self_08_2011'n YEMP_SELFEMP.09_2011 = 'self_09_2011'n YEMP_SELFEMP.10_2011 = 'self_10_2011'n YEMP_SELFEMP.11_2011 = 'self_11_2011'n YEMP_SELFEMP.12_2011 = 'self_12_2011'n YEMP_SELFEMP.13_2011 = 'self_13_2011'n YEMP-58500.01_2013 = 'cow_01_2013'n YEMP-58500.02_2013 = 'cow_02_2013'n YEMP-58500.03_2013 = 'cow_03_2013'n YEMP-58500.04_2013 = 'cow_04_2013'n YEMP-58500.05_2013 = 'cow_05_2013'n YEMP-58500.06_2013 = 'cow_06_2013'n YEMP-58500.07_2013 = 'cow_07_2013'n YEMP-58500.08_2013 = 'cow_08_2013'n YEMP-58500.09_2013 = 'cow_09_2013'n YEMP-58500.10_2013 = 'cow_10_2013'n YEMP_UID.01_2013 = 'UID_01_2013'n YEMP_UID.02_2013 = 'UID_02_2013'n YEMP_UID.03_2013 = 'UID_03_2013'n YEMP_UID.04_2013 = 'UID_04_2013'n YEMP_UID.05_2013 = 'UID_05_2013'n YEMP_UID.06_2013 = 'UID_06_2013'n YEMP_UID.07_2013 = 'UID_07_2013'n YEMP_UID.08_2013 = 'UID_08_2013'n YEMP_UID.09_2013 = 'UID_09_2013'n YEMP_UID.10_2013 = 'UID_10_2013'n YEMP_SELFEMP.01_2013 = 'self_01_2013'n YEMP_SELFEMP.02_2013 = 'self_02_2013'n YEMP_SELFEMP.03_2013 = 'self_03_2013'n YEMP_SELFEMP.04_2013 = 'self_04_2013'n YEMP_SELFEMP.05_2013 = 'self_05_2013'n YEMP_SELFEMP.06_2013 = 'self_06_2013'n YEMP_SELFEMP.07_2013 = 'self_07_2013'n YEMP_SELFEMP.08_2013 = 'self_08_2013'n YEMP_SELFEMP.09_2013 = 'self_09_2013'n YEMP_SELFEMP.10_2013 = 'self_10_2013'n YEMP-58500.01_2015 = 'cow_01_2015'n YEMP-58500.02_2015 = 'cow_02_2015'n YEMP-58500.03_2015 = 'cow_03_2015'n YEMP-58500.04_2015 = 'cow_04_2015'n YEMP-58500.05_2015 = 'cow_05_2015'n YEMP-58500.06_2015 = 'cow_06_2015'n YEMP-58500.07_2015 = 'cow_07_2015'n YEMP-58500.08_2015 = 'cow_08_2015'n YEMP-58500.09_2015 = 'cow_09_2015'n YEMP-58500.10_2015 = 'cow_10_2015'n YEMP-58500.11_2015 = 'cow_11_2015'n YEMP-58500.12_2015 = 'cow_12_2015'n YEMP_UID.01_2015 = 'UID_01_2015'n YEMP_UID.02_2015 = 'UID_02_2015'n YEMP_UID.03_2015 = 'UID_03_2015'n YEMP_UID.04_2015 = 'UID_04_2015'n YEMP_UID.05_2015 = 'UID_05_2015'n YEMP_UID.06_2015 = 'UID_06_2015'n YEMP_UID.07_2015 = 'UID_07_2015'n YEMP_UID.08_2015 = 'UID_08_2015'n YEMP_UID.09_2015 = 'UID_09_2015'n YEMP_UID.10_2015 = 'UID_10_2015'n YEMP_UID.11_2015 = 'UID_11_2015'n YEMP_UID.12_2015 = 'UID_12_2015'n YEMP_SELFEMP.01_2015 = 'self_01_2015'n YEMP_SELFEMP.02_2015 = 'self_02_2015'n YEMP_SELFEMP.03_2015 = 'self_03_2015'n YEMP_SELFEMP.04_2015 = 'self_04_2015'n YEMP_SELFEMP.05_2015 = 'self_05_2015'n YEMP_SELFEMP.06_2015 = 'self_06_2015'n YEMP_SELFEMP.07_2015 = 'self_07_2015'n YEMP_SELFEMP.08_2015 = 'self_08_2015'n YEMP_SELFEMP.09_2015 = 'self_09_2015'n YEMP_SELFEMP.10_2015 = 'self_10_2015'n YEMP_SELFEMP.11_2015 = 'self_11_2015'n YEMP_SELFEMP.12_2015 = 'self_12_2015'n YEMP-58500.01_2017 = 'cow_01_2017'n YEMP-58500.02_2017 = 'cow_02_2017'n YEMP-58500.03_2017 = 'cow_03_2017'n YEMP-58500.04_2017 = 'cow_04_2017'n YEMP-58500.05_2017 = 'cow_05_2017'n YEMP-58500.06_2017 = 'cow_06_2017'n YEMP-58500.07_2017 = 'cow_07_2017'n YEMP-58500.08_2017 = 'cow_08_2017'n YEMP-58500.09_2017 = 'cow_09_2017'n YEMP-58500.10_2017 = 'cow_10_2017'n YEMP-58500.11_2017 = 'cow_11_2017'n YEMP-58500.12_2017 = 'cow_12_2017'n YEMP-58500.13_2017 = 'cow_13_2017'n YEMP-58500.14_2017 = 'cow_14_2017'n YEMP_UID.01_2017 = 'UID_01_2017'n YEMP_UID.02_2017 = 'UID_02_2017'n YEMP_UID.03_2017 = 'UID_03_2017'n YEMP_UID.04_2017 = 'UID_04_2017'n YEMP_UID.05_2017 = 'UID_05_2017'n YEMP_UID.06_2017 = 'UID_06_2017'n YEMP_UID.07_2017 = 'UID_07_2017'n YEMP_UID.08_2017 = 'UID_08_2017'n YEMP_UID.09_2017 = 'UID_09_2017'n YEMP_UID.10_2017 = 'UID_10_2017'n YEMP_UID.11_2017 = 'UID_11_2017'n YEMP_UID.12_2017 = 'UID_12_2017'n YEMP_UID.13_2017 = 'UID_13_2017'n YEMP_UID.14_2017 = 'UID_14_2017'n YEMP_UID.15_2017 = 'UID_15_2017'n YEMP_SELFEMP.01_2017 = 'self_01_2017'n YEMP_SELFEMP.02_2017 = 'self_02_2017'n YEMP_SELFEMP.03_2017 = 'self_03_2017'n YEMP_SELFEMP.04_2017 = 'self_04_2017'n YEMP_SELFEMP.05_2017 = 'self_05_2017'n YEMP_SELFEMP.06_2017 = 'self_06_2017'n YEMP_SELFEMP.07_2017 = 'self_07_2017'n YEMP_SELFEMP.08_2017 = 'self_08_2017'n YEMP_SELFEMP.09_2017 = 'self_09_2017'n YEMP_SELFEMP.10_2017 = 'self_10_2017'n YEMP_SELFEMP.11_2017 = 'self_11_2017'n YEMP_SELFEMP.12_2017 = 'self_12_2017'n YEMP_SELFEMP.13_2017 = 'self_13_2017'n YEMP_SELFEMP.14_2017 = 'self_14_2017'n YEMP_SELFEMP.15_2017 = 'self_15_2017'n YEMP-58500.01_2019 = 'cow_01_2019'n YEMP-58500.02_2019 = 'cow_02_2019'n YEMP-58500.03_2019 = 'cow_03_2019'n YEMP-58500.04_2019 = 'cow_04_2019'n YEMP-58500.05_2019 = 'cow_05_2019'n YEMP-58500.06_2019 = 'cow_06_2019'n YEMP-58500.07_2019 = 'cow_07_2019'n YEMP-58500.08_2019 = 'cow_08_2019'n YEMP-58500.09_2019 = 'cow_09_2019'n YEMP-58500.10_2019 = 'cow_10_2019'n YEMP_UID.01_2019 = 'UID_01_2019'n YEMP_UID.02_2019 = 'UID_02_2019'n YEMP_UID.03_2019 = 'UID_03_2019'n YEMP_UID.04_2019 = 'UID_04_2019'n YEMP_UID.05_2019 = 'UID_05_2019'n YEMP_UID.06_2019 = 'UID_06_2019'n YEMP_UID.07_2019 = 'UID_07_2019'n YEMP_UID.08_2019 = 'UID_08_2019'n YEMP_UID.09_2019 = 'UID_09_2019'n YEMP_UID.10_2019 = 'UID_10_2019'n YEMP_UID.11_2019 = 'UID_11_2019'n YEMP_SELFEMP.01_2019 = 'self_01_2019'n YEMP_SELFEMP.02_2019 = 'self_02_2019'n YEMP_SELFEMP.03_2019 = 'self_03_2019'n YEMP_SELFEMP.04_2019 = 'self_04_2019'n YEMP_SELFEMP.05_2019 = 'self_05_2019'n YEMP_SELFEMP.06_2019 = 'self_06_2019'n YEMP_SELFEMP.07_2019 = 'self_07_2019'n YEMP_SELFEMP.08_2019 = 'self_08_2019'n YEMP_SELFEMP.09_2019 = 'self_09_2019'n YEMP_SELFEMP.10_2019 = 'self_10_2019'n YEMP_SELFEMP.11_2019 = 'self_11_2019'n YEMP-58500.01_2021 = 'cow_01_2021'n YEMP-58500.02_2021 = 'cow_02_2021'n YEMP-58500.03_2021 = 'cow_03_2021'n YEMP-58500.04_2021 = 'cow_04_2021'n YEMP-58500.05_2021 = 'cow_05_2021'n YEMP-58500.06_2021 = 'cow_06_2021'n YEMP-58500.07_2021 = 'cow_07_2021'n YEMP-58500.08_2021 = 'cow_08_2021'n YEMP_UID.01_2021 = 'UID_01_2021'n YEMP_UID.02_2021 = 'UID_02_2021'n YEMP_UID.03_2021 = 'UID_03_2021'n YEMP_UID.04_2021 = 'UID_04_2021'n YEMP_UID.05_2021 = 'UID_05_2021'n YEMP_UID.06_2021 = 'UID_06_2021'n YEMP_UID.07_2021 = 'UID_07_2021'n YEMP_UID.08_2021 = 'UID_08_2021'n YEMP_UID.09_2021 = 'UID_09_2021'n YEMP_UID.10_2021 = 'UID_10_2021'n YEMP_SELFEMP.01_2021 = 'self_01_2021'n YEMP_SELFEMP.02_2021 = 'self_02_2021'n YEMP_SELFEMP.03_2021 = 'self_03_2021'n YEMP_SELFEMP.04_2021 = 'self_04_2021'n YEMP_SELFEMP.05_2021 = 'self_05_2021'n YEMP_SELFEMP.06_2021 = 'self_06_2021'n YEMP_SELFEMP.07_2021 = 'self_07_2021'n YEMP_SELFEMP.08_2021 = 'self_08_2021'n YEMP_SELFEMP.09_2021 = 'self_09_2021'n YEMP_SELFEMP.10_2021 = 'self_10_2021'n YEMP-58500.01_2023 = 'cow_01_2023'n YEMP-58500.02_2023 = 'cow_02_2023'n YEMP-58500.03_2023 = 'cow_03_2023'n YEMP-58500.04_2023 = 'cow_04_2023'n YEMP-58500.05_2023 = 'cow_05_2023'n YEMP-58500.06_2023 = 'cow_06_2023'n YEMP-58500.07_2023 = 'cow_07_2023'n YEMP-58500.08_2023 = 'cow_08_2023'n YEMP-58500.09_2023 = 'cow_09_2023'n YEMP_UID.01_2023 = 'UID_01_2023'n YEMP_UID.02_2023 = 'UID_02_2023'n YEMP_UID.03_2023 = 'UID_03_2023'n YEMP_UID.04_2023 = 'UID_04_2023'n YEMP_UID.05_2023 = 'UID_05_2023'n YEMP_UID.06_2023 = 'UID_06_2023'n YEMP_UID.07_2023 = 'UID_07_2023'n YEMP_UID.08_2023 = 'UID_08_2023'n YEMP_UID.09_2023 = 'UID_09_2023'n YEMP_UID.10_2023 = 'UID_10_2023'n YEMP_SELFEMP.01_2023 = 'self_01_2023'n YEMP_SELFEMP.02_2023 = 'self_02_2023'n YEMP_SELFEMP.03_2023 = 'self_03_2023'n YEMP_SELFEMP.04_2023 = 'self_04_2023'n YEMP_SELFEMP.05_2023 = 'self_05_2023'n YEMP_SELFEMP.06_2023 = 'self_06_2023'n YEMP_SELFEMP.07_2023 = 'self_07_2023'n YEMP_SELFEMP.08_2023 = 'self_08_2023'n YEMP_SELFEMP.09_2023 = 'self_09_2023'n YEMP_SELFEMP.10_2023 = 'self_10_2023'n ; run; data two; set one; /*this program matches the R21 (2023) jobs to the COW code from prior rounds*/ /*assign 2023 COW code for new jobs*/ if COW_01_2023=-4 & UID_01_2023>202300 & UID_01_2023~=-4 & SELF_01_2023=1 then cow1=17; if COW_02_2023=-4 & UID_02_2023>202300 & UID_02_2023~=-4 & SELF_02_2023=1 then cow2=17; if COW_03_2023=-4 & UID_03_2023>202300 & UID_03_2023~=-4 & SELF_03_2023=1 then cow3=17; if COW_04_2023=-4 & UID_04_2023>202300 & UID_04_2023~=-4 & SELF_04_2023=1 then cow4=17; if COW_05_2023=-4 & UID_05_2023>202300 & UID_05_2023~=-4 & SELF_05_2023=1 then cow5=17; if COW_06_2023=-4 & UID_06_2023>202300 & UID_06_2023~=-4 & SELF_06_2023=1 then cow6=17; if COW_07_2023=-4 & UID_07_2023>202300 & UID_07_2023~=-4 & SELF_07_2023=1 then cow7=17; if COW_08_2023=-4 & UID_08_2023>202300 & UID_08_2023~=-4 & SELF_08_2023=1 then cow8=17; if COW_09_2023=-4 & UID_09_2023>202300 & UID_09_2023~=-4 & SELF_09_2023=1 then cow9=17; if COW_10_2023=-4 & UID_10_2023>202300 & UID_10_2023~=-4 & SELF_10_2023=1 then cow10=17; if COW_01_2023 ne -4 & UID_01_2023>202300 & UID_01_2023~=-4 then cow1=COW_01_2023; if COW_02_2023 ne -4 & UID_02_2023>202300 & UID_02_2023~=-4 then cow2=COW_02_2023; if COW_03_2023 ne -4 & UID_03_2023>202300 & UID_03_2023~=-4 then cow3=COW_03_2023; if COW_04_2023 ne -4 & UID_04_2023>202300 & UID_04_2023~=-4 then cow4=COW_04_2023; if COW_05_2023 ne -4 & UID_05_2023>202300 & UID_05_2023~=-4 then cow5=COW_05_2023; if COW_06_2023 ne -4 & UID_06_2023>202300 & UID_06_2023~=-4 then cow6=COW_06_2023; if COW_07_2023 ne -4 & UID_07_2023>202300 & UID_07_2023~=-4 then cow7=COW_07_2023; if COW_08_2023 ne -4 & UID_08_2023>202300 & UID_08_2023~=-4 then cow8=COW_08_2023; if COW_09_2023 ne -4 & UID_09_2023>202300 & UID_09_2023~=-4 then cow9=COW_09_2023; if COW_10_2023 ne -4 & UID_10_2023>202300 & UID_10_2023~=-4 then cow10=COW_10_2023; /*set up arrays and counts to determine correct COW code*/ array UID [193] UID_01_1997 UID_02_1997 UID_03_1997 UID_04_1997 UID_05_1997 UID_06_1997 UID_07_1997 UID_01_1998 UID_02_1998 UID_03_1998 UID_04_1998 UID_05_1998 UID_06_1998 UID_07_1998 UID_08_1998 UID_09_1998 UID_01_1999 UID_02_1999 UID_03_1999 UID_04_1999 UID_05_1999 UID_06_1999 UID_07_1999 UID_08_1999 UID_09_1999 UID_01_2000 UID_02_2000 UID_03_2000 UID_04_2000 UID_05_2000 UID_06_2000 UID_07_2000 UID_08_2000 UID_09_2000 UID_01_2001 UID_02_2001 UID_03_2001 UID_04_2001 UID_05_2001 UID_06_2001 UID_07_2001 UID_08_2001 UID_01_2002 UID_02_2002 UID_03_2002 UID_04_2002 UID_05_2002 UID_06_2002 UID_07_2002 UID_08_2002 UID_09_2002 UID_10_2002 UID_11_2002 UID_01_2003 UID_02_2003 UID_03_2003 UID_04_2003 UID_05_2003 UID_06_2003 UID_07_2003 UID_08_2003 UID_09_2003 UID_10_2003 UID_01_2004 UID_02_2004 UID_03_2004 UID_04_2004 UID_05_2004 UID_06_2004 UID_07_2004 UID_01_2005 UID_02_2005 UID_03_2005 UID_04_2005 UID_05_2005 UID_06_2005 UID_07_2005 UID_08_2005 UID_09_2005 UID_01_2006 UID_02_2006 UID_03_2006 UID_04_2006 UID_05_2006 UID_06_2006 UID_07_2006 UID_08_2006 UID_09_2006 UID_01_2007 UID_02_2007 UID_03_2007 UID_04_2007 UID_05_2007 UID_06_2007 UID_07_2007 UID_08_2007 UID_01_2008 UID_02_2008 UID_03_2008 UID_04_2008 UID_05_2008 UID_06_2008 UID_07_2008 UID_08_2008 UID_01_2009 UID_02_2009 UID_03_2009 UID_04_2009 UID_05_2009 UID_06_2009 UID_07_2009 UID_08_2009 UID_09_2009 UID_01_2010 UID_02_2010 UID_03_2010 UID_04_2010 UID_05_2010 UID_06_2010 UID_07_2010 UID_08_2010 UID_09_2010 UID_01_2011 UID_02_2011 UID_03_2011 UID_04_2011 UID_05_2011 UID_06_2011 UID_07_2011 UID_08_2011 UID_09_2011 UID_10_2011 UID_11_2011 UID_12_2011 UID_13_2011 UID_01_2013 UID_02_2013 UID_03_2013 UID_04_2013 UID_05_2013 UID_06_2013 UID_07_2013 UID_08_2013 UID_09_2013 UID_10_2013 UID_01_2015 UID_02_2015 UID_03_2015 UID_04_2015 UID_05_2015 UID_06_2015 UID_07_2015 UID_08_2015 UID_09_2015 UID_10_2015 UID_11_2015 UID_12_2015 UID_01_2017 UID_02_2017 UID_03_2017 UID_04_2017 UID_05_2017 UID_06_2017 UID_07_2017 UID_08_2017 UID_09_2017 UID_10_2017 UID_11_2017 UID_12_2017 UID_13_2017 UID_14_2017 UID_15_2017 UID_01_2019 UID_02_2019 UID_03_2019 UID_04_2019 UID_05_2019 UID_06_2019 UID_07_2019 UID_08_2019 UID_09_2019 UID_10_2019 UID_11_2019 UID_01_2021 UID_02_2021 UID_03_2021 UID_04_2021 UID_05_2021 UID_06_2021 UID_07_2021 UID_08_2021 UID_09_2021 UID_10_2021; array COW [193] COW_01_1997 COW_02_1997 COW_03_1997 COW_04_1997 COW_05_1997 COW_06_1997 COW_07_1997 COW_01_1998 COW_02_1998 COW_03_1998 COW_04_1998 COW_05_1998 COW_06_1998 COW_07_1998 COW_08_1998 COW_09_1998 COW_01_1999 COW_02_1999 COW_03_1999 COW_04_1999 COW_05_1999 COW_06_1999 COW_07_1999 COW_08_1999 COW_09_1999 COW_01_2000 COW_02_2000 COW_03_2000 COW_04_2000 COW_05_2000 COW_06_2000 COW_07_2000 COW_08_2000 COW_09_2000 COW_01_2001 COW_02_2001 COW_03_2001 COW_04_2001 COW_05_2001 COW_06_2001 COW_07_2001 COW_08_2001 COW_01_2002 COW_02_2002 COW_03_2002 COW_04_2002 COW_05_2002 COW_06_2002 COW_07_2002 COW_08_2002 COW_09_2002 COW_10_2002 COW_11_2002 COW_01_2003 COW_02_2003 COW_03_2003 COW_04_2003 COW_05_2003 COW_06_2003 COW_07_2003 COW_08_2003 COW_09_2003 COW_10_2003 COW_01_2004 COW_02_2004 COW_03_2004 COW_04_2004 COW_05_2004 COW_06_2004 COW_07_2004 COW_01_2005 COW_02_2005 COW_03_2005 COW_04_2005 COW_05_2005 COW_06_2005 COW_07_2005 COW_08_2005 COW_09_2005 COW_01_2006 COW_02_2006 COW_03_2006 COW_04_2006 COW_05_2006 COW_06_2006 COW_07_2006 COW_08_2006 COW_09_2006 COW_01_2007 COW_02_2007 COW_03_2007 COW_04_2007 COW_05_2007 COW_06_2007 COW_07_2007 COW_08_2007 COW_01_2008 COW_02_2008 COW_03_2008 COW_04_2008 COW_05_2008 COW_06_2008 COW_07_2008 COW_08_2008 COW_01_2009 COW_02_2009 COW_03_2009 COW_04_2009 COW_05_2009 COW_06_2009 COW_07_2009 COW_08_2009 COW_09_2009 COW_01_2010 COW_02_2010 COW_03_2010 COW_04_2010 COW_05_2010 COW_06_2010 COW_07_2010 COW_08_2010 COW_09_2010 COW_01_2011 COW_02_2011 COW_03_2011 COW_04_2011 COW_05_2011 COW_06_2011 COW_07_2011 COW_08_2011 COW_09_2011 COW_10_2011 COW_11_2011 COW_12_2011 COW_13_2011 COW_01_2013 COW_02_2013 COW_03_2013 COW_04_2013 COW_05_2013 COW_06_2013 COW_07_2013 COW_08_2013 COW_09_2013 COW_10_2013 COW_01_2015 COW_02_2015 COW_03_2015 COW_04_2015 COW_05_2015 COW_06_2015 COW_07_2015 COW_08_2015 COW_09_2015 COW_10_2015 COW_11_2015 COW_12_2015 COW_01_2017 COW_02_2017 COW_03_2017 COW_04_2017 COW_05_2017 COW_06_2017 COW_07_2017 COW_08_2017 COW_09_2017 COW_10_2017 COW_11_2017 COW_12_2017 COW_13_2017 COW_14_2017 COW_15_2017 COW_01_2019 COW_02_2019 COW_03_2019 COW_04_2019 COW_05_2019 COW_06_2019 COW_07_2019 COW_08_2019 COW_09_2019 COW_10_2019 COW_11_2019 COW_01_2021 COW_02_2021 COW_03_2021 COW_04_2021 COW_05_2021 COW_06_2021 COW_07_2021 COW_08_2021 COW_09_2021 COW_10_2021; array SELF [193] SELF_01_1997 SELF_02_1997 SELF_03_1997 SELF_04_1997 SELF_05_1997 SELF_06_1997 SELF_07_1997 SELF_01_1998 SELF_02_1998 SELF_03_1998 SELF_04_1998 SELF_05_1998 SELF_06_1998 SELF_07_1998 SELF_08_1998 SELF_09_1998 SELF_01_1999 SELF_02_1999 SELF_03_1999 SELF_04_1999 SELF_05_1999 SELF_06_1999 SELF_07_1999 SELF_08_1999 SELF_09_1999 SELF_01_2000 SELF_02_2000 SELF_03_2000 SELF_04_2000 SELF_05_2000 SELF_06_2000 SELF_07_2000 SELF_08_2000 SELF_09_2000 SELF_01_2001 SELF_02_2001 SELF_03_2001 SELF_04_2001 SELF_05_2001 SELF_06_2001 SELF_07_2001 SELF_08_2001 SELF_01_2002 SELF_02_2002 SELF_03_2002 SELF_04_2002 SELF_05_2002 SELF_06_2002 SELF_07_2002 SELF_08_2002 SELF_09_2002 SELF_10_2002 SELF_11_2002 SELF_01_2003 SELF_02_2003 SELF_03_2003 SELF_04_2003 SELF_05_2003 SELF_06_2003 SELF_07_2003 SELF_08_2003 SELF_09_2003 SELF_10_2003 SELF_01_2004 SELF_02_2004 SELF_03_2004 SELF_04_2004 SELF_05_2004 SELF_06_2004 SELF_07_2004 SELF_01_2005 SELF_02_2005 SELF_03_2005 SELF_04_2005 SELF_05_2005 SELF_06_2005 SELF_07_2005 SELF_08_2005 SELF_09_2005 SELF_01_2006 SELF_02_2006 SELF_03_2006 SELF_04_2006 SELF_05_2006 SELF_06_2006 SELF_07_2006 SELF_08_2006 SELF_09_2006 SELF_01_2007 SELF_02_2007 SELF_03_2007 SELF_04_2007 SELF_05_2007 SELF_06_2007 SELF_07_2007 SELF_08_2007 SELF_01_2008 SELF_02_2008 SELF_03_2008 SELF_04_2008 SELF_05_2008 SELF_06_2008 SELF_07_2008 SELF_08_2008 SELF_01_2009 SELF_02_2009 SELF_03_2009 SELF_04_2009 SELF_05_2009 SELF_06_2009 SELF_07_2009 SELF_08_2009 SELF_09_2009 SELF_01_2010 SELF_02_2010 SELF_03_2010 SELF_04_2010 SELF_05_2010 SELF_06_2010 SELF_07_2010 SELF_08_2010 SELF_09_2010 SELF_01_2011 SELF_02_2011 SELF_03_2011 SELF_04_2011 SELF_05_2011 SELF_06_2011 SELF_07_2011 SELF_08_2011 SELF_09_2011 SELF_10_2011 SELF_11_2011 SELF_12_2011 SELF_13_2011 SELF_01_2013 SELF_02_2013 SELF_03_2013 SELF_04_2013 SELF_05_2013 SELF_06_2013 SELF_07_2013 SELF_08_2013 SELF_09_2013 SELF_10_2013 SELF_01_2015 SELF_02_2015 SELF_03_2015 SELF_04_2015 SELF_05_2015 SELF_06_2015 SELF_07_2015 SELF_08_2015 SELF_09_2015 SELF_10_2015 SELF_11_2015 SELF_12_2015 SELF_01_2017 SELF_02_2017 SELF_03_2017 SELF_04_2017 SELF_05_2017 SELF_06_2017 SELF_07_2017 SELF_08_2017 SELF_09_2017 SELF_10_2017 SELF_11_2017 SELF_12_2017 SELF_13_2017 SELF_14_2017 SELF_15_2017 SELF_01_2019 SELF_02_2019 SELF_03_2019 SELF_04_2019 SELF_05_2019 SELF_06_2019 SELF_07_2019 SELF_08_2019 SELF_09_2019 SELF_10_2019 SELF_11_2019 SELF_01_2021 SELF_02_2021 SELF_03_2021 SELF_04_2021 SELF_05_2021 SELF_06_2021 SELF_07_2021 SELF_08_2021 SELF_09_2021 SELF_10_2021; cnt1=0; cnt2=0; cnt3=0; cnt4=0; cnt5=0; cnt6=0; cnt7=0; cnt8=0; cnt9=0; cnt10=0; /*for each job find the match by UID and check to see if a COW code has been reported. Most should only have 1 but some have more than 1. The cnt variable indicates when there is more than 1 and the FL code captures what the codes are. This is specific to the round and needs to be redone each round*/ do i=1 to 193; if UID_01_2023=UID[i] & UID[i]>100 then do; if COW[I] ne -4 then do; cnt1=cnt1+1; if cow1=. then cow1=cow[i]; if cnt1=1 then fl11=cow[i]; if cnt1=2 then fl12=cow[i]; if cnt1=3 then fl13=cow[i]; if cnt1=4 then fl14=cow[i]; if cnt1=5 then fl15=cow[i]; if cnt1=6 then fl16=cow[i]; if cnt1=7 then fl17=cow[i]; end; else if COW[I] = -4 then do; if cow1=. & COW[i]=-4 & self[i]=1 then cow1=17; if cow1=. & COW[i]=-4 & uid[i]<200000 & uid[i]>0 then cow1=17; end; end; if UID_02_2023=UID[i] & UID[i]>100 then do; if COW[I] ne -4 then do; cnt2=cnt2+1; if cow2=. then cow2=cow[i]; if cnt2=1 then fl21=cow[i]; if cnt2=2 then fl22=cow[i]; end; else if COW[I] = -4 then do; if cow2=. & COW[i]=-4 & self[i]=1 then cow2=17; if cow2=. & COW[i]=-4 & uid[i]<200000 & uid[i]>0 then cow2=17; end; end; if UID_03_2023=UID[i] & UID[i]>100 then do; if COW[I] ne -4 then do; cnt3=cnt3+1; if cow3=. then cow3=cow[i]; if cnt3=1 then fl31=cow[i]; if cnt3=2 then fl32=cow[i]; end; else if COW[I] = -4 then do; if cow3=. & COW[i]=-4 & self[i]=1 then cow3=17; if cow3=. & COW[i]=-4 & uid[i]<200000 & uid[i]>0 then cow3=17; end; end; if UID_04_2023=UID[i] & UID[i]>100 then do; if COW[I] ne -4 then do; cnt4=cnt4+1; if cow4=. then cow4=cow[i]; end; else if COW[I] = -4 then do; if cow4=. & COW[i]=-4 & self[i]=1 then cow4=17; if cow4=. & COW[i]=-4 & uid[i]<200000 & uid[i]>0 then cow4=17; end; end; if UID_05_2023=UID[i] & UID[i]>100 then do; if COW[I] ne -4 then do; cnt5=cnt5+1; if cow5=. then cow5=cow[i]; end; else if COW[I] = -4 then do; if cow5=. & COW[i]=-4 & self[i]=1 then cow5=17; if cow5=. & COW[i]=-4 & uid[i]<200000 & uid[i]>0 then cow5=17; end; end; if UID_06_2023=UID[i] & UID[i]>100 then do; if COW[I] ne -4 then do; if cow6=. then cow6=cow[i]; cnt6=cnt6+1; end; else if COW[I] = -4 then do; if cow6=. & COW[i]=-4 & self[i]=1 then cow6=17; if cow6=. & COW[i]=-4 & uid[i]<200000 & uid[i]>0 then cow6=17; end; end; if UID_07_2023=UID[i] & UID[i]>100 then do; if COW[I] ne -4 then do; cnt7=cnt7+1; if cow7=. then cow7=cow[i]; end; else if COW[I] = -4 then do; if cow7=. & COW[i]=-4 & self[i]=1 then cow7=17; if cow7=. & COW[i]=-4 & uid[i]<200000 & uid[i]>0 then cow7=17; end; end; if UID_08_2023=UID[i] & UID[i]>100 then do; if COW[I] ne -4 then do; if cow8=. then cow8=cow[i]; cnt8=cnt8+1; end; else if COW[I] = -4 then do; if cow8=. & COW[i]=-4 & self[i]=1 then cow8=17; if cow8=. & COW[i]=-4 & uid[i]<200000 & uid[i]>0 then cow8=17; end; end; if UID_09_2023=UID[i] & UID[i]>100 then do; if COW[I] ne -4 then do; if cow9=. then cow9=cow[i]; cnt9=cnt9+1; end; else if COW[I] = -4 then do; if cow9=. & COW[i]=-4 & self[i]=1 then cow9=17; if cow9=. & COW[i]=-4 & uid[i]<200000 & uid[i]>0 then cow9=17; end; end; if UID_10_2023=UID[i] & UID[i]>100 then do; if COW[I] ne -4 then do; if cow10=. then cow10=cow[i]; cnt10=cnt10+1; end; else if COW[I] = -4 then do; if cow10=. & COW[i]=-4 & self[i]=1 then cow10=17; if cow10=. & COW[i]=-4 & uid[i]<200000 & uid[i]>0 then cow10=17; end; end; end; if cnt1>1 and cow1<0 then dif1=1; if cnt2>1 and cow2<0 then dif2=1; if cnt3>1 and cow3<0 then dif3=1; if cnt4>1 and cow4<0 then dif4=1; if cnt5>1 and cow5<0 then dif5=1; if cnt6>1 and cow6<0 then dif6=1; if cnt7>1 and cow7<0 then dif7=1; if cnt8>1 and cow8<0 then dif8=1; if cnt9>1 and cow9<0 then dif9=1; if cnt10>1 and cow10<0 then dif10=1; /*set COW codes to first record; change only if first record is -2/-1. This code was based on the counts from above and needs to be amended each round*/ if cow1<0 and fl11<0 and fl12>0 then cow1=fl12; if cow1<0 and fl11<0 and fl12<0 and fl13>0 then cow1=fl13; if cow2<0 and fl21<0 and fl22>0 then cow2=fl22; if cow3<0 and fl31<0 and fl32>0 then cow3=fl32; /*account for UIDs that are correctly blank*/ if UID_01_2023=-4 then cow1=-4; if UID_02_2023=-4 then cow2=-4; if UID_03_2023=-4 then cow3=-4; if UID_04_2023=-4 then cow4=-4; if UID_05_2023=-4 then cow5=-4; if UID_06_2023=-4 then cow6=-4; if UID_07_2023=-4 then cow7=-4; if UID_08_2023=-4 then cow8=-4; if UID_09_2023=-4 then cow9=-4; if UID_10_2023=-4 then cow10=-4; if UID_01_2023=-5 then cow1=-5; if UID_02_2023=-5 then cow2=-5; if UID_03_2023=-5 then cow3=-5; if UID_04_2023=-5 then cow4=-5; if UID_05_2023=-5 then cow5=-5; if UID_06_2023=-5 then cow6=-5; if UID_07_2023=-5 then cow7=-5; if UID_08_2023=-5 then cow8=-5; if UID_09_2023=-5 then cow9=-5; if UID_10_2023=-5 then cow10=-5; /*these need to be checked out*/ if cow1=. then cow1=-3; if cow2=. then cow2=-3; if cow3=. then cow3=-3; if cow4=. then cow4=-3; if cow5=. then cow5=-3; if cow6=. then cow6=-3; if cow7=. then cow7=-3; if cow8=. then cow8=-3; if cow9=. then cow9=-3; if cow10=. then cow10=-3; /*adjust self-employed to match YEMP-roster*/ if cow1=17 then cow1=-4; if cow2=17 then cow2=-4; if cow3=17 then cow3=-4; if cow4=17 then cow4=-4; if cow5=17 then cow5=-4; if cow6=17 then cow6=-4; if cow7=17 then cow7=-4; if cow8=17 then cow8=-4; if cow9=17 then cow9=-4; if cow10=17 then cow10=-4; data null; set two; file out lrecl=70 recfm=v dlm=',' dsd; put pubid cow1 cow2 cow3 cow4 cow5 cow6 cow7 cow8 cow9 cow10; run;