*! version 1.0  15jun2001
* Stata version June 15, 2001 by John Hendrickx <John_Hendrickx@yahoo.com>
/*
Transforms ISCO-68 (International Classification of Occupation)
4-digit occupational codes into
Treiman's SIOPS scale (Standard International Occupational Prestige Scale)

Source:
Ganzeboom, Harry B.G.;Treiman, Donald J.,
International Stratification and Mobility File: Conversion Tools.
Utrecht: Department of Sociologie,
http://www.fss.uu.nl/soc/hg/ismf.

ISCO-68 Reference:
ILO (International Labour Office). (1968).
International Standard Classification of Occupations, revised edition.
Geneva: International Labour Office.

SIOPS Reference:
Treiman, D.J. (1977).
Occupational Prestige in Comparative Perspective.
New York: Academic Press.
*/

program define iscotrei
	version 7
	syntax newvarname, isco(varname numeric)

	/* comments in the original SPSS version:
	COMMENT RECODE OF TREIMANS STANDARD INTERNATIONAL OCCUPATIONAL
	        PRESTIGE SCALD FOR ISCO

	        LAST REVISED: DECEMBER 16 1990

	** Please cite use of our conversion tools as:
	** "Ganzeboom, Harry B.G.;Treiman, Donald J.,
	** International Stratification and Mobility
	** File: Conversion Tools. Utrecht: Department of Sociology,
	** http://www.fss.uu.nl/soc/hg/ismf." Date of last revision.
	*/

	quietly {
		gen `varlist'=.
		replace `varlist'=59 if (`isco' == 400)
		replace `varlist'=63 if (`isco' == 2193)
		replace `varlist'=51 if (`isco' == 4319)
		replace `varlist'=47 if (`isco' == 6119)
		replace `varlist'=5  if (`isco' == 6291)
		replace `varlist'=66 if (`isco' == 100)
		replace `varlist'=69 if (`isco' == 110)
		replace `varlist'=76 if (`isco' == 120)
		replace `varlist'=72 if (`isco' == 130)
		replace `varlist'=67 if (`isco' == 131)
		replace `varlist'=71 if (`isco' == 132)
		replace `varlist'=49 if (`isco' == 133)
		replace `varlist'=78 if (`isco' == 139)
		replace `varlist'=46 if (`isco' == 140)
		replace `varlist'=56 if (`isco' == 200)
		replace `varlist'=72 if (`isco' == 210)
		replace `varlist'=70 if (`isco' == 220)
		replace `varlist'=65 if (`isco' == 230)
		replace `varlist'=66 if (`isco' == 240)
		replace `varlist'=66 if (`isco' == 250)
		replace `varlist'=60 if (`isco' == 260)
		replace `varlist'=63 if (`isco' == 270)
		replace `varlist'=54 if (`isco' == 280)
		replace `varlist'=55 if (`isco' == 290)
		replace `varlist'=56 if (`isco' == 300)
		replace `varlist'=58 if (`isco' == 310)
		replace `varlist'=55 if (`isco' == 320)
		replace `varlist'=26 if (`isco' == 321)
		replace `varlist'=55 if (`isco' == 329)
		replace `varlist'=39 if (`isco' == 330)
		replace `varlist'=39 if (`isco' == 339)
		replace `varlist'=46 if (`isco' == 340)
		replace `varlist'=46 if (`isco' == 350)
		replace `varlist'=46 if (`isco' == 360)
		replace `varlist'=46 if (`isco' == 370)
		replace `varlist'=54 if (`isco' == 380)
		replace `varlist'=46 if (`isco' == 390)
		replace `varlist'=66 if (`isco' == 410)
		replace `varlist'=80 if (`isco' == 411)
		replace `varlist'=66 if (`isco' == 419)
		replace `varlist'=50 if (`isco' == 420)
		replace `varlist'=36 if (`isco' == 421)
		replace `varlist'=63 if (`isco' == 429)
		replace `varlist'=60 if (`isco' == 430)
		replace `varlist'=61 if (`isco' == 500)
		replace `varlist'=69 if (`isco' == 510)
		replace `varlist'=68 if (`isco' == 520)
		replace `varlist'=56 if (`isco' == 521)
		replace `varlist'=79 if (`isco' == 529)
		replace `varlist'=56 if (`isco' == 530)
		replace `varlist'=55 if (`isco' == 531)
		replace `varlist'=58 if (`isco' == 539)
		replace `varlist'=52 if (`isco' == 540)
		replace `varlist'=47 if (`isco' == 541)
		replace `varlist'=58 if (`isco' == 549)
		replace `varlist'=60 if (`isco' == 600)
		replace `varlist'=78 if (`isco' == 610)
		replace `varlist'=80 if (`isco' == 611)
		replace `varlist'=78 if (`isco' == 619)
		replace `varlist'=50 if (`isco' == 620)
		replace `varlist'=70 if (`isco' == 630)
		replace `varlist'=44 if (`isco' == 640)
		replace `varlist'=61 if (`isco' == 650)
		replace `varlist'=48 if (`isco' == 660)
		replace `varlist'=64 if (`isco' == 670)
		replace `varlist'=44 if (`isco' == 680)
		replace `varlist'=52 if (`isco' == 690)
		replace `varlist'=50 if (`isco' == 700)
		replace `varlist'=54 if (`isco' == 710)
		replace `varlist'=58 if (`isco' == 711)
		replace `varlist'=54 if (`isco' == 719)
		replace `varlist'=44 if (`isco' == 720)
		replace `varlist'=46 if (`isco' == 730)
		replace `varlist'=42 if (`isco' == 740)
		replace `varlist'=60 if (`isco' == 750)
		replace `varlist'=57 if (`isco' == 751)
		replace `varlist'=62 if (`isco' == 759)
		replace `varlist'=51 if (`isco' == 760)
		replace `varlist'=57 if (`isco' == 761)
		replace `varlist'=30 if (`isco' == 762)
		replace `varlist'=67 if (`isco' == 769)
		replace `varlist'=58 if (`isco' == 770)
		replace `varlist'=50 if (`isco' == 790)
		replace `varlist'=62 if (`isco' == 791)
		replace `varlist'=29 if (`isco' == 792)
		replace `varlist'=48 if (`isco' == 793)
		replace `varlist'=62 if (`isco' == 799)
		replace `varlist'=56 if (`isco' == 800)
		replace `varlist'=55 if (`isco' == 810)
		replace `varlist'=69 if (`isco' == 820)
		replace `varlist'=51 if (`isco' == 830)
		replace `varlist'=51 if (`isco' == 840)
		replace `varlist'=51 if (`isco' == 849)
		replace `varlist'=60 if (`isco' == 900)
		replace `varlist'=62 if (`isco' == 1100)
		replace `varlist'=68 if (`isco' == 1101)
		replace `varlist'=55 if (`isco' == 1109)
		replace `varlist'=73 if (`isco' == 1200)
		replace `varlist'=73 if (`isco' == 1210)
		replace `varlist'=75 if (`isco' == 1211)
		replace `varlist'=71 if (`isco' == 1219)
		replace `varlist'=76 if (`isco' == 1220)
		replace `varlist'=82 if (`isco' == 1221)
		replace `varlist'=73 if (`isco' == 1222)
		replace `varlist'=78 if (`isco' == 1229)
		replace `varlist'=71 if (`isco' == 1290)
		replace `varlist'=52 if (`isco' == 1291)
		replace `varlist'=71 if (`isco' == 1299)
		replace `varlist'=61 if (`isco' == 1300)
		replace `varlist'=78 if (`isco' == 1310)
		replace `varlist'=86 if (`isco' == 1311)
		replace `varlist'=78 if (`isco' == 1319)
		replace `varlist'=60 if (`isco' == 1320)
		replace `varlist'=57 if (`isco' == 1321)
		replace `varlist'=64 if (`isco' == 1329)
		replace `varlist'=57 if (`isco' == 1330)
		replace `varlist'=49 if (`isco' == 1340)
		replace `varlist'=62 if (`isco' == 1350)
		replace `varlist'=62 if (`isco' == 1390)
		replace `varlist'=66 if (`isco' == 1391)
		replace `varlist'=68 if (`isco' == 1392)
		replace `varlist'=50 if (`isco' == 1393)
		replace `varlist'=72 if (`isco' == 1394)
		replace `varlist'=57 if (`isco' == 1399)
		replace `varlist'=46 if (`isco' == 1400)
		replace `varlist'=54 if (`isco' == 1410)
		replace `varlist'=83 if (`isco' == 1411)
		replace `varlist'=46 if (`isco' == 1412)
		replace `varlist'=50 if (`isco' == 1413)
		replace `varlist'=49 if (`isco' == 1414)
		replace `varlist'=56 if (`isco' == 1415)
		replace `varlist'=61 if (`isco' == 1416)
		replace `varlist'=60 if (`isco' == 1419)
		replace `varlist'=39 if (`isco' == 1490)
		replace `varlist'=22 if (`isco' == 1491)
		replace `varlist'=56 if (`isco' == 1499)
		replace `varlist'=58 if (`isco' == 1500)
		replace `varlist'=62 if (`isco' == 1510)
		replace `varlist'=35 if (`isco' == 1511)
		replace `varlist'=62 if (`isco' == 1519)
		replace `varlist'=56 if (`isco' == 1590)
		replace `varlist'=65 if (`isco' == 1591)
		replace `varlist'=47 if (`isco' == 1592)
		replace `varlist'=57 if (`isco' == 1593)
		replace `varlist'=55 if (`isco' == 1599)
		replace `varlist'=51 if (`isco' == 1600)
		replace `varlist'=57 if (`isco' == 1610)
		replace `varlist'=49 if (`isco' == 1620)
		replace `varlist'=56 if (`isco' == 1621)
		replace `varlist'=38 if (`isco' == 1622)
		replace `varlist'=54 if (`isco' == 1629)
		replace `varlist'=46 if (`isco' == 1630)
		replace `varlist'=47 if (`isco' == 1631)
		replace `varlist'=45 if (`isco' == 1639)
		replace `varlist'=48 if (`isco' == 1700)
		replace `varlist'=45 if (`isco' == 1710)
		replace `varlist'=38 if (`isco' == 1711)
		replace `varlist'=32 if (`isco' == 1712)
		replace `varlist'=53 if (`isco' == 1713)
		replace `varlist'=56 if (`isco' == 1719)
		replace `varlist'=40 if (`isco' == 1720)
		replace `varlist'=36 if (`isco' == 1721)
		replace `varlist'=45 if (`isco' == 1729)
		replace `varlist'=57 if (`isco' == 1730)
		replace `varlist'=63 if (`isco' == 1731)
		replace `varlist'=62 if (`isco' == 1732)
		replace `varlist'=52 if (`isco' == 1739)
		replace `varlist'=68 if (`isco' == 1740)
		replace `varlist'=68 if (`isco' == 1749)
		replace `varlist'=33 if (`isco' == 1750)
		replace `varlist'=42 if (`isco' == 1790)
		replace `varlist'=33 if (`isco' == 1791)
		replace `varlist'=50 if (`isco' == 1799)
		replace `varlist'=49 if (`isco' == 1800)
		replace `varlist'=50 if (`isco' == 1801)
		replace `varlist'=48 if (`isco' == 1809)
		replace `varlist'=57 if (`isco' == 1900)
		replace `varlist'=54 if (`isco' == 1910)
		replace `varlist'=68 if (`isco' == 1920)
		replace `varlist'=66 if (`isco' == 1921)
		replace `varlist'=69 if (`isco' == 1922)
		replace `varlist'=67 if (`isco' == 1923)
		replace `varlist'=69 if (`isco' == 1924)
		replace `varlist'=67 if (`isco' == 1929)
		replace `varlist'=52 if (`isco' == 1930)
		replace `varlist'=49 if (`isco' == 1931)
		replace `varlist'=56 if (`isco' == 1939)
		replace `varlist'=56 if (`isco' == 1940)
		replace `varlist'=55 if (`isco' == 1941)
		replace `varlist'=58 if (`isco' == 1949)
		replace `varlist'=62 if (`isco' == 1950)
		replace `varlist'=69 if (`isco' == 1951)
		replace `varlist'=54 if (`isco' == 1959)
		replace `varlist'=51 if (`isco' == 1990)
		replace `varlist'=37 if (`isco' == 1991)
		replace `varlist'=54 if (`isco' == 1992)
		replace `varlist'=49 if (`isco' == 1993)
		replace `varlist'=53 if (`isco' == 1994)
		replace `varlist'=57 if (`isco' == 1995)
		replace `varlist'=58 if (`isco' == 1999)
		replace `varlist'=64 if (`isco' == 2000)
		replace `varlist'=63 if (`isco' == 2010)
		replace `varlist'=82 if (`isco' == 2011)
		replace `varlist'=66 if (`isco' == 2012)
		replace `varlist'=75 if (`isco' == 2013)
		replace `varlist'=68 if (`isco' == 2014)
		replace `varlist'=42 if (`isco' == 2015)
		replace `varlist'=90 if (`isco' == 2019)
		replace `varlist'=64 if (`isco' == 2020)
		replace `varlist'=85 if (`isco' == 2021)
		replace `varlist'=72 if (`isco' == 2022)
		replace `varlist'=66 if (`isco' == 2023)
		replace `varlist'=55 if (`isco' == 2024)
		replace `varlist'=86 if (`isco' == 2029)
		replace `varlist'=66 if (`isco' == 2030)
		replace `varlist'=87 if (`isco' == 2031)
		replace `varlist'=73 if (`isco' == 2032)
		replace `varlist'=71 if (`isco' == 2033)
		replace `varlist'=74 if (`isco' == 2034)
		replace `varlist'=63 if (`isco' == 2035)
		replace `varlist'=50 if (`isco' == 2036)
		replace `varlist'=79 if (`isco' == 2039)
		replace `varlist'=63 if (`isco' == 2100)
		replace `varlist'=65 if (`isco' == 2110)
		replace `varlist'=70 if (`isco' == 2111)
		replace `varlist'=63 if (`isco' == 2112)
		replace `varlist'=52 if (`isco' == 2113)
		replace `varlist'=67 if (`isco' == 2114)
		replace `varlist'=76 if (`isco' == 2115)
		replace `varlist'=53 if (`isco' == 2116)
		replace `varlist'=75 if (`isco' == 2119)
		replace `varlist'=64 if (`isco' == 2120)
		replace `varlist'=60 if (`isco' == 2190)
		replace `varlist'=52 if (`isco' == 2191)
		replace `varlist'=60 if (`isco' == 2192)
		replace `varlist'=67 if (`isco' == 2194)
		replace `varlist'=63 if (`isco' == 2195)
		replace `varlist'=50 if (`isco' == 2196)
		replace `varlist'=63 if (`isco' == 2197)
		replace `varlist'=58 if (`isco' == 2199)
		replace `varlist'=55 if (`isco' == 3000)
		replace `varlist'=55 if (`isco' == 3100)
		replace `varlist'=54 if (`isco' == 3101)
		replace `varlist'=61 if (`isco' == 3102)
		replace `varlist'=44 if (`isco' == 3103)
		replace `varlist'=52 if (`isco' == 3104)
		replace `varlist'=66 if (`isco' == 3109)
		replace `varlist'=46 if (`isco' == 3200)
		replace `varlist'=48 if (`isco' == 3210)
		replace `varlist'=53 if (`isco' == 3211)
		replace `varlist'=42 if (`isco' == 3219)
		replace `varlist'=45 if (`isco' == 3220)
		replace `varlist'=38 if (`isco' == 3300)
		replace `varlist'=41 if (`isco' == 3310)
		replace `varlist'=31 if (`isco' == 3311)
		replace `varlist'=65 if (`isco' == 3312)
		replace `varlist'=48 if (`isco' == 3313)
		replace `varlist'=39 if (`isco' == 3314)
		replace `varlist'=36 if (`isco' == 3315)
		replace `varlist'=49 if (`isco' == 3319)
		replace `varlist'=34 if (`isco' == 3390)
		replace `varlist'=27 if (`isco' == 3391)
		replace `varlist'=42 if (`isco' == 3399)
		replace `varlist'=45 if (`isco' == 3410)
		replace `varlist'=53 if (`isco' == 3420)
		replace `varlist'=50 if (`isco' == 3500)
		replace `varlist'=56 if (`isco' == 3510)
		replace `varlist'=58 if (`isco' == 3520)
		replace `varlist'=37 if (`isco' == 3590)
		replace `varlist'=32 if (`isco' == 3600)
		replace `varlist'=26 if (`isco' == 3601)
		replace `varlist'=30 if (`isco' == 3602)
		replace `varlist'=39 if (`isco' == 3609)
		replace `varlist'=30 if (`isco' == 3700)
		replace `varlist'=26 if (`isco' == 3701)
		replace `varlist'=33 if (`isco' == 3709)
		replace `varlist'=44 if (`isco' == 3800)
		replace `varlist'=45 if (`isco' == 3801)
		replace `varlist'=49 if (`isco' == 3802)
		replace `varlist'=38 if (`isco' == 3809)
		replace `varlist'=38 if (`isco' == 3900)
		replace `varlist'=30 if (`isco' == 3910)
		replace `varlist'=29 if (`isco' == 3911)
		replace `varlist'=32 if (`isco' == 3919)
		replace `varlist'=44 if (`isco' == 3920)
		replace `varlist'=44 if (`isco' == 3930)
		replace `varlist'=44 if (`isco' == 3931)
		replace `varlist'=59 if (`isco' == 3932)
		replace `varlist'=43 if (`isco' == 3939)
		replace `varlist'=34 if (`isco' == 3940)
		replace `varlist'=37 if (`isco' == 3941)
		replace `varlist'=23 if (`isco' == 3942)
		replace `varlist'=43 if (`isco' == 3943)
		replace `varlist'=27 if (`isco' == 3944)
		replace `varlist'=38 if (`isco' == 3949)
		replace `varlist'=36 if (`isco' == 3950)
		replace `varlist'=31 if (`isco' == 3951)
		replace `varlist'=41 if (`isco' == 3959)
		replace `varlist'=37 if (`isco' == 3990)
		replace `varlist'=41 if (`isco' == 3991)
		replace `varlist'=48 if (`isco' == 3992)
		replace `varlist'=21 if (`isco' == 3993)
		replace `varlist'=41 if (`isco' == 3999)
		replace `varlist'=45 if (`isco' == 4000)
		replace `varlist'=38 if (`isco' == 4001)
		replace `varlist'=49 if (`isco' == 4002)
		replace `varlist'=47 if (`isco' == 4009)
		replace `varlist'=48 if (`isco' == 4100)
		replace `varlist'=58 if (`isco' == 4101)
		replace `varlist'=38 if (`isco' == 4102)
		replace `varlist'=44 if (`isco' == 4103)
		replace `varlist'=55 if (`isco' == 4104)
		replace `varlist'=40 if (`isco' == 4105)
		replace `varlist'=58 if (`isco' == 4106)
		replace `varlist'=49 if (`isco' == 4108)
		replace `varlist'=42 if (`isco' == 4109)
		replace `varlist'=49 if (`isco' == 4200)
		replace `varlist'=52 if (`isco' == 4210)
		replace `varlist'=46 if (`isco' == 4220)
		replace `varlist'=51 if (`isco' == 4221)
		replace `varlist'=39 if (`isco' == 4222)
		replace `varlist'=49 if (`isco' == 4229)
		replace `varlist'=46 if (`isco' == 4300)
		replace `varlist'=46 if (`isco' == 4310)
		replace `varlist'=42 if (`isco' == 4311)
		replace `varlist'=51 if (`isco' == 4319)
		replace `varlist'=47 if (`isco' == 4320)
		replace `varlist'=46 if (`isco' == 4400)
		replace `varlist'=50 if (`isco' == 4410)
		replace `varlist'=49 if (`isco' == 4411)
		replace `varlist'=56 if (`isco' == 4412)
		replace `varlist'=44 if (`isco' == 4419)
		replace `varlist'=42 if (`isco' == 4420)
		replace `varlist'=45 if (`isco' == 4430)
		replace `varlist'=48 if (`isco' == 4431)
		replace `varlist'=49 if (`isco' == 4432)
		replace `varlist'=39 if (`isco' == 4439)
		replace `varlist'=28 if (`isco' == 4500)
		replace `varlist'=32 if (`isco' == 4510)
		replace `varlist'=36 if (`isco' == 4511)
		replace `varlist'=25 if (`isco' == 4512)
		replace `varlist'=36 if (`isco' == 4513)
		replace `varlist'=28 if (`isco' == 4514)
		replace `varlist'=34 if (`isco' == 4519)
		replace `varlist'=24 if (`isco' == 4520)
		replace `varlist'=22 if (`isco' == 4521)
		replace `varlist'=26 if (`isco' == 4522)
		replace `varlist'=14 if (`isco' == 4523)
		replace `varlist'=24 if (`isco' == 4524)
		replace `varlist'=36 if (`isco' == 4529)
		replace `varlist'=15 if (`isco' == 4900)
		replace `varlist'=40 if (`isco' == 5000)
		replace `varlist'=53 if (`isco' == 5001)
		replace `varlist'=47 if (`isco' == 5002)
		replace `varlist'=32 if (`isco' == 5009)
		replace `varlist'=37 if (`isco' == 5100)
		replace `varlist'=35 if (`isco' == 5101)
		replace `varlist'=46 if (`isco' == 5102)
		replace `varlist'=22 if (`isco' == 5103)
		replace `varlist'=33 if (`isco' == 5104)
		replace `varlist'=48 if (`isco' == 5109)
		replace `varlist'=37 if (`isco' == 5200)
		replace `varlist'=28 if (`isco' == 5201)
		replace `varlist'=46 if (`isco' == 5209)
		replace `varlist'=26 if (`isco' == 5300)
		replace `varlist'=31 if (`isco' == 5310)
		replace `varlist'=38 if (`isco' == 5311)
		replace `varlist'=22 if (`isco' == 5312)
		replace `varlist'=31 if (`isco' == 5319)
		replace `varlist'=21 if (`isco' == 5320)
		replace `varlist'=23 if (`isco' == 5321)
		replace `varlist'=16 if (`isco' == 5322)
		replace `varlist'=23 if (`isco' == 5329)
		replace `varlist'=22 if (`isco' == 5400)
		replace `varlist'=23 if (`isco' == 5401)
		replace `varlist'=14 if (`isco' == 5402)
		replace `varlist'=33 if (`isco' == 5403)
		replace `varlist'=17 if (`isco' == 5409)
		replace `varlist'=22 if (`isco' == 5500)
		replace `varlist'=25 if (`isco' == 5510)
		replace `varlist'=24 if (`isco' == 5511)
		replace `varlist'=30 if (`isco' == 5512)
		replace `varlist'=21 if (`isco' == 5519)
		replace `varlist'=20 if (`isco' == 5520)
		replace `varlist'=19 if (`isco' == 5521)
		replace `varlist'=25 if (`isco' == 5522)
		replace `varlist'=16 if (`isco' == 5529)
		replace `varlist'=22 if (`isco' == 5600)
		replace `varlist'=32 if (`isco' == 5700)
		replace `varlist'=37 if (`isco' == 5701)
		replace `varlist'=35 if (`isco' == 5702)
		replace `varlist'=45 if (`isco' == 5703)
		replace `varlist'=30 if (`isco' == 5709)
		replace `varlist'=35 if (`isco' == 5800)
		replace `varlist'=35 if (`isco' == 5810)
		replace `varlist'=40 if (`isco' == 5820)
		replace `varlist'=60 if (`isco' == 5821)
		replace `varlist'=75 if (`isco' == 5822)
		replace `varlist'=52 if (`isco' == 5823)
		replace `varlist'=40 if (`isco' == 5829)
		replace `varlist'=42 if (`isco' == 5830)
		replace `varlist'=63 if (`isco' == 5831)
		replace `varlist'=44 if (`isco' == 5832)
		replace `varlist'=39 if (`isco' == 5833)
		replace `varlist'=30 if (`isco' == 5890)
		replace `varlist'=39 if (`isco' == 5891)
		replace `varlist'=47 if (`isco' == 5892)
		replace `varlist'=22 if (`isco' == 5899)
		replace `varlist'=31 if (`isco' == 5900)
		replace `varlist'=29 if (`isco' == 5910)
		replace `varlist'=34 if (`isco' == 5920)
		replace `varlist'=29 if (`isco' == 5990)
		replace `varlist'=20 if (`isco' == 5991)
		replace `varlist'=24 if (`isco' == 5992)
		replace `varlist'=14 if (`isco' == 5993)
		replace `varlist'=27 if (`isco' == 5994)
		replace `varlist'=12 if (`isco' == 5995)
		replace `varlist'=50 if (`isco' == 5996)
		replace `varlist'=34 if (`isco' == 5997)
		replace `varlist'=41 if (`isco' == 5998)
		replace `varlist'=42 if (`isco' == 5999)
		replace `varlist'=48 if (`isco' == 6000)
		replace `varlist'=41 if (`isco' == 6001)
		replace `varlist'=54 if (`isco' == 6009)
		replace `varlist'=40 if (`isco' == 6100)
		replace `varlist'=40 if (`isco' == 6110)
		replace `varlist'=63 if (`isco' == 6111)
		replace `varlist'=38 if (`isco' == 6112)
		replace `varlist'=30 if (`isco' == 6113)
		replace `varlist'=32 if (`isco' == 6114)
		replace `varlist'=35 if (`isco' == 6115)
		replace `varlist'=39 if (`isco' == 6116)
		replace `varlist'=34 if (`isco' == 6117)
		replace `varlist'=47 if (`isco' == 6119)
		replace `varlist'=55 if (`isco' == 6120)
		replace `varlist'=22 if (`isco' == 6200)
		replace `varlist'=20 if (`isco' == 6210)
		replace `varlist'=18 if (`isco' == 6211)
		replace `varlist'=23 if (`isco' == 6219)
		replace `varlist'=21 if (`isco' == 6220)
		replace `varlist'=21 if (`isco' == 6230)
		replace `varlist'=21 if (`isco' == 6239)
		replace `varlist'=26 if (`isco' == 6240)
		replace `varlist'=23 if (`isco' == 6250)
		replace `varlist'=21 if (`isco' == 6260)
		replace `varlist'=21 if (`isco' == 6270)
		replace `varlist'=31 if (`isco' == 6280)
		replace `varlist'=14 if (`isco' == 6290)
		replace `varlist'=05 if (`isco' == 6291)
		replace `varlist'=30 if (`isco' == 6299)
		replace `varlist'=24 if (`isco' == 6300)
		replace `varlist'=18 if (`isco' == 6310)
		replace `varlist'=18 if (`isco' == 6311)
		replace `varlist'=19 if (`isco' == 6319)
		replace `varlist'=42 if (`isco' == 6320)
		replace `varlist'=38 if (`isco' == 6321)
		replace `varlist'=40 if (`isco' == 6322)
		replace `varlist'=48 if (`isco' == 6329)
		replace `varlist'=28 if (`isco' == 6400)
		replace `varlist'=32 if (`isco' == 6410)
		replace `varlist'=37 if (`isco' == 6411)
		replace `varlist'=28 if (`isco' == 6419)
		replace `varlist'=23 if (`isco' == 6490)
		replace `varlist'=06 if (`isco' == 6491)
		replace `varlist'=40 if (`isco' == 6499)
		replace `varlist'=46 if (`isco' == 7000)
		replace `varlist'=52 if (`isco' == 7001)
		replace `varlist'=39 if (`isco' == 7009)
		replace `varlist'=32 if (`isco' == 7100)
		replace `varlist'=34 if (`isco' == 7110)
		replace `varlist'=36 if (`isco' == 7111)
		replace `varlist'=24 if (`isco' == 7112)
		replace `varlist'=44 if (`isco' == 7113)
		replace `varlist'=32 if (`isco' == 7119)
		replace `varlist'=32 if (`isco' == 7120)
		replace `varlist'=31 if (`isco' == 7130)
		replace `varlist'=31 if (`isco' == 7139)
		replace `varlist'=38 if (`isco' == 7200)
		replace `varlist'=45 if (`isco' == 7210)
		replace `varlist'=36 if (`isco' == 7220)
		replace `varlist'=38 if (`isco' == 7230)
		replace `varlist'=33 if (`isco' == 7240)
		replace `varlist'=38 if (`isco' == 7250)
		replace `varlist'=38 if (`isco' == 7260)
		replace `varlist'=38 if (`isco' == 7270)
		replace `varlist'=28 if (`isco' == 7280)
		replace `varlist'=38 if (`isco' == 7290)
		replace `varlist'=29 if (`isco' == 7300)
		replace `varlist'=29 if (`isco' == 7310)
		replace `varlist'=29 if (`isco' == 7319)
		replace `varlist'=30 if (`isco' == 7320)
		replace `varlist'=31 if (`isco' == 7321)
		replace `varlist'=30 if (`isco' == 7329)
		replace `varlist'=28 if (`isco' == 7330)
		replace `varlist'=28 if (`isco' == 7340)
		replace `varlist'=40 if (`isco' == 7400)
		replace `varlist'=43 if (`isco' == 7410)
		replace `varlist'=43 if (`isco' == 7420)
		replace `varlist'=43 if (`isco' == 7430)
		replace `varlist'=43 if (`isco' == 7440)
		replace `varlist'=37 if (`isco' == 7450)
		replace `varlist'=30 if (`isco' == 7490)
		replace `varlist'=16 if (`isco' == 7491)
		replace `varlist'=43 if (`isco' == 7499)
		replace `varlist'=29 if (`isco' == 7500)
		replace `varlist'=29 if (`isco' == 7510)
		replace `varlist'=34 if (`isco' == 7520)
		replace `varlist'=30 if (`isco' == 7530)
		replace `varlist'=32 if (`isco' == 7540)
		replace `varlist'=33 if (`isco' == 7541)
		replace `varlist'=30 if (`isco' == 7549)
		replace `varlist'=29 if (`isco' == 7550)
		replace `varlist'=25 if (`isco' == 7560)
		replace `varlist'=26 if (`isco' == 7590)
		replace `varlist'=22 if (`isco' == 7600)
		replace `varlist'=22 if (`isco' == 7610)
		replace `varlist'=22 if (`isco' == 7620)
		replace `varlist'=34 if (`isco' == 7700)
		replace `varlist'=33 if (`isco' == 7710)
		replace `varlist'=42 if (`isco' == 7711)
		replace `varlist'=33 if (`isco' == 7719)
		replace `varlist'=45 if (`isco' == 7720)
		replace `varlist'=24 if (`isco' == 7730)
		replace `varlist'=18 if (`isco' == 7731)
		replace `varlist'=45 if (`isco' == 7732)
		replace `varlist'=31 if (`isco' == 7739)
		replace `varlist'=35 if (`isco' == 7740)
		replace `varlist'=34 if (`isco' == 7750)
		replace `varlist'=33 if (`isco' == 7760)
		replace `varlist'=48 if (`isco' == 7761)
		replace `varlist'=33 if (`isco' == 7769)
		replace `varlist'=34 if (`isco' == 7770)
		replace `varlist'=34 if (`isco' == 7780)
		replace `varlist'=34 if (`isco' == 7790)
		replace `varlist'=34 if (`isco' == 7799)
		replace `varlist'=34 if (`isco' == 7800)
		replace `varlist'=34 if (`isco' == 7810)
		replace `varlist'=28 if (`isco' == 7820)
		replace `varlist'=34 if (`isco' == 7830)
		replace `varlist'=39 if (`isco' == 7890)
		replace `varlist'=39 if (`isco' == 7899)
		replace `varlist'=34 if (`isco' == 7900)
		replace `varlist'=40 if (`isco' == 7910)
		replace `varlist'=39 if (`isco' == 7911)
		replace `varlist'=40 if (`isco' == 7919)
		replace `varlist'=35 if (`isco' == 7920)
		replace `varlist'=32 if (`isco' == 7930)
		replace `varlist'=41 if (`isco' == 7940)
		replace `varlist'=26 if (`isco' == 7950)
		replace `varlist'=31 if (`isco' == 7960)
		replace `varlist'=34 if (`isco' == 7990)
		replace `varlist'=26 if (`isco' == 8000)
		replace `varlist'=28 if (`isco' == 8010)
		replace `varlist'=28 if (`isco' == 8020)
		replace `varlist'=22 if (`isco' == 8030)
		replace `varlist'=36 if (`isco' == 8100)
		replace `varlist'=40 if (`isco' == 8110)
		replace `varlist'=36 if (`isco' == 8120)
		replace `varlist'=31 if (`isco' == 8190)
		replace `varlist'=34 if (`isco' == 8191)
		replace `varlist'=28 if (`isco' == 8199)
		replace `varlist'=38 if (`isco' == 8200)
		replace `varlist'=36 if (`isco' == 8300)
		replace `varlist'=35 if (`isco' == 8310)
		replace `varlist'=36 if (`isco' == 8311)
		replace `varlist'=34 if (`isco' == 8319)
		replace `varlist'=40 if (`isco' == 8320)
		replace `varlist'=39 if (`isco' == 8321)
		replace `varlist'=40 if (`isco' == 8329)
		replace `varlist'=38 if (`isco' == 8330)
		replace `varlist'=37 if (`isco' == 8331)
		replace `varlist'=40 if (`isco' == 8339)
		replace `varlist'=38 if (`isco' == 8340)
		replace `varlist'=27 if (`isco' == 8350)
		replace `varlist'=35 if (`isco' == 8351)
		replace `varlist'=19 if (`isco' == 8359)
		replace `varlist'=40 if (`isco' == 8390)
		replace `varlist'=43 if (`isco' == 8400)
		replace `varlist'=42 if (`isco' == 8410)
		replace `varlist'=42 if (`isco' == 8411)
		replace `varlist'=40 if (`isco' == 8412)
		replace `varlist'=43 if (`isco' == 8419)
		replace `varlist'=47 if (`isco' == 8420)
		replace `varlist'=42 if (`isco' == 8421)
		replace `varlist'=60 if (`isco' == 8422)
		replace `varlist'=40 if (`isco' == 8429)
		replace `varlist'=44 if (`isco' == 8430)
		replace `varlist'=47 if (`isco' == 8431)
		replace `varlist'=43 if (`isco' == 8439)
		replace `varlist'=50 if (`isco' == 8440)
		replace `varlist'=30 if (`isco' == 8490)
		replace `varlist'=28 if (`isco' == 8491)
		replace `varlist'=31 if (`isco' == 8492)
		replace `varlist'=30 if (`isco' == 8493)
		replace `varlist'=18 if (`isco' == 8494)
		replace `varlist'=43 if (`isco' == 8499)
		replace `varlist'=41 if (`isco' == 8500)
		replace `varlist'=38 if (`isco' == 8510)
		replace `varlist'=48 if (`isco' == 8520)
		replace `varlist'=48 if (`isco' == 8530)
		replace `varlist'=42 if (`isco' == 8540)
		replace `varlist'=44 if (`isco' == 8550)
		replace `varlist'=48 if (`isco' == 8551)
		replace `varlist'=44 if (`isco' == 8559)
		replace `varlist'=35 if (`isco' == 8560)
		replace `varlist'=36 if (`isco' == 8570)
		replace `varlist'=40 if (`isco' == 8590)
		replace `varlist'=44 if (`isco' == 8600)
		replace `varlist'=53 if (`isco' == 8610)
		replace `varlist'=34 if (`isco' == 8620)
		replace `varlist'=38 if (`isco' == 8700)
		replace `varlist'=34 if (`isco' == 8710)
		replace `varlist'=45 if (`isco' == 8711)
		replace `varlist'=34 if (`isco' == 8719)
		replace `varlist'=39 if (`isco' == 8720)
		replace `varlist'=34 if (`isco' == 8730)
		replace `varlist'=32 if (`isco' == 8731)
		replace `varlist'=31 if (`isco' == 8732)
		replace `varlist'=36 if (`isco' == 8733)
		replace `varlist'=36 if (`isco' == 8739)
		replace `varlist'=44 if (`isco' == 8740)
		replace `varlist'=43 if (`isco' == 8800)
		replace `varlist'=57 if (`isco' == 8801)
		replace `varlist'=43 if (`isco' == 8809)
		replace `varlist'=31 if (`isco' == 8900)
		replace `varlist'=37 if (`isco' == 8910)
		replace `varlist'=33 if (`isco' == 8911)
		replace `varlist'=41 if (`isco' == 8919)
		replace `varlist'=25 if (`isco' == 8920)
		replace `varlist'=31 if (`isco' == 8930)
		replace `varlist'=31 if (`isco' == 8940)
		replace `varlist'=31 if (`isco' == 8950)
		replace `varlist'=31 if (`isco' == 8990)
		replace `varlist'=30 if (`isco' == 9000)
		replace `varlist'=30 if (`isco' == 9010)
		replace `varlist'=30 if (`isco' == 9020)
		replace `varlist'=28 if (`isco' == 9100)
		replace `varlist'=41 if (`isco' == 9200)
		replace `varlist'=42 if (`isco' == 9210)
		replace `varlist'=51 if (`isco' == 9211)
		replace `varlist'=42 if (`isco' == 9219)
		replace `varlist'=41 if (`isco' == 9220)
		replace `varlist'=41 if (`isco' == 9230)
		replace `varlist'=41 if (`isco' == 9240)
		replace `varlist'=46 if (`isco' == 9250)
		replace `varlist'=32 if (`isco' == 9260)
		replace `varlist'=36 if (`isco' == 9270)
		replace `varlist'=52 if (`isco' == 9290)
		replace `varlist'=30 if (`isco' == 9300)
		replace `varlist'=31 if (`isco' == 9310)
		replace `varlist'=39 if (`isco' == 9311)
		replace `varlist'=31 if (`isco' == 9319)
		replace `varlist'=29 if (`isco' == 9390)
		replace `varlist'=31 if (`isco' == 9400)
		replace `varlist'=33 if (`isco' == 9410)
		replace `varlist'=21 if (`isco' == 9420)
		replace `varlist'=30 if (`isco' == 9430)
		replace `varlist'=41 if (`isco' == 9490)
		replace `varlist'=33 if (`isco' == 9491)
		replace `varlist'=50 if (`isco' == 9492)
		replace `varlist'=23 if (`isco' == 9493)
		replace `varlist'=39 if (`isco' == 9499)
		replace `varlist'=31 if (`isco' == 9500)
		replace `varlist'=34 if (`isco' == 9510)
		replace `varlist'=34 if (`isco' == 9520)
		replace `varlist'=31 if (`isco' == 9530)
		replace `varlist'=37 if (`isco' == 9540)
		replace `varlist'=48 if (`isco' == 9541)
		replace `varlist'=23 if (`isco' == 9542)
		replace `varlist'=37 if (`isco' == 9549)
		replace `varlist'=31 if (`isco' == 9550)
		replace `varlist'=39 if (`isco' == 9551)
		replace `varlist'=31 if (`isco' == 9559)
		replace `varlist'=28 if (`isco' == 9560)
		replace `varlist'=26 if (`isco' == 9570)
		replace `varlist'=28 if (`isco' == 9590)
		replace `varlist'=38 if (`isco' == 9591)
		replace `varlist'=28 if (`isco' == 9592)
		replace `varlist'=46 if (`isco' == 9593)
		replace `varlist'=26 if (`isco' == 9594)
		replace `varlist'=15 if (`isco' == 9595)
		replace `varlist'=36 if (`isco' == 9596)
		replace `varlist'=24 if (`isco' == 9599)
		replace `varlist'=38 if (`isco' == 9600)
		replace `varlist'=42 if (`isco' == 9610)
		replace `varlist'=34 if (`isco' == 9690)
		replace `varlist'=22 if (`isco' == 9700)
		replace `varlist'=20 if (`isco' == 9710)
		replace `varlist'=20 if (`isco' == 9711)
		replace `varlist'=17 if (`isco' == 9712)
		replace `varlist'=18 if (`isco' == 9713)
		replace `varlist'=22 if (`isco' == 9714)
		replace `varlist'=21 if (`isco' == 9719)
		replace `varlist'=32 if (`isco' == 9720)
		replace `varlist'=32 if (`isco' == 9730)
		replace `varlist'=25 if (`isco' == 9731)
		replace `varlist'=39 if (`isco' == 9739)
		replace `varlist'=32 if (`isco' == 9740)
		replace `varlist'=28 if (`isco' == 9790)
		replace `varlist'=28 if (`isco' == 9800)
		replace `varlist'=29 if (`isco' == 9810)
		replace `varlist'=23 if (`isco' == 9811)
		replace `varlist'=35 if (`isco' == 9819)
		replace `varlist'=25 if (`isco' == 9820)
		replace `varlist'=34 if (`isco' == 9830)
		replace `varlist'=33 if (`isco' == 9831)
		replace `varlist'=27 if (`isco' == 9832)
		replace `varlist'=43 if (`isco' == 9839)
		replace `varlist'=29 if (`isco' == 9840)
		replace `varlist'=31 if (`isco' == 9850)
		replace `varlist'=32 if (`isco' == 9851)
		replace `varlist'=33 if (`isco' == 9852)
		replace `varlist'=39 if (`isco' == 9853)
		replace `varlist'=15 if (`isco' == 9854)
		replace `varlist'=41 if (`isco' == 9855)
		replace `varlist'=28 if (`isco' == 9859)
		replace `varlist'=22 if (`isco' == 9860)
		replace `varlist'=26 if (`isco' == 9861)
		replace `varlist'=18 if (`isco' == 9869)
		replace `varlist'=24 if (`isco' == 9890)
		replace `varlist'=30 if (`isco' == 9891)
		replace `varlist'=17 if (`isco' == 9899)
		replace `varlist'=32 if (`isco' == 9900)
		replace `varlist'=46 if (`isco' == 9950)
		replace `varlist'=50 if (`isco' == 9951)
		replace `varlist'=42 if (`isco' == 9959)
		replace `varlist'=33 if (`isco' == 9970)
		replace `varlist'=37 if (`isco' == 9971)
		replace `varlist'=29 if (`isco' == 9979)
		replace `varlist'=18 if (`isco' == 9990)
		replace `varlist'=18 if (`isco' == 9991)
		replace `varlist'=8  if (`isco' == 9992)
		replace `varlist'=20 if (`isco' == 9993)
		replace `varlist'=33 if (`isco' == 9994)
		replace `varlist'=13 if (`isco' == 9995)
		replace `varlist'=13 if (`isco' == 9996)
		replace `varlist'=20 if (`isco' == 9997)
		replace `varlist'=19 if (`isco' == 9999)
		replace `varlist'=42 if (`isco' == 10000)
		replace `varlist'=63 if (`isco' == 10001)
		replace `varlist'=44 if (`isco' == 10002)
		replace `varlist'=39 if (`isco' == 10003)
		replace `varlist'=73 if (`isco' == 10009)
	}
end