* PASW Statistics 18 Version 18.0.2 for Windows. set decimal dot olang = GERMAN width 132 length none. * Bei SPSS vor V16 ggf. "set unicode" auskommentieren. set unicode no. * Wechseln ins Arbeitsverzeichnis, z.B. c:\temp . CD "". * -----------------------------------------------------------------. * SPSS-Programm zur Ermittlung des Haupteinkommensbeziehers im * Mikrozensus 1996-2004. * * Quelle: * Schimpl-Neimanns, Bernhard; Siegel, Tony (2011): * Typisierung des Haupteinkommensbeziehers im Mikrozensus 1996-2004. * GESIS-Technical Report Nr. 2011/07. Mannheim: GESIS. * URL: http://www.gesis.org/fileadmin/upload/forschung/ * publikationen/gesis_reihen/gesis_methodenberichte/2011/ * TechnicalReport_2017_-07.pdf . * * Download dieser Datei: * http://www.gesis.org/download/fileadmin/missy/klassifikationen/ * Haupteinkommensbezieher/heb_mz1996_2004.sps . * * E-Mail: gml[at]gesis.org . * -----------------------------------------------------------------. * Scientific Use File Mikrozensus 1996-2004 mit vollstaendigem * Dateinamen inkl. Verzeichnis einlesen und 'JAHR' durch das * Erhebungsjahr im Mikrozensus ersetzen; z.B. "mz1998.sav". get file = "". * Die Variable EF5 "Nr. der Person im Haushalt" hat im MZ 1996 den * Namen EF5u1. Falls mit dem MZ 1996 gearbeitet wird: . get file = "" /rename = (EF5u1 = EF5). * Programmteil I . * 1) die Anzahl selbstständiger Landwirte in Vollzeittätigkeit * innerhalb eines Privathaushalts (EF372_a). * 2) die Anzahl der Personen im Alter von 15 oder mehr Jahren * innerhalb eines Privathaushalts,von denen Einkommensangaben * vorliegen (EF372_b). * 3) die maximale Einkommensklasse innerhalb eines Privathaushalts von * Personen im Alter von 15 Jahren oder älter mit Angaben zum * Einkommen (EF372_m). * Sortierung zur Abgrenzung von Haushalten nach * Bundesland (EF1),Auswahlbezirksnummer (EF3) und * Nummer des Haushalts im Auswahlbezirk (EF4). sort cases by EF1 EF3 EF4. do if (EF507 = 1 & EF372 = 50 & EF504 = 1 & (EF127 = 01 | EF127 = 02) & EF129 >= 011 & EF129 <= 050 & EF141 > 39). compute EF372a = 1. else. compute EF372a = 0. end if. formats EF372a (f2.0). execute. * Gültige Einkommensangaben bis MZ 2000: DM, ab MZ 2001: EURO . * Änderungen der Klassenobergrenzen bis MZ 1999: [18] 7500 und mehr DM . * ab MZ 2000: [24] 35000 oder mehr DM bzw. MZ 2004: [24] 18000 Euro und mehr. * Kategorienänderungen bleiben im Folgenden unberücksichtigt. do if (EF372 >= 01 & EF372 <= 24 & EF30 >= 15). compute EF372b = 1. else. compute EF372b = 0. end if. formats EF372b (f2.0). execute. do if (EF30 >= 15 & EF372 >= 01 & EF372 <= 24). compute EF372m = EF372. else. compute EF372m = 0. end if. formats EF372m (f2.0). execute. aggregate outfile=* mode=addvariables /presorted /break EF1 EF3 EF4 /EF372_a = sum(EF372a) /EF372_b = sum(EF372b) /EF372_m = max(EF372m). formats EF372_a EF372_b EF372_m (f10.0). * Programmteil II . * 4) Anzahl der Personen im Privathaushalt, deren Einkommensklasse * der maximalen Einkommensklasse im Privathaushalt entspricht * (nEF372_m). * 5) Niedrigste Personennummer innerhalb des Privathaushalts der * Person, deren Einkommensklasse der maximalen Einkommensklasse * im Privathaushalt entspricht (EF5_m). do if (EF372m = EF372_m). compute EF5m = EF5 /* MZ 1997-2004, MZ 1996: EF5u1 */ . else. compute EF5m = 99. end if. formats EF5m (f2.0). execute. do if (EF372m = EF372_m). compute nEF372 = 1. else. compute nEF372 = 0. end if. formats nEF372 (f2.0). execute. aggregate outfile=* mode=addvariables /presorted /break EF1 EF3 EF4 /EF5_m = min(EF5m) /nEF372_m = sum(nEF372). formats EF5_m nEF372_m (f10.0). * Programmteil III. * 6) Zuweisung der Werte zur Typisierung Haupteinkommensbezieher * im Haushalt (HEB). do if (EF506 = 1 & EF372_a > 0 & EF507 = 1). compute HEB = 1. else if (EF506 = 1 & EF372_a > 0 & EF507 > 1). compute HEB = 5. else if (EF506 = 1 & EF372_a = 0 & EF372_b >= 1 & nEF372_m = 1 & EF372m = EF372_m). compute HEB = 2. else if (EF506 = 1 & EF372_a = 0 & EF372_b >= 1 & nEF372_m > 1 & EF372m = EF372_m & EF5 = EF5_m). compute HEB = 3. else if (EF506 = 1 & EF372_a = 0 & EF372_b >= 1 & nEF372_m > 1 & EF372m = EF372_m & EF5 > EF5_m). compute HEB = 6. else if (EF506 = 1 & EF372_a = 0 & EF372_b >= 1 & EF372m < EF372_m & EF30 >= 15 & EF372 <= 24 ). compute HEB = 7. else if (EF506 = 1 & EF372_a = 0 & EF372_b = 0 & EF507 = 1). compute HEB = 4. else if (EF506 = 1 & EF372_a = 0 & EF372_b = 0 & EF507 > 1). compute HEB = 9. else if (EF506 = 1 & EF372_a = 0 & EF372_b >= 1 & (EF372 > 24 | EF30 < 15)). compute HEB = 8. else. compute HEB = 0. end if. variable labels HEB 'Haupteinkommensbezieher MZ'. value labels HEB 1 'Person ist Haushaltsbezugsperson und im Haushalt gibt es ' + 'mindestens eine(n) selbststaendige(n) Landwirt(in) in Vollzeit' 2 'Person hat alleine die hoechste Einkommensklasse im Haushalt' 3 'Person hat mit mindestens einer weiteren Person im Haushalt ' + 'die hoechste Einkommensklasse und von allen Personen mit der ' + 'hoechsten Einkommensklasse die niedrigste Personennummer im ' + 'Haushalt' 4 'Person ist Haushaltsbezugsperson und im Haushalt gibt es keine ' + 'Person mit Einkommensangaben bzw. keine(n) selbststaendigen ' + 'Landwirt(in) in Vollzeit' 5 'Person ist nicht Haushaltsbezugsperson und im Haushalt gibt es ' + 'mindestens eine(n) selbststaendige(n) Landwirt(in) in Vollzeit' 6 'Person hat mit mindestens einer weiteren Person im Haushalt ' + 'die hoechste Einkommensklasse und von allen Personen mit der ' + 'hoechsten Einkommensklasse nicht die niedrigste Personennummer im ' + 'Haushalt' 7 'Person hat Einkommensangaben, aber nicht die hoechste ' + 'Einkommensklasse, und ist 15 Jahre oder aelter' 8 'Person hat keine Einkommensangaben, aber andere ' + 'Haushaltsmitglieder, oder Person ist juenger als 15 Jahre' 9 'Person ohne Einkommensangabe, alle anderen Haushaltsmitglieder ' + 'ebenfalls ohne Angabe des Individualeinkommens und Person nicht ' + 'Bezugsperson des Haushalts' 0 'Trifft nicht zu (Gemeinschaftsunterkunft)'. formats HEB (f2.0). fre var HEB. * ========= PROGRAMMENDE =========.