* Encoding: UTF-8. *--------------------------------------------------------------------------------------------------------------------------. * EU-Labour Force Survey - Data Service - German Microdata Lab * This routine converts EU-LFS 2007 AD HOC data formatted in CSV into SAV * Checked for the November 2015 release of the EU-LFS, as provided by Eurostat * The whole routine consists of two files: * Setup_EULFS_2007_ah.sps * Labels_EULFS_1983-2014.sps * Version 1 of the routine, November 2016 * IBM SPSS Statistics 22.0 * (c) GESIS - Leibniz Institute for the Social Sciences * German Microdata Lab * Bianca Dungl, Andrea Lengerer, Klaus Pforr * http://www.gesis.org/en/institute/competence-centers/rdc-german-microdata-lab/ * Contact: gml@gesis.org * This Stata code is protected under the creative commons licence. *--------------------------------------------------------------------------------------------------------------------------. *--- Set Number of Warnings and Errors very high, as label syntax produces errors ---. SET MXERRS=1000000000. SET MXWARNS=1000000000. *--------------------------------------------- Start Definition Macro ---------------------------------------------. DEFINE readmac (). *--------------- CONFIGURATION HERE ---------------. * Specify list of files you want to convert from csv to sav (without file extension, e.g. 'be2007'). !LET !filestublist=''. * Specify path where the csv files are stored (e.g. E:\data\EU-LFS\csv\). !LET !csv_data_path=''. * Specify path where the file "Labels_EULFS_1983-2014.sps" is stored. !LET !label_syntax_path=''. * Specify path where you want the sav files to be stored (e.g. E:\data\EU-LFS\sav\). !LET !spss_data_path=''. * Specify name of file that contain all specified countries and years (e.g. be2011-2014_y.sav). !LET !finalfile=''. *---------------------------------------------------------. *-------------- Loop over all specified files ------------. !DO !filestub !IN (!filestublist). *--- Read Raw Data ---. GET DATA / TYPE=TXT / FILE=!QUOTE(!CONCAT(!csv_data_path,!filestub,'_y.csv')) / DELCASE=LINE / DELIMITERS="," / QUALIFIER='"' / ARRANGEMENT=DELIMITED / FIRSTCASE=2 / IMPORTCASE=ALL / VARIABLES= QHHNUM A8 COEFF COMMA9.0 QUARTER A2 HHNUM A6 REC F5.0 HHSEQNUM F2.0 REFYEAR F4.0 REFWEEK F2.0 INTWEEK F2.0 COUNTRY_ A2 REGION_ A2 DEGURBA F1.0 HHTYPE F1.0 HHINST F1.0 INTWAVE F1.0 INTQUEST F1.0 REM F2.0 YEAR F4.0 HHPRIV F1.0 HHLINK F1.0 HHSPOU F2.0 HHFATH F2.0 HHMOTH F2.0 SEX F1.0 AGE F2.0 MARSTAT F1.0 NATIONAL_ A3 YEARESID_ A6 COUNTRYB_ A3 PROXY F1.0 WSTATOR F1.0 NOWKREAS F2.0 STAPRO F1.0 SIGNISAL F1.0 SUPVISOR F1.0 SIZEFIRM F2.0 COUNTRYW_ A23 REGIONW_ A2 YSTARTWK F4.0 MSTARTWK F2.0 WAYJFOUN F1.0 FTPT F1.0 FTPTREAS F1.0 TEMP F1.0 TEMPREAS F1.0 TEMPDUR F1.0 TEMPAGCY F1.0 SHIFTWK F1.0 EVENWK F1.0 NIGHTWK F1.0 SATWK F1.0 SUNWK F1.0 HWUSUAL F2.0 HWACTUAL F2.0 HWOVERP F2.0 HWOVERPU F2.0 HOURREAS F2.0 WISHMORE F1.0 WAYMORE F1.0 HWWISH F2.0 HOMEWK F1.0 LOOKOJ F1.0 LOOKREAS F1.0 EXIST2J F1.0 STAPRO2J F1.0 HWACTUA2 F2.0 EXISTPR F1.0 YEARPR F4.0 MONTHPR F2.0 LEAVREAS F2.0 STAPROPR F1.0 ISCOPR3D F1.0 SEEKWORK F1.0 SEEKREAS F1.0 SEEKTYPE F1.0 SEEKDUR F1.0 METHODA F1.0 METHODB F1.0 METHODC F1.0 METHODD F1.0 METHODE F1.0 METHODF F1.0 METHODG F1.0 METHODH F1.0 METHODI F1.0 METHODJ F1.0 METHODK F1.0 METHODL F1.0 METHODM F1.0 WANTWORK F1.0 AVAILBLE F1.0 AVAIREAS F1.0 PRESEEK F1.0 NEEDCARE F1.0 REGISTER F1.0 MAINSTAT F1.0 EDUCSTAT F1.0 EDUCLEVL F1.0 EDUCFILD F3.0 COURATT F1.0 COURLEN F3.0 COURPURP F1.0 COURFILD F3.0 COURWORH F1.0 HAT97LEV F2.0 HATFIELD F3.0 HATYEAR F4.0 WSTAT1Y F1.0 STAPRO1Y F1.0 NA111Y1D_ A1 COUNTR1Y_ A2 REGION1Y_ A2 ILOSTAT F1.0 NA111D_ A1 NA11S F1.0 ISCO1D F1.0 NA112J1D_ A2 NA112JS F1.0 NA11PR1D_ A1 NA11PRS F1.0 ISCOPR1D F1.0 DURUNE F1.0 EDUC4WN F1.0 HATLEV1D_ A1 NA111YS F1.0 METHFW F2.0 LENTR4W F1.0 PURP4W F1.0 HWUSTRAI F1.0 ISCO3D F1.0 STARTIME F3.0 LEAVTIME F3.0 LEAVCLAS F1.0 HHCHILDR F1.0 HHWKSTAT F1.0 HHPARTNR F1.0 HHPARENT F1.0 HHCOMP F2.0 HATLFATH_ A1 HATLMOTH_ A1 HHNBCHLD F2.0 HHNB0014 F2.0 HHNBCH2 F2.0 HHNBCH5 F2.0 HHNBCH8 F2.0 HHNBCH11 F2.0 HHNBCH14 F2.0 HHNBCH17 F2.0 HHNBCH24 F2.0 HHNBPERS F2.0 HHNBEMPL F2.0 HHNBINAC F2.0 HHNBUNEM F2.0 HHNBWORK F2.0 HHAGEYG F2.0 HHAGE14 F2.0 HHNBOLD F2.0 HHPERS F1.0 AHM2007_AWNUMBR F2.0 AHM2007_AWROAD F2.0 AHM2007_AWBACKW F2.0 AHM2007_AWJOB F2.0 AHM2007_WHPNUMBR F2.0 AHM2007_WHPTYPEP F2.0 AHM2007_WHPLIMAB F2.0 AHM2007_WHPDOFF F2.0 AHM2007_WHPJOB F2.0 AHM2007_FACTORWB F2.0 AHM2007_FACTORPH F2.0 IS881D F3.0 IS88PR3D F3.0 IS88PR1D F3.0 IS883D F3.0. EXECUTE. *--- Add Release-Variable ---. STRING RELEASE (A8). RECODE RELEASE (ELSE='NOV 2015'). *--- Recode Alphanumeric Variables ---. * Variables which remain alphanumeric: HHNUM, QHHNUM (too many values); QUARTER (only one value); REGION, REGIONW and REGION1Y (values have country-specific meaning); * COUNTRY. NUMERIC COUNTRY (F2.0). RECODE COUNTRY_ ('AT'=1) ('BE'=2) ('BG'=3) ('CH'=4) ('CY'=5) ('CZ'=6) ('DE'=7) ('DK'=8) ('EE'=9) ('ES'=10) ('FI'=11) ('FR'=12) ('GR'=13) ('HR'=14) ('HU'=15) ('IE'=16) ('IS'=17) ('IT'=18) ('LT'=19) ('LU'=20) ('LV'=21) ('MT'=22) ('NL'=23) ('NO'=24) ('PL'=25) ('PT'=26) ('RO'=27) ('SE'=28) ('SI'=29) ('SK'=30) ('UK'=31) INTO COUNTRY. * REGION. STRING REGION (A4). COMPUTE REGION=CONCAT(COUNTRY_,REGION_). EXECUTE. IF (REGION_='00') REGION='-5'. * NATIONAL. NUMERIC NATIONAL (F3.0). RECODE NATIONAL_ ('000'=0) ('001'=1) ('002'=2) ('003'=3) ('004'=4) ('005'=5) ('006'=6) ('007'=7) ('008'=8) ('009'=9) ('010'=10) ('011'=11) ('012'=12) ('013'=13) ('014'=14) ('015'=15) ('016'=16) ('017'=17) ('018'=18) ('019'=19) ('020'=20) ('021'=21) ('111'=111) ('800'=800) ('911'=911) ('999'=-1) ('NO '=-1) (' '=-1) INTO NATIONAL. * YEARESID. NUMERIC YEARESID (F2.0). RECODE YEARESID_ ('0'=0) ('00'=0) ('01'=1) ('02'=2) ('03'=3) ('04'=4) ('05'=5) ('06'=6) ('07'=7) ('08'=8) ('09'=9) ('10'=10) ('11'=11) ('01-04'=2) ('05-10'=6) ('11-14'=12) ('15-19'=17) ('20-24'=22) ('25-29'=27) ('30-34'=32) ('35-39'=37) ('40-44'=42) ('45-49'=47) ('50-54'=52) ('50-99'=52) ('55-59'=57) ('60-64'=62) ('65-69'=67) ('70-74'=72) ('75-79'=77) ('80-84'=82) ('85-89'=87) ('90-94'=92) ('95-99'=97) ('75-99'=77) (' '=-1) ('01-Apr'=2) ('05-Oct'=6) ('Nov-14'=12) INTO YEARESID. * COUNTRYB. NUMERIC COUNTRYB (F2.0). RECODE COUNTRYB_ ('000'=0) ('001'=1) ('002'=2) ('003'=3) ('004'=4) ('005'=5) ('006'=6) ('007'=7) ('008'=8) ('009'=9) ('010'=10) ('011'=11) ('012'=12) ('013'=13) ('014'=14) ('015'=15) ('016'=16) ('017'=17) ('018'=18) ('019'=19) ('020'=20) ('021'=21) ('111'=111) ('800'=800) ('911'=911) ('999'=-2) ('NO '=-1) (' '=-1) INTO COUNTRYB. * COUNTRYW. NUMERIC COUNTRYW (F4.0). RECODE COUNTRYW_ ('AD'=01) ('AL'=02) ('AT'=03) ('BA'=04) ('BE'=05) ('BG'=06) ('BY'=07) ('CH'=08) ('CY'=09) ('CZ'=10) ('DE'=11) ('DK'=12) ('EE'=13) ('GR'=14) ('ES'=15) ('FI'=16) ('FO'=17) ('FR'=18) ('GG'=19) ('GI'=20) ('HR'=21) ('HU'=22) ('IE'=23) ('IM'=24) ('IS'=25) ('IT'=26) ('JE'=27) ('LI'=28) ('LT'=29) ('LU'=30) ('LV'=31) ('MC'=32) ('MD'=33) ('ME'=34) ('XM'=34) ('MK'=35) ('MT'=36) ('NL'=37) ('NO'=38) ('PL'=39) ('PT'=40) ('RO'=41) ('RS'=42) ('XS'=42) ('RU'=43) ('SE'=44) ('SI'=45) ('SK'=46) ('SM'=47) ('TR'=48) ('UA'=49) ('UK'=50) ('VA'=51) ('XK'=52) ('CS'=60) ('SU'=61) ('YU'=62) ('NN'=90) ('01'=110) ('02'=120) ('03'=130) ('04'=140) ('15'=150) ('05'=0500) ('DZ'=0501) ('EG'=0502) ('LY'=0503) ('MA'=0504) ('TN'=0505) ('06'=0600) ('AO'=0601) ('BF'=0602) ('BI'=0603) ('BJ'=0604) ('BW'=0605) ('CD'=0606) ('CF'=0607) ('CG'=0608) ('CI'=0609) ('CM'=0610) ('CV'=0611) ('DJ'=0612) ('ER'=0613) ('ET'=0614) ('GA'=0615) ('GH'=0616) ('GM'=0617) ('GN'=0618) ('GQ'=0619) ('GW'=0620) ('KE'=0621) ('KM'=0622) ('LR'=0623) ('LS'=0624) ('MG'=0625) ('ML'=0626) ('MR'=0627) ('MU'=0628) ('MW'=0629) ('MZ'=0630) ('NA'=0631) ('NE'=0632) ('NG'=0633) ('RW'=0634) ('SC'=0635) ('SD'=0636) ('SH'=0637) ('SL'=0638) ('SN'=0639) ('SO'=0640) ('SS'=0641) ('ST'=0642) ('SZ'=0643) ('TD'=0644) ('TG'=0645) ('TZ'=0646) ('UG'=0647) ('YT'=0648) ('ZA'=0649) ('ZM'=0650) ('ZW'=0651) ('07'=0700) ('BM'=0701) ('CA'=0702) ('GL'=0703) ('PM'=0704) ('US'=0705) ('08'=0800) ('AG'=0801) ('AI'=0802) ('AN'=0803) ('AW'=0804) ('BB'=0805) ('BL'=0806) ('BS'=0807) ('BZ'=0808) ('CR'=0809) ('CU'=0810) ('DM'=0811) ('DO'=0812) ('GD'=0813) ('GT'=0814) ('HN'=0815) ('HT'=0816) ('JM'=0817) ('KN'=0818) ('KY'=0819) ('LC'=0820) ('MF'=0821) ('MS'=0822) ('MX'=0823) ('NI'=0824) ('PA'=0825) ('PR'=0826) ('SV'=0827) ('TC'=0828) ('TT'=0829) ('VC'=0830) ('VG'=0831) ('09'=0900) ('AR'=0901) ('BO'=0902) ('BR'=0903) ('CL'=0904) ('CO'=0905) ('EC'=0906) ('FK'=0907) ('GY'=0908) ('PE'=0909) ('PY'=0910) ('SR'=0911) ('TF'=0912) ('UY'=0913) ('VE'=0914) ('10'=1000) ('CN'=1001) ('JP'=1002) ('KP'=1003) ('KR'=1004) ('MN'=1005) ('TW'=1006) ('11'=1100) ('AE'=1101) ('AM'=1102) ('AZ'=1103) ('BH'=1104) ('GE'=1105) ('IL'=1106) ('IQ'=1107) ('IR'=1108) ('JO'=1109) ('KG'=1110) ('KW'=1111) ('KZ'=1112) ('LB'=1113) ('OM'=1114) ('PS'=1115) ('QA'=1116) ('SA'=1117) ('SY'=1118) ('TJ'=1119) ('TM'=1120) ('UZ'=1121) ('YE'=1122) ('12'=1200) ('AF'=1201) ('BD'=1202) ('BN'=1203) ('BT'=1204) ('ID'=1205) ('IN'=1206) ('KH'=1207) ('LA'=1208) ('LK'=1209) ('MM'=1210) ('MV'=1211) ('MY'=1212) ('NP'=1213) ('PH'=1214) ('PK'=1215) ('SG'=1216) ('TH'=1217) ('TL'=1218) ('VN'=1219) ('13'=1300) ('AU'=1301) ('FJ'=1302) ('FM'=1303) ('KI'=1304) ('MH'=1305) ('NC'=1306) ('NR'=1307) ('NZ'=1308) ('PF'=1309) ('PG'=1310) ('PN'=1311) ('PW'=1312) ('SB'=1313) ('TO'=1314) ('TV'=1315) ('VU'=1316) ('WF'=1317) ('WS'=1318) ('14'=1400) ('005-EU27'=180) ('005-EU28'=180) ('008'=190) ('008-EUROPE OUTSIDE EU27'=190) ('008-EUROPE OUTSIDE EU28'=190) ('111'=160) ('911'=170) ('999'=-2) ('NO ANSWER'=-1) ('NOT APPLICABLE'=-2) (' '=-1) ('99'=-2) INTO COUNTRYW. * EXCEPTIONS: MT, SI. DO IF COUNTRY_='MT'. RECODE COUNTRYW_ ('000'=36) ('000 '=36) ('000-OWN COUNTRY'=36) INTO COUNTRYW. END IF. DO IF COUNTRY_='SI'. RECODE COUNTRYW_ ('000'=45) ('000-OWN COUNTRY'=45) INTO COUNTRYW. END IF. * REGIONW. STRING REGIONW (A4). COMPUTE REGIONW=CONCAT(CHAR.SUBSTR(COUNTRYW_,1,2),REGIONW_). EXECUTE. IF (REGIONW_='00' OR REGIONW_='0') REGIONW='-5'. IF (REGIONW_='99') REGIONW='-2'. IF (REGIONW_=' ') REGIONW='-1'. * separate coding of REGIONW for Slovenia (due to the separate coding of COUNTRYW in Slovenia). IF (COUNTRYW=45 AND REGIONW_='01') REGIONW='SI01'. IF (COUNTRYW=45 AND REGIONW_='02') REGIONW='SI02'. EXECUTE. * NA111Y1D. NUMERIC NA111Y1D (F2.0). RECODE NA111Y1D_ ('A'=1) ('B'=2) ('C'=3) ('D'=4) ('E'=5) ('F'=6) ('G'=7) ('H'=8) ('I'=9) ('J'=10) ('K'=11) ('L'=12) ('M'=13) ('N'=14) ('O'=15) ('P'=16) ('Q'=17) (' '=-1) ('9'=-2) INTO NA111Y1D. * COUNTR1Y. NUMERIC COUNTR1Y (F4.0). RECODE COUNTR1Y_ ('AD'=01) ('AL'=02) ('AT'=03) ('BA'=04) ('BE'=05) ('BG'=06) ('BY'=07) ('CH'=08) ('CY'=09) ('CZ'=10) ('DE'=11) ('DK'=12) ('EE'=13) ('GR'=14) ('ES'=15) ('FI'=16) ('FO'=17) ('FR'=18) ('GG'=19) ('GI'=20) ('HR'=21) ('HU'=22) ('IE'=23) ('IM'=24) ('IS'=25) ('IT'=26) ('JE'=27) ('LI'=28) ('LT'=29) ('LU'=30) ('LV'=31) ('MC'=32) ('MD'=33) ('ME'=34) ('XM'=34) ('MK'=35) ('MT'=36) ('NL'=37) ('NO'=38) ('PL'=39) ('PT'=40) ('RO'=41) ('RS'=42) ('XS'=42) ('RU'=43) ('SE'=44) ('SI'=45) ('SK'=46) ('SM'=47) ('TR'=48) ('UA'=49) ('UK'=50) ('VA'=51) ('XK'=52) ('CS'=60) ('SU'=61) ('YU'=62) ('NN'=90) ('01'=110) ('02'=120) ('03'=130) ('04'=140) ('15'=150) ('05'=0500) ('DZ'=0501) ('EG'=0502) ('LY'=0503) ('MA'=0504) ('TN'=0505) ('06'=0600) ('AO'=0601) ('BF'=0602) ('BI'=0603) ('BJ'=0604) ('BW'=0605) ('CD'=0606) ('CF'=0607) ('CG'=0608) ('CI'=0609) ('CM'=0610) ('CV'=0611) ('DJ'=0612) ('ER'=0613) ('ET'=0614) ('GA'=0615) ('GH'=0616) ('GM'=0617) ('GN'=0618) ('GQ'=0619) ('GW'=0620) ('KE'=0621) ('KM'=0622) ('LR'=0623) ('LS'=0624) ('MG'=0625) ('ML'=0626) ('MR'=0627) ('MU'=0628) ('MW'=0629) ('MZ'=0630) ('NA'=0631) ('NE'=0632) ('NG'=0633) ('RW'=0634) ('SC'=0635) ('SD'=0636) ('SH'=0637) ('SL'=0638) ('SN'=0639) ('SO'=0640) ('SS'=0641) ('ST'=0642) ('SZ'=0643) ('TD'=0644) ('TG'=0645) ('TZ'=0646) ('UG'=0647) ('YT'=0648) ('ZA'=0649) ('ZM'=0650) ('ZW'=0651) ('07'=0700) ('BM'=0701) ('CA'=0702) ('GL'=0703) ('PM'=0704) ('US'=0705) ('08'=0800) ('AG'=0801) ('AI'=0802) ('AN'=0803) ('AW'=0804) ('BB'=0805) ('BL'=0806) ('BS'=0807) ('BZ'=0808) ('CR'=0809) ('CU'=0810) ('DM'=0811) ('DO'=0812) ('GD'=0813) ('GT'=0814) ('HN'=0815) ('HT'=0816) ('JM'=0817) ('KN'=0818) ('KY'=0819) ('LC'=0820) ('MF'=0821) ('MS'=0822) ('MX'=0823) ('NI'=0824) ('PA'=0825) ('PR'=0826) ('SV'=0827) ('TC'=0828) ('TT'=0829) ('VC'=0830) ('VG'=0831) ('09'=0900) ('AR'=0901) ('BO'=0902) ('BR'=0903) ('CL'=0904) ('CO'=0905) ('EC'=0906) ('FK'=0907) ('GY'=0908) ('PE'=0909) ('PY'=0910) ('SR'=0911) ('TF'=0912) ('UY'=0913) ('VE'=0914) ('10'=1000) ('CN'=1001) ('JP'=1002) ('KP'=1003) ('KR'=1004) ('MN'=1005) ('TW'=1006) ('11'=1100) ('AE'=1101) ('AM'=1102) ('AZ'=1103) ('BH'=1104) ('GE'=1105) ('IL'=1106) ('IQ'=1107) ('IR'=1108) ('JO'=1109) ('KG'=1110) ('KW'=1111) ('KZ'=1112) ('LB'=1113) ('OM'=1114) ('PS'=1115) ('QA'=1116) ('SA'=1117) ('SY'=1118) ('TJ'=1119) ('TM'=1120) ('UZ'=1121) ('YE'=1122) ('12'=1200) ('AF'=1201) ('BD'=1202) ('BN'=1203) ('BT'=1204) ('ID'=1205) ('IN'=1206) ('KH'=1207) ('LA'=1208) ('LK'=1209) ('MM'=1210) ('MV'=1211) ('MY'=1212) ('NP'=1213) ('PH'=1214) ('PK'=1215) ('SG'=1216) ('TH'=1217) ('TL'=1218) ('VN'=1219) ('13'=1300) ('AU'=1301) ('FJ'=1302) ('FM'=1303) ('KI'=1304) ('MH'=1305) ('NC'=1306) ('NR'=1307) ('NZ'=1308) ('PF'=1309) ('PG'=1310) ('PN'=1311) ('PW'=1312) ('SB'=1313) ('TO'=1314) ('TV'=1315) ('VU'=1316) ('WF'=1317) ('WS'=1318) ('14'=1400) (' '=-1) ('99'=-2) INTO COUNTR1Y. * REGION1Y. STRING REGION1Y (A4). COMPUTE REGION1Y=CONCAT(COUNTR1Y_,REGION1Y_). EXECUTE. IF (REGION1Y_='00') REGION1Y='-5'. IF (REGION1Y_='99') REGION1Y='-2'. IF (REGION1Y_=' ') REGION1Y='-1'. * NA111D. NUMERIC NA111D (F2.0). RECODE NA111D_ ('A'=1) ('B'=2) ('C'=3) ('D'=4) ('E'=5) ('F'=6) ('G'=7) ('H'=8) ('I'=9) ('J'=10) ('K'=11) ('L'=12) ('M'=13) ('N'=14) ('O'=15) ('P'=16) ('Q'=17) (' '=-1) ('9'=-2) INTO NA111D. * NA112J1D. NUMERIC NA112J1D (F2.0). RECODE NA112J1D_ ('A'=1) ('B'=2) ('C'=3) ('D'=4) ('E'=5) ('F'=6) ('G'=7) ('H'=8) ('I'=9) ('J'=10) ('K'=11) ('L'=12) ('M'=13) ('N'=14) ('O'=15) ('P'=16) ('Q'=17) (' '=-1) ('9'=-2) INTO NA112J1D. * NA11PR1D. NUMERIC NA11PR1D (F2.0). RECODE NA11PR1D_ ('A'=1) ('B'=2) ('C'=3) ('D'=4) ('E'=5) ('F'=6) ('G'=7) ('H'=8) ('I'=9) ('J'=10) ('K'=11) ('L'=12) ('M'=13) ('N'=14) ('O'=15) ('P'=16) ('Q'=17) (' '=-1) ('9'=-2) INTO NA11PR1D. * HATLEV1D. NUMERIC HATLEV1D (F1.0). RECODE HATLEV1D_ ('L'=1) ('M'=2) ('H'=3) ('9'=-2) (' '=-1) INTO HATLEV1D. * HATLFATH. NUMERIC HATLFATH (F1.0). RECODE HATLFATH_ ('L'=1) ('M'=2) ('H'=3) ('9'=-2) ('8'=8) (' '=-1) INTO HATLFATH. * HATLMOTH. NUMERIC HATLMOTH (F1.0). RECODE HATLMOTH_ ('L'=1) ('M'=2) ('H'=3) ('9'=-2) ('8'=8) (' '=-1) INTO HATLMOTH. *--- Recode Missing Values ---. RECODE MARSTAT HHPRIV (SYSMIS=-1). RECODE LEAVCLAS (SYSMIS=-9). RECODE HHINST PROXY STAPRO SUPVISOR WAYJFOUN FTPT FTPTREAS TEMP TEMPREAS TEMPDUR TEMPAGCY SHIFTWK EVENWK NIGHTWK SATWK SUNWK WISHMORE WAYMORE HOMEWK LOOKOJ LOOKREAS EXIST2J STAPRO2J EXISTPR STAPROPR SEEKREAS SEEKTYPE SEEKDUR WANTWORK AVAILBLE AVAIREAS PRESEEK NEEDCARE REGISTER MAINSTAT EDUCSTAT EDUCLEVL COURATT COURPURP COURWORH WSTAT1Y STAPRO1Y NA11S NA111YS NA112JS NA11PRS DURUNE EDUC4WN HATLFATH HATLMOTH LENTR4W PURP4W AHM2007_AWNUMBR AHM2007_AWROAD AHM2007_AWJOB AHM2007_WHPNUMBR AHM2007_WHPLIMAB AHM2007_WHPJOB AHM2007_FACTORWB AHM2007_FACTORPH (SYSMIS=-1) (9=-2). RECODE SIZEFIRM MSTARTWK HWUSUAL HWACTUAL HWOVERP HWOVERPU HOURREAS HWWISH HWACTUA2 MONTHPR LEAVREAS HAT97LEV METHFW COUNTRYW AHM2007_AWBACKW AHM2007_WHPTYPEP AHM2007_WHPDOFF (SYSMIS=-1) (99=-2). RECODE HHAGE14 HHAGEYG (SYSMIS=-4) (99=-2). RECODE ISCOPR3D EDUCFILD COURLEN COURFILD HATFIELD ISCO1D ISCOPR1D ISCO3D STARTIME LEAVTIME IS881D IS88PR3D IS88PR1D IS883D (SYSMIS=-1) (999=-2). RECODE YSTARTWK YEARPR HATYEAR (SYSMIS=-1) (9999=-2). RECODE WSTATOR SIGNISAL SEEKWORK METHODA METHODB METHODC METHODD METHODE METHODF METHODG METHODH METHODI METHODJ METHODK METHODL METHODM ILOSTAT HHLINK (9=-2). RECODE NOWKREAS HHSPOU HHFATH HHMOTH (99=-2). RECODE HHCHILDR HHWKSTAT HHPARTNR HHPARENT HHPERS (SYSMIS=-4) (9=-2). RECODE HHNBPERS HHNB0014 HHNBOLD HHNBCHLD HHNBCH2 HHNBCH5 HHNBCH8 HHNBCH11 HHNBCH14 HHNBCH17 HHNBCH24 HHCOMP HHNBEMPL HHNBUNEM HHNBINAC HHNBWORK (SYSMIS=-4) (99=-2). EXECUTE. *--- Recode Variables in Countries which did not deliver any Information for this Variable ---. DO REPEAT var=SIGNISAL EDUCFILD COURFILD HATFIELD HHSEQNUM REFYEAR REFWEEK INTWEEK DEGURBA HHTYPE HHINST INTWAVE INTQUEST REM HHPRIV HHLINK HHSPOU HHFATH HHMOTH SEX AGE MARSTAT NATIONAL YEARESID COUNTRYB PROXY WSTATOR NOWKREAS STAPRO SUPVISOR SIZEFIRM COUNTRYW YSTARTWK MSTARTWK WAYJFOUN FTPT FTPTREAS TEMP TEMPREAS TEMPDUR TEMPAGCY SHIFTWK EVENWK NIGHTWK SATWK SUNWK HWUSUAL HWACTUAL HWOVERP HWOVERPU HOURREAS WISHMORE WAYMORE HWWISH HOMEWK LOOKOJ LOOKREAS EXIST2J STAPRO2J HWACTUA2 EXISTPR YEARPR MONTHPR LEAVREAS STAPROPR ISCOPR3D SEEKWORK SEEKREAS SEEKTYPE SEEKDUR METHODA METHODB METHODC METHODD METHODE METHODF METHODG METHODH METHODI METHODJ METHODK METHODL METHODM WANTWORK AVAILBLE AVAIREAS PRESEEK NEEDCARE REGISTER MAINSTAT EDUCSTAT EDUCLEVL COURATT COURLEN COURPURP COURWORH HAT97LEV HATYEAR WSTAT1Y STAPRO1Y NA111Y1D COUNTR1Y ILOSTAT NA111D NA11S ISCO1D NA112J1D NA112JS NA11PR1D NA11PRS ISCOPR1D DURUNE EDUC4WN HATLEV1D NA111YS METHFW LENTR4W PURP4W HWUSTRAI ISCO3D STARTIME LEAVTIME LEAVCLAS HHCHILDR HHWKSTAT HHPARTNR HHPARENT HHCOMP HATLFATH HATLMOTH HHNBCHLD HHNB0014 HHNBCH2 HHNBCH5 HHNBCH8 HHNBCH11 HHNBCH14 HHNBCH17 HHNBCH24 HHNBPERS HHNBEMPL HHNBINAC HHNBUNEM HHNBWORK HHAGEYG HHAGE14 HHNBOLD HHPERS IS881D IS88PR3D IS88PR1D IS883D AHM2007_AWNUMBR AHM2007_AWROAD AHM2007_AWJOB AHM2007_WHPNUMBR AHM2007_WHPLIMAB AHM2007_WHPJOB AHM2007_FACTORWB AHM2007_FACTORPH AHM2007_AWBACKW AHM2007_WHPTYPEP AHM2007_WHPDOFF / varx=x1 TO x163. COMPUTE varx=var. END REPEAT. EXECUTE. RECODE SIGNISAL (4=-1) (SYSMIS=-5) (ELSE=COPY) INTO x1. RECODE EDUCFILD (9=-5) (SYSMIS=-5) (ELSE=COPY) INTO x2. RECODE COURFILD (9=-5) (SYSMIS=-5) (ELSE=COPY) INTO x3. RECODE HATFIELD (99=-5) (SYSMIS=-5) (ELSE=COPY) INTO x4. RECODE x5 TO x163 (SYSMIS=-5) (ELSE=COPY). NUMERIC x164 x165 x166 (F1.0). COMPUTE x164=0. COMPUTE x165=0. COMPUTE x166=0. EXECUTE. IF (REGION='-1' OR REGION='-2' OR REGION='-3' OR REGION='-4' OR REGION='-5' OR REGION='-9' OR REGION=' ') x164=-1. IF (REGIONW='-1' OR REGIONW='-2' OR REGIONW='-3' OR REGIONW='-4' OR REGIONW='-5' OR REGIONW='-9' OR REGIONW=' ') x165=-1. IF (REGION1Y='-1' OR REGION1Y='-2' OR REGION1Y='-3' OR REGION1Y='-4' OR REGION1Y='-5' OR REGION1Y='-9' OR REGION1Y=' ') x166=-1. EXECUTE. AGGREGATE OUTFILE=* MODE=ADDVARIABLES OVERWRITE=YES / x1 TO x166=MAX(x1 TO x166). EXECUTE. DO REPEAT var=SIGNISAL EDUCFILD COURFILD HATFIELD HHSEQNUM REFYEAR REFWEEK INTWEEK DEGURBA HHTYPE HHINST INTWAVE INTQUEST REM HHPRIV HHLINK HHSPOU HHFATH HHMOTH SEX AGE MARSTAT NATIONAL YEARESID COUNTRYB PROXY WSTATOR NOWKREAS STAPRO SUPVISOR SIZEFIRM COUNTRYW YSTARTWK MSTARTWK WAYJFOUN FTPT FTPTREAS TEMP TEMPREAS TEMPDUR TEMPAGCY SHIFTWK EVENWK NIGHTWK SATWK SUNWK HWUSUAL HWACTUAL HWOVERP HWOVERPU HOURREAS WISHMORE WAYMORE HWWISH HOMEWK LOOKOJ LOOKREAS EXIST2J STAPRO2J HWACTUA2 EXISTPR YEARPR MONTHPR LEAVREAS STAPROPR ISCOPR3D SEEKWORK SEEKREAS SEEKTYPE SEEKDUR METHODA METHODB METHODC METHODD METHODE METHODF METHODG METHODH METHODI METHODJ METHODK METHODL METHODM WANTWORK AVAILBLE AVAIREAS PRESEEK NEEDCARE REGISTER MAINSTAT EDUCSTAT EDUCLEVL COURATT COURLEN COURPURP COURWORH HAT97LEV HATYEAR WSTAT1Y STAPRO1Y NA111Y1D COUNTR1Y ILOSTAT NA111D NA11S ISCO1D NA112J1D NA112JS NA11PR1D NA11PRS ISCOPR1D DURUNE EDUC4WN HATLEV1D NA111YS METHFW LENTR4W PURP4W HWUSTRAI ISCO3D STARTIME LEAVTIME LEAVCLAS HHCHILDR HHWKSTAT HHPARTNR HHPARENT HHCOMP HATLFATH HATLMOTH HHNBCHLD HHNB0014 HHNBCH2 HHNBCH5 HHNBCH8 HHNBCH11 HHNBCH14 HHNBCH17 HHNBCH24 HHNBPERS HHNBEMPL HHNBINAC HHNBUNEM HHNBWORK HHAGEYG HHAGE14 HHNBOLD HHPERS IS881D IS88PR3D IS88PR1D IS883D AHM2007_AWNUMBR AHM2007_AWROAD AHM2007_AWJOB AHM2007_WHPNUMBR AHM2007_WHPLIMAB AHM2007_WHPJOB AHM2007_FACTORWB AHM2007_FACTORPH AHM2007_AWBACKW AHM2007_WHPTYPEP AHM2007_WHPDOFF / varx=x1 TO x163. IF (varx<0) var=-3. END REPEAT. EXECUTE. DO REPEAT var=REGION REGIONW REGION1Y / varx=x164 x165 x166. IF (varx<0) var="-3". END REPEAT. EXECUTE. DELETE VARIABLES x1 TO x166. EXECUTE. *--- Recode or Rename Variabels in Specific Cases ---. * none. * Outdated: * in certain cases, members of the armed forces had been coded wrong in the 3-digit ISCO (until 2010). * RECODE IS883D IS88PR3D (11=10) (ELSE=COPY). * EXECUTE. *--- Declare User-Missing Values ---. MISSING VALUES HHSEQNUM REFYEAR REFWEEK INTWEEK COUNTRY DEGURBA HHTYPE HHINST INTWAVE INTQUEST REM YEAR HHPRIV HHLINK HHSPOU HHFATH HHMOTH SEX AGE MARSTAT NATIONAL YEARESID COUNTRYB PROXY WSTATOR NOWKREAS STAPRO SIGNISAL SUPVISOR SIZEFIRM COUNTRYW YSTARTWK MSTARTWK WAYJFOUN FTPT FTPTREAS TEMP TEMPREAS TEMPDUR TEMPAGCY SHIFTWK EVENWK NIGHTWK SATWK SUNWK HWUSUAL HWACTUAL HWOVERP HWOVERPU HOURREAS WISHMORE WAYMORE HWWISH HOMEWK LOOKOJ LOOKREAS EXIST2J STAPRO2J HWACTUA2 EXISTPR YEARPR MONTHPR LEAVREAS STAPROPR ISCOPR3D SEEKWORK SEEKREAS SEEKTYPE SEEKDUR METHODA METHODB METHODC METHODD METHODE METHODF METHODG METHODH METHODI METHODJ METHODK METHODL METHODM WANTWORK AVAILBLE AVAIREAS PRESEEK NEEDCARE REGISTER MAINSTAT EDUCSTAT EDUCLEVL EDUCFILD COURATT COURLEN COURPURP COURFILD COURWORH HAT97LEV HATFIELD HATYEAR WSTAT1Y STAPRO1Y NA111Y1D COUNTR1Y ILOSTAT NA111D NA11S ISCO1D NA112J1D NA112JS NA11PR1D NA11PRS ISCOPR1D DURUNE EDUC4WN HATLEV1D NA111YS METHFW LENTR4W PURP4W HWUSTRAI ISCO3D STARTIME LEAVTIME LEAVCLAS HHCHILDR HHWKSTAT HHPARTNR HHPARENT HHCOMP HATLFATH HATLMOTH HHNBCHLD HHNB0014 HHNBCH2 HHNBCH5 HHNBCH8 HHNBCH11 HHNBCH14 HHNBCH17 HHNBCH24 HHNBPERS HHNBEMPL HHNBINAC HHNBUNEM HHNBWORK HHAGEYG HHAGE14 HHNBOLD HHPERS IS881D IS88PR3D IS88PR1D IS883D AHM2007_AWNUMBR AHM2007_AWROAD AHM2007_AWJOB AHM2007_WHPNUMBR AHM2007_WHPLIMAB AHM2007_WHPJOB AHM2007_FACTORWB AHM2007_FACTORPH AHM2007_AWBACKW AHM2007_WHPTYPEP AHM2007_WHPDOFF (-9 THRU -1). EXECUTE. *--- Delete Recoded Alphanumeric Variables ---. DELETE VARIABLES COUNTRY_ REGION_ COUNTRYB_ REGIONW_ COUNTR1Y_ REGION1Y_ NATIONAL_ NA111Y1D_ NA111D_ NA112J1D_ YEARESID_ NA11PR1D_ HATLEV1D_ HATLFATH_ HATLMOTH_. EXECUTE. *--- Define Variable and Value Labels ---. INCLUDE FILE=!QUOTE(!label_syntax_path). *--- Sort Variables ---. MATCH FILES FILE =* / KEEP=QHHNUM COEFF QUARTER HHNUM REC HHSEQNUM REFYEAR REFWEEK INTWEEK COUNTRY REGION DEGURBA HHTYPE HHINST INTWAVE INTQUEST REM YEAR HHPRIV HHLINK HHSPOU HHFATH HHMOTH SEX AGE MARSTAT NATIONAL YEARESID COUNTRYB PROXY WSTATOR NOWKREAS STAPRO SIGNISAL SUPVISOR SIZEFIRM COUNTRYW REGIONW YSTARTWK MSTARTWK WAYJFOUN FTPT FTPTREAS TEMP TEMPREAS TEMPDUR TEMPAGCY SHIFTWK EVENWK NIGHTWK SATWK SUNWK HWUSUAL HWACTUAL HWOVERP HWOVERPU HOURREAS WISHMORE WAYMORE HWWISH HOMEWK LOOKOJ LOOKREAS EXIST2J STAPRO2J HWACTUA2 EXISTPR YEARPR MONTHPR LEAVREAS STAPROPR ISCOPR3D SEEKWORK SEEKREAS SEEKTYPE SEEKDUR METHODA METHODB METHODC METHODD METHODE METHODF METHODG METHODH METHODI METHODJ METHODK METHODL METHODM WANTWORK AVAILBLE AVAIREAS PRESEEK NEEDCARE REGISTER MAINSTAT EDUCSTAT EDUCLEVL EDUCFILD COURATT COURLEN COURPURP COURFILD COURWORH HAT97LEV HATFIELD HATYEAR WSTAT1Y STAPRO1Y NA111Y1D COUNTR1Y REGION1Y ILOSTAT NA111D NA11S ISCO1D NA112J1D NA112JS NA11PR1D NA11PRS ISCOPR1D DURUNE EDUC4WN HATLEV1D NA111YS METHFW LENTR4W PURP4W HWUSTRAI ISCO3D STARTIME LEAVTIME LEAVCLAS HHCHILDR HHWKSTAT HHPARTNR HHPARENT HHCOMP HATLFATH HATLMOTH HHNBCHLD HHNB0014 HHNBCH2 HHNBCH5 HHNBCH8 HHNBCH11 HHNBCH14 HHNBCH17 HHNBCH24 HHNBPERS HHNBEMPL HHNBINAC HHNBUNEM HHNBWORK HHAGEYG HHAGE14 HHNBOLD HHPERS AHM2007_AWNUMBR AHM2007_AWROAD AHM2007_AWBACKW AHM2007_AWJOB AHM2007_WHPNUMBR AHM2007_WHPTYPEP AHM2007_WHPLIMAB AHM2007_WHPDOFF AHM2007_WHPJOB AHM2007_FACTORWB AHM2007_FACTORPH IS881D IS88PR3D IS88PR1D IS883D RELEASE. *--- Save file of current loop run ---. SAVE OUTFILE=!QUOTE(!CONCAT(!spss_data_path,!filestub,'_ah.sav')). !DOEND. *--- Compile and save Final File ---. !LET !firstfile=1. !DO !filestub !IN (!filestublist). !IF (!firstfile=1) !THEN GET FILE=!QUOTE(!CONCAT(!spss_data_path,!filestub,'_ah.sav')). !LET !firstfile=0. !ELSE ADD FILES FILE=* /FILE=!QUOTE(!CONCAT(!spss_data_path,!filestub,'_ah.sav')). !IFEND. !DOEND. SAVE OUTFILE=!QUOTE(!CONCAT(!spss_data_path,!finalfile)). !ENDDEFINE. readmac.