Dokumentummal kapcsolatos tevékenységek

jövedelemváltozó syntax 1992

A fájl letöltéséhez kattintson ide.

Méret 93.6 kB - Fájltípus text/plain

Fájl tartalma

*jov92_01_07.sps************************************************************.
*                                                                    *.
*                  COMPUTATION OF INCOME VARIABLES                   *.
*        1th WAVE OF HUNGARIAN HOUSEHOLD PANEL SURVEY 1992           *.
*              SOCIAL RESEARCH INFORMATICS CENTER (TARKI)            *.
*                                                                    *.
**********************************************************************.


* Note: H1VFARA1=H#VJARA1 (type mismatch error in 1st wave).

get file = 'c:\mhp jovedelemjavitas\adatok\PANEL92_0714.sav'.

* krdezi hiba.


if (eazon92=1713101) e1jtamap=1.

if (eazon92=1713101) e1jtamok=1.

if (eazon92=1713101) e1jkerap=1.

if (eazon92=1713101) e1jkerma=1.

if (eazon92=1713101) e1jkerju=1.

if (eazon92=1713101) e1jkerjl=1.

if (eazon92=1713101) e1jkerau=1.

if (eazon92=1713101) e1jkersz=1.

if (eazon92=1713101) e1jkerok=1.

if (eazon92=1713101) e1jkerno=1.

if (eazon92=1713101) e1jkerde=1.

if (eazon92=1713101) e1jkerja=1.

if (eazon92=1713101) e1jkerfe=1.

if (eazon92=1713101) e1jkermr=1.

save outfile = 'C:\MHP jovedelemjavitas\adatok\92-es1.SAV'
    /compressed.

      
********************************************************.

Get File = 'C:\MHP jovedelemjavitas\adatok\92-es1.SAV'
   /keep=      case
               eazon92  hazon92  e1kerdiv hullam92 akttag92 rsel92
               h1HTSZ92 e1htfovi e1MAKTIV e1MMIBEL
               h1VINGA1 h1VFOLA1 h1VTELA1 h1VNYAA1 h1VAUTA1
               h1VFARA1 h1VINGL1 h1VFOLL1 h1VTELL1 h1VNYAL1
               h1VAUTL1 h1VJARL1 h1jLAKK1 h1jALBK1 h1jNYAK1 h1jGEPK1
               h1jFOLK1 h1jNYER1 h1jSEG1  h1jTAMO1 h1jKARP1
               h1GAELAP h1GAELFP h1GAELFT h1GAFOGP h1GNELAP
               h1GNELFP h1GNELFT h1GNFOGP
               e1jOBECS e1FEVEGP e1jPREMP e1jNAPIP e1jUJITP e1jEGYP
               e1jVPENZ e1jVSUMP
               e1jFOMfk e1jFOMfm e1jTAPfk e1jTAPfm e1jTULfk e1jTULfm
               e1jETKfk e1jETKfm e1jGKHfk e1jGKHfm e1jUTHfk e1jUTHfm
               e1jLAHfk e1jLAHfm e1jEGHfk e1jEGHfm e1jMUNfk e1jMUNfm
               e1jMUSfk e1jMUSfm 
               e1jATKfk e1jATKfm e1JOSZfk e1JOSZfm e1jGYEfk e1jGYEfm
               e1jGYSfk e1jGYSfm e1jCSPfk e1jCSPfm e1jNYUfk e1jNYUfm
               e1jRNYfk e1jRNYfm e1jENYfk e1jENYfm e1jSEGfk e1jSEGfm
               e1jNEGfk e1jNEGfm e1jTARfk e1jTARfm e1jEJDfk e1jEJDfm
                                 e1jKMUSU e1jASMSU e1jAMGSU e1jASZSU
               e1jAERSU e1jATASU e1jAFUSU e1jKERSU e1jJUTSU e1jBORSU
               e1jTAMSU e1jELLSU e1jBIZSU
               e1jFOMAP e1jFOMMA e1jFOMJU e1jFOMJL e1jFOMAU e1jFOMSZ
               e1jFOMOK e1jFOMNO e1jFOMDE e1jFOMJA e1jFOMFE e1jFOMMR
               e1jTAPAP e1jTAPMA e1jTAPJU e1jTAPJL e1jTAPAU e1jTAPSZ
               e1jTAPOK e1jTAPNO e1jTAPDE e1jTAPJA e1jTAPFE e1jTAPMR
               e1jTULAP e1jTULMA e1jTULJU e1jTULJL e1jTULAU e1jTULSZ
               e1jTULOK e1jTULNO e1jTULDE e1jTULJA e1jTULFE e1jTULMR
               e1jETKAP e1jETKMA e1jETKJU e1jETKJL e1jETKAU e1jETKSZ
               e1jETKOK e1jETKNO e1jETKDE e1jETKJA e1jETKFE e1jETKMR
               e1jGKHAP e1jGKHMA e1jGKHJU e1jGKHJL e1jGKHAU e1jGKHSZ
               e1jGKHOK e1jGKHNO e1jGKHDE e1jGKHJA e1jGKHFE e1jGKHMR
               e1jUTHAP e1jUTHMA e1jUTHJU e1jUTHJL e1jUTHAU e1jUTHSZ
               e1jUTHOK e1jUTHNO e1jUTHDE e1jUTHJA e1jUTHFE e1jUTHMR
               e1jLAHAP e1jLAHMA e1jLAHJU e1jLAHJL e1jLAHAU e1jLAHSZ
               e1jLAHOK e1jLAHNO e1jLAHDE e1jLAHJA e1jLAHFE e1jLAHMR
               e1jEGHAP e1jEGHMA e1jEGHJU e1jEGHJL e1jEGHAU e1jEGHSZ
               e1jEGHOK e1jEGHNO e1jEGHDE e1jEGHJA e1jEGHFE e1jEGHMR
               e1jMUNAP e1jMUNMA e1jMUNJU e1jMUNJL e1jMUNAU e1jMUNSZ
               e1jMUNOK e1jMUNNO e1jMUNDE e1jMUNJA e1jMUNFE e1jMUNMR
               e1jMUSAP e1jMUSMA e1jMUSJU e1jMUSJL e1jMUSAU e1jMUSSZ
               e1jMUSOK e1jMUSNO e1jMUSDE e1jMUSJA e1jMUSFE e1jMUSMR
               e1jATKAP e1jATKMA e1jATKJU e1jATKJL e1jATKAU e1jATKSZ 
               e1jATKOK e1jATKNO e1jATKDE e1jATKJA e1jATKFE e1jATKMR
               e1joszAP e1joszMA e1joszJU e1joszJL e1joszAU e1joszSZ
               e1joszOK e1joszNO e1joszDE e1joszJA e1joszFE e1joszMR
               e1jGYEAP e1jGYEMA e1jGYEJU e1jGYEJL e1jGYEAU e1jGYESZ
               e1jGYEOK e1jGYENO e1jGYEDE e1jGYEJA e1jGYEFE e1jGYEMR
               e1jGYSAP e1jGYSMA e1jGYSJU e1jGYSJL e1jGYSAU e1jGYSSZ
               e1jGYSOK e1jGYSNO e1jGYSDE e1jGYSJA e1jGYSFE e1jGYSMR
               e1jCSPAP e1jCSPMA e1jCSPJU e1jCSPJL e1jCSPAU e1jCSPSZ
               e1jCSPOK e1jCSPNO e1jCSPDE e1jCSPJA e1jCSPFE e1jCSPMR
               e1jNYUAP e1jNYUMA e1jNYUJU e1jNYUJL e1jNYUAU e1jNYUSZ
               e1jNYUOK e1jNYUNO e1jNYUDE e1jNYUJA e1jNYUFE e1jNYUMR
               e1jRNYAP e1jRNYMA e1jRNYJU e1jRNYJL e1jRNYAU e1jRNYSZ
               e1jRNYOK e1jRNYNO e1jRNYDE e1jRNYJA e1jRNYFE e1jRNYMR
               e1jENYAP e1jENYMA e1jENYJU e1jENYJL e1jENYAU e1jENYSZ
               e1jENYOK e1jENYNO e1jENYDE e1jENYJA e1jENYFE e1jENYMR
               e1jSEGAP e1jSEGMA e1jSEGJU e1jSEGJL e1jSEGAU e1jSEGSZ
               e1jSEGOK e1jSEGNO e1jSEGDE e1jSEGJA e1jSEGFE e1jSEGMR
               e1jNEGAP e1jNEGMA e1jNEGJU e1jNEGJL e1jNEGAU e1jNEGSZ
               e1jNEGOK e1jNEGNO e1jNEGDE e1jNEGJA e1jNEGFE e1jNEGMR
               e1jTARAP e1jTARMA e1jTARJU e1jTARJL e1jTARAU e1jTARSZ
               e1jTAROK e1jTARNO e1jTARDE e1jTARJA e1jTARFE e1jTARMR
               e1jEJDAP e1jEJDMA e1jEJDJU e1jEJDJL e1jEJDAU e1jEJDSZ
               e1jEJDOK e1jEJDNO e1jEJDDE e1jEJDJA e1jEJDFE e1jEJDMR
               e1jKMUAP e1jKMUMA e1jKMUJU e1jKMUJL e1jKMUAU e1jKMUSZ
               e1jKMUOK e1jKMUNO e1jKMUDE e1jKMUJA e1jKMUFE e1jKMUMR
               e1jASMAP e1jASMMA e1jASMJU e1jASMJL e1jASMAU e1jASMSZ
               e1jASMOK e1jASMNO e1jASMDE e1jASMJA e1jASMFE e1jASMMR
               e1jAMGAP e1jAMGMA e1jAMGJU e1jAMGJL e1jAMGAU e1jAMGSZ
               e1jAMGOK e1jAMGNO e1jAMGDE e1jAMGJA e1jAMGFE e1jAMGMR
               e1jASZOK e1jASZNO e1jASZDE e1jASZJA e1jASZFE e1jASZMR
               e1jASZAP e1jASZMA e1jASZJU e1jASZJL e1jASZAU e1jASZSZ
               e1jAERAP e1jAERMA e1jAERJU e1jAERJL e1jAERAU e1jAERSZ
               e1jAEROK e1jAERNO e1jAERDE e1jAERJA e1jAERFE e1jAERMR
               e1jATAAP e1jATAMA e1jATAJU e1jATAJL e1jATAAU e1jATASZ
               e1jATAOK e1jATANO e1jATADE e1jATAJA e1jATAFE e1jATAMR
               e1jAFUAP e1jAFUMA e1jAFUJU e1jAFUJL e1jAFUAU e1jAFUSZ
               e1jAFUOK e1jAFUNO e1jAFUDE e1jAFUJA e1jAFUFE e1jAFUMR
               e1jKERAP e1jKERMA e1jKERJU e1jKERJL e1jKERAU e1jKERSZ
               e1jKEROK e1jKERNO e1jKERDE e1jKERJA e1jKERFE e1jKERMR
               e1jJUTAP e1jJUTMA e1jJUTJU e1jJUTJL e1jJUTAU e1jJUTSZ
               e1jJUTOK e1jJUTNO e1jJUTDE e1jJUTJA e1jJUTFE e1jJUTMR
               e1jBORAP e1jBORMA e1jBORJU e1jBORJL e1jBORAU e1jBORSZ
               e1jBOROK e1jBORNO e1jBORDE e1jBORJA e1jBORFE e1jBORMR
               e1jTAMAP e1jTAMMA e1jTAMJU e1jTAMJL e1jTAMAU e1jTAMSZ
               e1jTAMOK e1jTAMNO e1jTAMDE e1jTAMJA e1jTAMFE e1jTAMMR
               e1jELLAP e1jELLMA e1jELLJU e1jELLJL e1jELLAU e1jELLSZ
               e1jELLOK e1jELLNO e1jELLDE e1jELLJA e1jELLFE e1jELLMR
               e1jBIZAP e1jBIZMA e1jBIZJU e1jBIZJL e1jBIZAU e1jBIZSZ
               e1jBIZOK e1jBIZNO e1jBIZDE e1jBIZJA e1jBIZFE e1jBIZMR
               e1ffogvi e1fgform e1jvszam e1jvnyer.




* Az aktv szemlyek kivlasztsa.
* Filter cases for persons active (i.e. participants) in
* the current wave of HHP survey.

select if (akttag92 = 1).
execute.

        
**********************************************************************.
*              DEFINITION of MISSING VALUES                          *.
**********************************************************************.



temporary.
select if (e1htfovi=1).
fre h1VINGA1 h1VFOLA1 h1VTELA1 h1VNYAA1 h1VAUTA1
             h1VFARA1 h1VINGL1 h1VFOLL1 h1VTELL1 h1VNYAL1
             h1VAUTL1 h1VJARL1 h1jLAKK1 h1jALBK1 h1jNYAK1 h1jGEPK1
             h1jFOLK1 h1jNYER1 h1jSEG1  h1jTAMO1 h1jKARP1
             h1GAELAP h1GAELFP h1GAELFT h1GAFOGP h1GNELAP
             h1GNELFP h1GNELFT h1GNFOGP.

* Missing value e1jOBECS e1FEVEGP e1jPREMP e1jNAPIP e1jUJITP e1jEGYP
              e1jVPENZ e1jVSUMP (9).

fre e1jOBECS e1FEVEGP e1jPREMP e1jNAPIP e1jUJITP e1jEGYP
              e1jVPENZ e1jVSUMP.


frequency     e1jFOMfk e1jFOMfm e1jTAPfk e1jTAPfm e1jTULfk e1jTULfm
              e1jETKfk e1jETKfm e1jGKHfk e1jGKHfm e1jUTHfk e1jUTHfm
              e1jLAHfk e1jLAHfm e1jEGHfk e1jEGHfm e1jMUNfk e1jMUNfm
              e1jMUSfk e1jMUSfm  
              e1jATKfk e1jATKfm e1joszfk e1joszfm e1jGYEfk e1jGYEfm
              e1jGYSfk e1jGYSfm e1jCSPfk e1jCSPfm e1jNYUfk e1jNYUfm
              e1jRNYfk e1jRNYfm e1jENYfk e1jENYfm e1jSEGfk e1jSEGfm
              e1jNEGfk e1jNEGfm e1jTARfk e1jTARfm e1jEJDfk e1jEJDfm
              e1jKMUSU e1jASMSU e1jAMGSU e1jASZSU
              e1jAERSU e1jATASU e1jAFUSU e1jKERSU e1jJUTSU e1jBORSU
              e1jTAMSU e1jELLSU e1jBIZSU /sta all.





**********************************************************************.
*              Recoding missing values to zeros                      *.
**********************************************************************.


* I. Hztarts krdiv - Household questionnaire.

* A 57,62, 67-74 krds - QUESTION 57,62 67-74.
* Income brackets should be recoded.

*RECODING *

* C vlaszlap.
recode h1VINGA1 h1VFOLA1 h1VTELA1 h1VNYAA1 h1VAUTA1
       h1VFARA1 h1VINGL1 h1VFOLL1 h1VTELL1 h1VNYAL1
       h1VAUTL1 h1VJARL1 (SYSMIS, MISSING, 0 = 0)
      (1=  50000)
      (2= 200000)
      (3= 400000)
      (4= 700000)
      (5= 850000)
      (6=2000000)
      (7=4000000)
      (8=7000000)
      (9=9000000).

* B vlaszlap.
recode e1jVPENZ e1jVSUMP h1jLAKK1 h1jALBK1 h1jNYAK1 h1jGEPK1
       h1jFOLK1 h1jNYER1 h1jSEG1  h1jTAMO1 h1jKARP1
       h1GAELAP h1GAELFP h1GAELFT h1GAFOGP h1GNELAP
       h1GNELFP h1GNELFT h1GNFOGP (SYSMIS, MISSING, 0 = 0)
      (1= 5000)
      (2=20000)
      (3=40000)
      (4=60000)
      (5=90000)
      (6=200000)
      (7=400000)
      (8=700000)
      (9=900000).


fre e1jvpenz e1jvsump.

temporary.
select if (e1htfovi=1).
fre h1VINGA1 h1VFOLA1 h1VTELA1 h1VNYAA1 h1VAUTA1
    h1VFARA1 h1VINGL1 h1VFOLL1 h1VTELL1 h1VNYAL1
    h1VAUTL1 h1VJARL1
    h1jLAKK1 h1jALBK1 h1jNYAK1 h1jGEPK1
    h1jFOLK1 h1jNYER1 h1jSEG1  h1jTAMO1 h1jKARP1
    h1GAELAP h1GAELFP h1GAELFT h1GAFOGP h1GNELAP
    h1GNELFP h1GNELFT h1GNFOGP.

* Individual questionnaire.

recode e1jOBECS e1FEVEGP e1jPREMP e1jNAPIP e1jUJITP e1jEGYP   
       (SYSMIS, MISSING, 0 = 0) (else=copy).

recode  e1jFOMfk e1jFOMfm e1jTAPfk e1jTAPfm e1jTULfk e1jTULfm
        e1jETKfk e1jETKfm e1jGKHfk e1jGKHfm e1jUTHfk e1jUTHfm
        e1jLAHfk e1jLAHfm e1jEGHfk e1jEGHfm e1jMUNfk e1jMUNfm
        e1jMUSfk e1jMUSfm 
        e1jATKfk e1jATKfm e1joszfk e1joszfm e1jGYEfk e1jGYEfm
        e1jGYSfk e1jGYSfm e1jCSPfk e1jCSPfm e1jNYUfk e1jNYUfm
        e1jRNYfk e1jRNYfm e1jENYfk e1jENYfm e1jSEGfk e1jSEGfm
        e1jNEGfk e1jNEGfm e1jTARfk e1jTARfm e1jEJDfk e1jEJDfm
        e1jKMUSU e1jASMSU e1jAMGSU e1jASZSU
        e1jAERSU e1jATASU e1jAFUSU e1jKERSU e1jJUTSU e1jBORSU
        e1jTAMSU e1jELLSU e1jBIZSU (SYSMIS, MISSING, 0 = 0) 
        (else=copy).

execute.
**********************************************************************.
*             a hztarts file-bl kpzett vltozk                  *.
*            VARIABLES FROM THE HOUSEHOLD QUESTIONNAIRE              *.
**********************************************************************.
*               CREATING SUMMARY INCOME VARIABLES                    *.
**********************************************************************.

* Ingatlan vsrls, kiads s elads: 57. s 58. krd, mtrgy nlkl. 
* REAL estate & PROPERTY: Income from selling FLAT, HOUSE, 
* AGRICULTURAL PROPERTY, BUILDING PLOT, cottage, car, tractor, etc.

Compute h1jIELAD = SUM (h1VINGA1 + h1VFOLA1 + h1VTELA1 + h1VNYAA1 +
                        h1VAUTA1 + h1VFARA1).
Variable Label h1jIELAD 'Ingatlan eladsi jvedelem'.

* Expenses of Buying flat, house, agricultural property, 
* building plot, cottage, car, tractor, etc.

Compute h1jIVESZ = SUM (h1VINGL1 + h1VFOLL1 + h1VTELL1 + h1VNYAL1 +
                        h1VAUTL1 + h1VJARL1).
Variable Label h1jIVESZ 'Ingatlan vsrlsi kiads'.
* Income from Renting & Leasing propety: Flat, Room, cottage, 
* Machine, Agricultural property.

Compute h1jKIAD = SUM (h1jLAKK1 + h1jALBK1 + h1jNYAK1 + h1jGEPK1 +
                       h1jFOLK1).
Variable Label h1jKIAD 'Ingatlan brbeadsnak jvedelme'.

* Shared income of household from capital.

Compute h1jTOKE = h1jIELAD + h1jKIAD.
Variable Label h1jTOKE 'Hztarts kzs tkejvedelme'.

* 67-74. krds: Mezgazdasgi termels s nfogyaszts.
* Question 67-74: Incomes from Agricultural production & consumption.

* Market income from agricultural production.

Compute h1jMGELA = SUM (h1GAELAP + h1GAELFP + h1GNELAP + h1GNELFP).
Variable Label h1jMGELA 'Hztarts MG. rtkests jv.'.

* Incomes from self-consumption.

Compute h1jMGTAK = SUM (h1GAELFT + h1GAFOGP + h1GNELFT + h1GNFOGP).
Variable Label h1jMGTAK 'Hztarts MG. fogyaszts megtakarts'.

* Total Agricultural incomes of household.

Compute h1jMGOSZ = SUM (h1jMGELA + h1jMGTAK).
Variable Label h1jMGOSZ 'Hztarts MG. sszjvedelme'.


* sszes kzs hztartsjvedelem. Figyelem! Az ingatlan s mtrgy
* eladssbl szrmaz jvedelmek nem szerepelnek (h1jielad).

* Total shared income of household. 
* ie., variables from household quetionnaire
* note: variable h1jielad is excluded.

Compute h1jOVOSZ = h1jKIAD + h1jSEG1 + h1jTAMO1 + h1jMGOSZ + h1jNYER1 +
                   h1jKARP1.
Variable Label h1jOVOSZ 'Hztarts kzs sszjvedelme 92'.
* Formats h1HTSZ92 (F2.0).
Formats h1jIELAD TO h1jOVOSZ (F9.0).
Execute.



*********************************************************************.
*    Az egyni s helyettest krdv vltozinak feldolgozsa     *.
*  Variables from the individual & substitutional questionnaires    *.
*********************************************************************.
*          Variable recode - 65 krds - Question 65                *.


Recode e1jFOMAP e1jFOMMA e1jFOMJU e1jFOMJL e1jFOMAU e1jFOMSZ
       e1jFOMOK e1jFOMNO e1jFOMDE e1jFOMJA e1jFOMFE e1jFOMMR
       e1jTAPAP e1jTAPMA e1jTAPJU e1jTAPJL e1jTAPAU e1jTAPSZ
       e1jTAPOK e1jTAPNO e1jTAPDE e1jTAPJA e1jTAPFE e1jTAPMR
       e1jTULAP e1jTULMA e1jTULJU e1jTULJL e1jTULAU e1jTULSZ
       e1jTULOK e1jTULNO e1jTULDE e1jTULJA e1jTULFE e1jTULMR
       e1jETKAP e1jETKMA e1jETKJU e1jETKJL e1jETKAU e1jETKSZ
       e1jETKOK e1jETKNO e1jETKDE e1jETKJA e1jETKFE e1jETKMR
       e1jGKHAP e1jGKHMA e1jGKHJU e1jGKHJL e1jGKHAU e1jGKHSZ
       e1jGKHOK e1jGKHNO e1jGKHDE e1jGKHJA e1jGKHFE e1jGKHMR
       e1jUTHAP e1jUTHMA e1jUTHJU e1jUTHJL e1jUTHAU e1jUTHSZ
       e1jUTHOK e1jUTHNO e1jUTHDE e1jUTHJA e1jUTHFE e1jUTHMR
       e1jLAHAP e1jLAHMA e1jLAHJU e1jLAHJL e1jLAHAU e1jLAHSZ
       e1jLAHOK e1jLAHNO e1jLAHDE e1jLAHJA e1jLAHFE e1jLAHMR
       e1jEGHAP e1jEGHMA e1jEGHJU e1jEGHJL e1jEGHAU e1jEGHSZ
       e1jEGHOK e1jEGHNO e1jEGHDE e1jEGHJA e1jEGHFE e1jEGHMR
       e1jMUNAP e1jMUNMA e1jMUNJU e1jMUNJL e1jMUNAU e1jMUNSZ
       e1jMUNOK e1jMUNNO e1jMUNDE e1jMUNJA e1jMUNFE e1jMUNMR
       e1jMUSAP e1jMUSMA e1jMUSJU e1jMUSJL e1jMUSAU e1jMUSSZ
       e1jMUSOK e1jMUSNO e1jMUSDE e1jMUSJA e1jMUSFE e1jMUSMR
       e1jATKAP e1jATKMA e1jATKJU e1jATKJL e1jATKAU e1jATKSZ
       e1jATKOK e1jATKNO e1jATKDE e1jATKJA e1jATKFE e1jATKMR
       e1joszAP e1joszMA e1joszJU e1joszJL e1joszAU e1joszSZ
       e1joszOK e1joszNO e1joszDE e1joszJA e1joszFE e1joszMR
       e1jGYEAP e1jGYEMA e1jGYEJU e1jGYEJL e1jGYEAU e1jGYESZ
       e1jGYEOK e1jGYENO e1jGYEDE e1jGYEJA e1jGYEFE e1jGYEMR
       e1jGYSAP e1jGYSMA e1jGYSJU e1jGYSJL e1jGYSAU e1jGYSSZ
       e1jGYSOK e1jGYSNO e1jGYSDE e1jGYSJA e1jGYSFE e1jGYSMR
       e1jCSPAP e1jCSPMA e1jCSPJU e1jCSPJL e1jCSPAU e1jCSPSZ
       e1jCSPOK e1jCSPNO e1jCSPDE e1jCSPJA e1jCSPFE e1jCSPMR
       e1jNYUAP e1jNYUMA e1jNYUJU e1jNYUJL e1jNYUAU e1jNYUSZ
       e1jNYUOK e1jNYUNO e1jNYUDE e1jNYUJA e1jNYUFE e1jNYUMR
       e1jRNYAP e1jRNYMA e1jRNYJU e1jRNYJL e1jRNYAU e1jRNYSZ
       e1jRNYOK e1jRNYNO e1jRNYDE e1jRNYJA e1jRNYFE e1jRNYMR
       e1jENYAP e1jENYMA e1jENYJU e1jENYJL e1jENYAU e1jENYSZ
       e1jENYOK e1jENYNO e1jENYDE e1jENYJA e1jENYFE e1jENYMR
       e1jSEGAP e1jSEGMA e1jSEGJU e1jSEGJL e1jSEGAU e1jSEGSZ
       e1jSEGOK e1jSEGNO e1jSEGDE e1jSEGJA e1jSEGFE e1jSEGMR
       e1jNEGAP e1jNEGMA e1jNEGJU e1jNEGJL e1jNEGAU e1jNEGSZ
       e1jNEGOK e1jNEGNO e1jNEGDE e1jNEGJA e1jNEGFE e1jNEGMR
       e1jTARAP e1jTARMA e1jTARJU e1jTARJL e1jTARAU e1jTARSZ
       e1jTAROK e1jTARNO e1jTARDE e1jTARJA e1jTARFE e1jTARMR
       e1jEJDAP e1jEJDMA e1jEJDJU e1jEJDJL e1jEJDAU e1jEJDSZ
       e1jEJDOK e1jEJDNO e1jEJDDE e1jEJDJA e1jEJDFE e1jEJDMR
       (sysmis, missing, .00, 0 = 0) (else=copy).

************************************************************************.

* 65 krds: jvedelmek gyakorisga, a tbla 22 sora.
* Question 65: Frequency of incomes.

Count e1jFOMGK = e1jFOMAP e1jFOMMA e1jFOMJU e1jFOMJL e1jFOMAU e1jFOMSZ 
                 e1jFOMOK e1jFOMNO e1jFOMDE e1jFOMJA e1jFOMFE e1jFOMMR (1).
Variable Label e1jfomgk '65.k. flls gyakorisga 91. pr. - 92. mrc.'.

Count e1jTAPGK = e1jTAPAP e1jTAPMA e1jTAPJU e1jTAPJL e1jTAPAU e1jTAPSZ
                 e1jTAPOK e1jTAPNO e1jTAPDE e1jTAPJA e1jTAPFE e1jTAPMR (1).
Variable Label e1jtapgk '65.k. tppnz gyakorisga 91. pr. - 92. mrc.'.

Count e1jTULGK = e1jTULAP e1jTULMA e1jTULJU e1jTULJL e1jTULAU e1jTULSZ
                 e1jTULOK e1jTULNO e1jTULDE e1jTULJA e1jTULFE e1jTULMR (1).
Variable Label e1jtulgk '65.k. tlra gyakorisga 91. pr. - 92. mrc.'.

Count e1jETKGK = e1jETKAP e1jETKMA e1jETKJU e1jETKJL e1jETKAU e1jETKSZ
                 e1jETKOK e1jETKNO e1jETKDE e1jETKJA e1jETKFE e1jETKMR (1).
Variable Label e1jetkgk '65.k. tk. hoz. gyakorisga 91. pr. - 92. mrc.'.

Count e1jGKHGK = e1jGKHAP e1jGKHMA e1jGKHJU e1jGKHJL e1jGKHAU e1jGKHSZ
                 e1jGKHOK e1jGKHNO e1jGKHDE e1jGKHJA e1jGKHFE e1jGKHMR (1).
Variable Label e1jgkhgk '65.k. gpk. hoz. gyakorisga 91. pr. - 92. mrc.'.

Count e1jUTHGK = e1jUTHAP e1jUTHMA e1jUTHJU e1jUTHJL e1jUTHAU e1jUTHSZ
                 e1jUTHOK e1jUTHNO e1jUTHDE e1jUTHJA e1jUTHFE e1jUTHMR (1).
Variable Label e1juthgk '65.k. utaz. hoz. gyakorisga 91. pr. - 92. mrc.'.

Count e1jLAHGK = e1jLAHAP e1jLAHMA e1jLAHJU e1jLAHJL e1jLAHAU e1jLAHSZ
                 e1jLAHOK e1jLAHNO e1jLAHDE e1jLAHJA e1jLAHFE e1jLAHMR (1).
Variable Label e1jlahgk '65.k. laks hoz. gyakorisga 91. pr. - 92. mrc.'.

Count e1jEGHGK = e1jEGHAP e1jEGHMA e1jEGHJU e1jEGHJL e1jEGHAU e1jEGHSZ
                 e1jEGHOK e1jEGHNO e1jEGHDE e1jEGHJA e1jEGHFE e1jEGHMR (1).
Variable Label e1jeghgk '65.k. egyb hoz. gyakorisga 91. pr. - 92. mrc.'.

Count e1jMUNGK = e1jMUNAP e1jMUNMA e1jMUNJU e1jMUNJL e1jMUNAU e1jMUNSZ
                 e1jMUNOK e1jMUNNO e1jMUNDE e1jMUNJA e1jMUNFE e1jMUNMR (1).
Variable Label e1jmungk '65.k. munkn. jr. gyakoris. 91. pr. - 92. mrc.'.

Count e1jMUSGK = e1jMUSAP e1jMUSMA e1jMUSJU e1jMUSJL e1jMUSAU e1jMUSSZ
                 e1jMUSOK e1jMUSNO e1jMUSDE e1jMUSJA e1jMUSFE e1jMUSMR (1).
Variable Label e1jmusgk '65.k. munkn. jr. lej. gy. 91. pr. - 92. mrc.'.

Count e1jATKGK = e1jATKAP e1jATKMA e1jATKJU e1jATKJL e1jATKAU e1jATKSZ
                 e1jATKOK e1jATKNO e1jATKDE e1jATKJA e1jATKFE e1jATKMR (1).
Variable Label e1jatkgk '65.k. tkp. tm. gyakoris. 91. pr. - 92. mrc.'.

Count e1jostGK = e1joszAP e1joszMA e1joszJU e1joszJL e1joszAU e1joszSZ
                 e1joszOK e1joszNO e1joszDE e1joszJA e1joszFE e1joszMR (1).
Variable Label e1jostgk '65.k. sztnd. gyakorisga 91. pr. - 92. mrc.'.

Count e1jGYEGK = e1jGYEAP e1jGYEMA e1jGYEJU e1jGYEJL e1jGYEAU e1jGYESZ
                 e1jGYEOK e1jGYENO e1jGYEDE e1jGYEJA e1jGYEFE e1jGYEMR (1).
Variable Label e1jgyegk '65.k. GYED gyakorisga 91. pr. - 92. mrc.'.

Count e1jGYSGK = e1jGYSAP e1jGYSMA e1jGYSJU e1jGYSJL e1jGYSAU e1jGYSSZ
                 e1jGYSOK e1jGYSNO e1jGYSDE e1jGYSJA e1jGYSFE e1jGYSMR (1).
Variable Label e1jgysgk '65.k. GYES gyakorisga 91. pr. - 92. mrc.'.

Count e1jCSPGK = e1jCSPAP e1jCSPMA e1jCSPJU e1jCSPJL e1jCSPAU e1jCSPSZ
                 e1jCSPOK e1jCSPNO e1jCSPDE e1jCSPJA e1jCSPFE e1jCSPMR (1).
Variable Label e1jcspgk '65.k. csaldip. gyakorisga 91. pr. - 92. mrc.'.

Count e1jNYUGK = e1jNYUAP e1jNYUMA e1jNYUJU e1jNYUJL e1jNYUAU e1jNYUSZ
                 e1jNYUOK e1jNYUNO e1jNYUDE e1jNYUJA e1jNYUFE e1jNYUMR (1).
Variable Label e1jnyugk '65.k. r. nyugd. gyakorisga 91. pr. - 92. mrc.'.

Count e1jRNYGK = e1jRNYAP e1jRNYMA e1jRNYJU e1jRNYJL e1jRNYAU e1jRNYSZ
                 e1jRNYOK e1jRNYNO e1jRNYDE e1jRNYJA e1jRNYFE e1jRNYMR (1).
Variable Label e1jrnygk '65.k. rok. nyugd. gyakoris. 91. pr. - 92. mrc.'.

Count e1jENYGK = e1jENYAP e1jENYMA e1jENYJU e1jENYJL e1jENYAU e1jENYSZ
                 e1jENYOK e1jENYNO e1jENYDE e1jENYJA e1jENYFE e1jENYMR (1).
Variable Label e1jenygk '65.k. egy. nyugd. gyakoris. 91. pr. - 92. mrc.'.

Count e1jSEGGK = e1jSEGAP e1jSEGMA e1jSEGJU e1jSEGJL e1jSEGAU e1jSEGSZ
                 e1jSEGOK e1jSEGNO e1jSEGDE e1jSEGJA e1jSEGFE e1jSEGMR (1).
Variable Label e1jseggk '65.k. szoc. seg. gyakorisga 91. pr. - 92. mrc.'.

Count e1jNEGGK = e1jNEGAP e1jNEGMA e1jNEGJU e1jNEGJL e1jNEGAU e1jNEGSZ
                 e1jNEGOK e1jNEGNO e1jNEGDE e1jNEGJA e1jNEGFE e1jNEGMR (1).
Variable Label e1jneggk '65.k. rendk. seg. gyakoris. 91. pr. - 92. mrc.'.

Count e1jTARGK = e1jTARAP e1jTARMA e1jTARJU e1jTARJL e1jTARAU e1jTARSZ
                 e1jTAROK e1jTARNO e1jTARDE e1jTARJA e1jTARFE e1jTARMR (1).
Variable Label e1jtargk '65.k. tartsd. gyakorisga 91. pr. - 92. mrc.'.

Count e1jEJDGK = e1jEJDAP e1jEJDMA e1jEJDJU e1jEJDJL e1jEJDAU e1jEJDSZ
                 e1jEJDOK e1jEJDNO e1jEJDDE e1jEJDJA e1jEJDFE e1jEJDMR (1).
Variable Label e1jejdgk '65.k. letjr. eltart. gyak. 91. pr. - 92. mrc.'.


fre e1jfomgk to e1jejdgk.


*******************************************************************.

Recode e1jFOMfk e1jFOMfm e1jTAPfk e1jTAPfm e1jTULfk e1jTULfm
       e1jETKfk e1jETKfm e1jGKHfk e1jGKHfm e1jUTHfk e1jUTHfm
       e1jLAHfk e1jLAHfm e1jEGHfk e1jEGHfm e1jMUNfk e1jMUNfm
       e1jMUSfk e1jMUSfm 
       e1jATKfk e1jATKfm e1joszfk e1joszfm e1jGYEfk e1jGYEfm
       e1jGYSfk e1jGYSfm e1jCSPfk e1jCSPfm e1jNYUfk e1jNYUfm
       e1jRNYfk e1jRNYfm e1jENYfk e1jENYfm e1jSEGfk e1jSEGfm
       e1jNEGfk e1jNEGfm e1jTARfk e1jTARfm e1jEJDfk e1jEJDfm
       (SYSMIS, MISSING, .00, 0, = 0).


**********************************************************************.
* Inputing first and last sum of incomes for those who had           *. 
* one of them, but had not known both. Sums corrected for            *.
* inflation effect. Only regular main type of incomes will be inputed*.
**********************************************************************.

* Utols ismert, els nem ismert.
* Last is known first is unknown.

* 1 flls.
* temporary.
* select if (e1jfomfk=0 and e1jfomgk gt 0 and e1jfomfm gt 0).
* list eazon92 e1jfomfk e1jfomgk e1jfomfm.

* 2 tppnz.
* temporary.
* select if (e1jtapfk=0 and e1jtapgk gt 0 and e1jtapfm gt 0).
* list eazon92 e1jtapfk e1jtapgk e1jtapfm.

* 3 tlra.
* temporary.
* select if (e1jtulfk=0 and e1jtulgk gt 0 and e1jtulfm gt 0).
* list eazon92 e1jtulfk e1jtulgk e1jtulfm.

* 4 tkezsi hozzjruls.
* temporary.
* select if (e1jetkfk=0 and e1jetkgk gt 0 and e1jetkfm gt 0).
* list eazon92 e1jetkfk e1jetkgk e1jetkfm.

* 5 gpkocsi hozzjruls.
* temporary.
* select if (e1jgkhfk=0 and e1jgkhgk gt 0 and e1jgkhfm gt 0).
* list eazon92 e1jgkhfk e1jgkhgk e1jgkhfm.

* 6 utazs hozzjruls.
* temporary.
* select if (e1juthfk=0 and e1juthgk gt 0 and e1juthfm gt 0).
* list eazon92 e1juthfk e1juthgk e1juthfm.

* 7 laksbrlet hozzjruls.
* temporary.
* select if (e1jlahfk=0 and e1jlahgk gt 0 and e1jlahfm gt 0).
* list eazon92 e1jlahfk e1jlahgk e1jlahfm.

* 8 egyb hozzjruls.
* temporary.
* select if (e1jeghfk=0 and e1jeghgk gt 0 and e1jeghfm gt 0).
* list eazon92 e1jeghfk e1jeghgk e1jeghfm.

* 9 munkanlkli jradk.
* temporary.
* select if (e1jmunfk=0 and e1jmungk gt 0 and e1jmunfm gt 0).
* list eazon92 e1jmunfk e1jmungk e1jmunfm.

* 10 munk jvedelempotl.
* temporary.
* select if (e1jmusfk=0 and e1jmusgk gt 0 and e1jmusfm gt 0).
* list eazon92 e1jmusfk e1jmusgk e1jmusfm.

* 11 tkpzsi.
* temporary.
* select if (e1jatkfk=0 and e1jatkgk gt 0 and e1jatkfm gt 0).
* list eazon92 e1jatkfk e1jatkgk e1jatkfm.

* 12 sztndij.
* temporary.
* select if (e1joszfk=0 and e1jostgk gt 0 and e1joszfm gt 0).
* list eazon92 e1joszfk e1jostgk e1joszfm.


* 13 GYED.
* temporary.
* select if (e1jgyefk=0 and e1jgyegk gt 0 and e1jgyefm gt 0).
* list eazon92 e1jgyefk e1jgyegk e1jgyefm.

* 14 GYES.
* temporary.
* select if (e1jgysfk=0 and e1jgysgk gt 0 and e1jgysfm gt 0).
* list eazon92 e1jgysfk e1jgysgk e1jgysfm.

* 15 csaldi ptlk.
* temporary.
* select if (e1jcspfk=0 and e1jcspgk gt 0 and e1jcspfm gt 0).
* list eazon92 e1jcspfk e1jcspgk e1jcspfm.

* 16 regsgi nyugdij.
* temporary.
* select if (e1jnyufk=0 and e1jnyugk gt 0 and e1jnyufm gt 0).
* list eazon92 e1jnyufk e1jnyugk e1jnyufm.

* 17 rokkantsgi nyugdij.
* temporary.
* select if (e1jrnyfk=0 and e1jrnygk gt 0 and e1jrnyfm gt 0).
* list eazon92 e1jrnyfk e1jrnygk e1jrnyfm.

* 18 egyb nyugdij.
* temporary.
* select if (e1jenyfk=0 and e1jenygk gt 0 and e1jenyfm gt 0).
* list eazon92 e1jenyfk e1jenygk e1jenyfm.

* 19 rendszeres szocilis segly.
* temporary.
* select if (e1jsegfk=0 and e1jseggk gt 0 and e1jsegfm gt 0).
* list eazon92 e1jsegfk e1jseggk e1jsegfm.

* 20 rendkivli segly.
* temporary.
* select if (e1jnegfk=0 and e1jneggk gt 0 and e1jnegfm gt 0).
* list eazon92 e1jnegfk e1jneggk e1jnegfm.

* 21 tartsdij.
* temporary.
* select if (e1jtarfk=0 and e1jtargk gt 0 and e1jtarfm gt 0).
* list eazon92 e1jtarfk e1jtargk e1jtarfm.

* 22 letjradk eltarts.
* temporary.
* select if (e1jejdfk=0 and e1jejdgk gt 0 and e1jejdfm gt 0).
* list eazon92 e1jejdfk e1jejdgk e1jejdfm.


* utols nem ismert, els ismert.
* Last is unknown first is known.


* 1 flls.
* temporary.
* select if (e1jfomfk gt 0 and e1jfomgk gt 0 and e1jfomfm=0).
* list eazon92 e1jfomfk e1jfomgk e1jfomfm.

* 2 tppnz.
* temporary.
* select if (e1jtapfk gt 0 and e1jtapgk gt 0 and e1jtapfm=0).
* list eazon92 e1jtapfk e1jtapgk e1jtapfm.

* 3 tlra.
* temporary.
* select if (e1jtulfk gt 0 and e1jtulgk gt 0 and e1jtulfm=0).
* list eazon92 e1jtulfk e1jtulgk e1jtulfm.

* 4 tkezsi hozzjruls.
* temporary.
* select if (e1jetkfk gt 0 and e1jetkgk gt 0 and e1jetkfm=0).
* list eazon92 e1jetkfk e1jetkgk e1jetkfm.

* 5 gpkocsi hozzjruls.
* temporary.
* select if (e1jgkhfk gt 0 and e1jgkhgk gt 0 and e1jgkhfm=0).
* list eazon92 e1jgkhfk e1jgkhgk e1jgkhfm.

* 6 utazs hozzjruls.
* temporary.
* select if (e1juthfk gt 0 and e1juthgk gt 0 and e1juthfm=0).
* list eazon92 e1juthfk e1juthgk e1juthfm.

* 7 laksbrlet hozzjruls.
* temporary.
* select if (e1jlahfk gt 0 and e1jlahgk gt 0 and e1jlahfm=0).
* list eazon92 e1jlahfk e1jlahgk e1jlahfm.

* 8 egyb hozzjruls.
* temporary.
* select if (e1jeghfk gt 0 and e1jeghgk gt 0 and e1jeghfm=0).
* list eazon92 e1jeghfk e1jeghgk e1jeghfm.

* 9 munkanlkli jradk.
* temporary.
* select if (e1jmunfk gt 0 and e1jmungk gt 0 and e1jmunfm=0).
* list eazon92 e1jmunfk e1jmungk e1jmunfm.

* 10 munk jvedelempotl.
* temporary.
* select if (e1jmusfk gt 0 and e1jmusgk gt 0 and e1jmusfm=0).
* list eazon92 e1jmusfk e1jmusgk e1jmusfm.

* 11. tkpzsi tmogats.
* temporary.
* select if (e1jatkfk gt 0 and e1jatkgk gt 0 and e1jatkfm=0).
* list eazon92 e1jatkfk e1jatkgk e1jatkfm.

* 12 sztndij.
* temporary.
* select if (e1joszfk gt 0 and e1jostgk gt 0 and e1joszfm=0).
* list eazon92 e1joszfk e1jostgk e1joszfm.

* 13 GYED.
* temporary.
* select if (e1jgyefk gt 0 and e1jgyegk gt 0 and e1jgyefm=0).
* list eazon92 e1jgyefk e1jgyegk e1jgyefm.

* 14 GYES.
* temporary.
* select if (e1jgysfk gt 0 and e1jgysgk gt 0 and e1jgysfm=0).
* list eazon92 e1jgysfk e1jgysgk e1jgysfm.

* 15 csaldi ptlk.
* temporary.
* select if (e1jcspfk gt 0 and e1jcspgk gt 0 and e1jcspfm=0).
* list eazon92 e1jcspfk e1jcspgk e1jcspfm.

* 16 regsgi nyugdij.
* temporary.
* select if (e1jnyufk gt 0 and e1jnyugk gt 0 and e1jnyufm=0).
* list eazon92 e1jnyufk e1jnyugk e1jnyufm.

* 17 rokkantsgi nyugdij.
* temporary.
* select if (e1jrnyfk gt 0 and e1jrnygk gt 0 and e1jrnyfm=0).
* list eazon92 e1jrnyfk e1jrnygk e1jrnyfm.

* 18 egyb nyugdij.
* temporary.
* select if (e1jenyfk gt 0 and e1jenygk gt 0 and e1jenyfm=0).
* list eazon92 e1jenyfk e1jenygk e1jenyfm.

* 19 rendszeres szocilis segly.
* temporary.
* select if (e1jsegfk gt 0 and e1jseggk gt 0 and e1jsegfm=0).
* list eazon92 e1jsegfk e1jseggk e1jsegfm.

* 20 rendkivli segly.
* temporary.
* select if (e1jnegfk gt 0 and e1jneggk gt 0 and e1jnegfm=0).
* list eazon92 e1jnegfk e1jneggk e1jnegfm.

* 21 tartsdij.
* temporary.
* select if (e1jtarfk gt 0 and e1jtargk gt 0 and e1jtarfm=0).
* list eazon92 e1jtarfk e1jtargk e1jtarfm.

* 22 letjradk eltarts.
* temporary.
* select if (e1jejdfk gt 0 and e1jejdgk gt 0 and e1jejdfm=0).
* list eazon92 e1jejdfk e1jejdgk e1jejdfm.


*********************************************************************************.
* Behelyettesits.
*********************************************************************************.

if (e1jfomfk eq 0 and e1jfomgk gt 1 and e1jfomfm gt 0) e1jfomfk = (e1jfomfm * 0.9).
if (e1jfomfk eq 0 and e1jfomgk eq 1 and e1jfomfm gt 0) e1jfomfk = e1jfomfm.

if (e1jfomfk gt 0 and e1jfomgk gt 1 and e1jfomfm eq 0) e1jfomfm = (e1jfomfk * 1.1).
if (e1jfomfk gt 0 and e1jfomgk eq 1 and e1jfomfm eq 0) e1jfomfm = e1jfomfk.


if (e1jtapfk eq 0 and e1jtapgk gt 1 and e1jtapfm gt 0) e1jtapfk = (e1jtapfm * 0.9).
if (e1jtapfk eq 0 and e1jtapgk eq 1 and e1jtapfm gt 0) e1jtapfk = e1jtapfm.

if (e1jtapfk gt 0 and e1jtapgk gt 1 and e1jtapfm eq 0) e1jtapfm = (e1jtapfk * 1.1).
if (e1jtapfk gt 0 and e1jtapgk eq 1 and e1jtapfm eq 0) e1jtapfm = e1jtapfk.


if (e1jtulfk eq 0 and e1jtulgk gt 1 and e1jtulfm gt 0) e1jtulfk = (e1jtulfm * 0.9).
if (e1jtulfk eq 0 and e1jtulgk eq 1 and e1jtulfm gt 0) e1jtulfk = e1jtulfm.

if (e1jtulfk gt 0 and e1jtulgk gt 1 and e1jtulfm eq 0) e1jtulfm = (e1jtulfk * 1.1).
if (e1jtulfk gt 0 and e1jtulgk eq 1 and e1jtulfm eq 0) e1jtulfm = e1jtulfk.


if (e1jetkfk eq 0 and e1jetkgk gt 1 and e1jetkfm gt 0) e1jetkfk = (e1jetkfm * 0.9).
if (e1jetkfk eq 0 and e1jetkgk eq 1 and e1jetkfm gt 0) e1jetkfk = e1jetkfm.

if (e1jetkfk gt 0 and e1jetkgk gt 1 and e1jetkfm eq 0) e1jetkfm = (e1jetkfk * 1.1).
if (e1jetkfk gt 0 and e1jetkgk eq 1 and e1jetkfm eq 0) e1jetkfm = e1jetkfk.


if (e1jgkhfk eq 0 and e1jgkhgk gt 1 and e1jgkhfm gt 0) e1jgkhfk = (e1jgkhfm * 0.9).
if (e1jgkhfk eq 0 and e1jgkhgk eq 1 and e1jgkhfm gt 0) e1jgkhfk = e1jgkhfm.

if (e1jgkhfk gt 0 and e1jgkhgk gt 1 and e1jgkhfm eq 0) e1jgkhfm = (e1jgkhfk * 1.1).
if (e1jgkhfk gt 0 and e1jgkhgk eq 1 and e1jgkhfm eq 0) e1jgkhfm = e1jgkhfk.


if (e1juthfk eq 0 and e1juthgk gt 1 and e1juthfm gt 0) e1juthfk = (e1juthfm * 0.9).
if (e1juthfk eq 0 and e1juthgk eq 1 and e1juthfm gt 0) e1juthfk = e1juthfm.

if (e1juthfk gt 0 and e1juthgk gt 1 and e1juthfm eq 0) e1juthfm = (e1juthfk * 1.1).
if (e1juthfk gt 0 and e1juthgk eq 1 and e1juthfm eq 0) e1juthfm = e1juthfk.


if (e1jlahfk eq 0 and e1jlahgk gt 1 and e1jlahfm gt 0) e1jlahfk = (e1jlahfm * 0.9).
if (e1jlahfk eq 0 and e1jlahgk eq 1 and e1jlahfm gt 0) e1jlahfk = e1jlahfm.

if (e1jlahfk gt 0 and e1jlahgk gt 1 and e1jlahfm eq 0) e1jlahfm = (e1jlahfk * 1.1).
if (e1jlahfk gt 0 and e1jlahgk eq 1 and e1jlahfm eq 0) e1jlahfm = e1jlahfk.


if (e1jeghfk eq 0 and e1jeghgk gt 1 and e1jeghfm gt 0) e1jeghfk = (e1jeghfm * 0.9).
if (e1jeghfk eq 0 and e1jeghgk eq 1 and e1jeghfm gt 0) e1jeghfk = e1jeghfm.

if (e1jeghfk gt 0 and e1jeghgk gt 1 and e1jeghfm eq 0) e1jeghfm = (e1jeghfk * 1.1).
if (e1jeghfk gt 0 and e1jeghgk eq 1 and e1jeghfm eq 0) e1jeghfm = e1jeghfk.


if (e1jmunfk eq 0 and e1jmungk gt 1 and e1jmunfm gt 0) e1jmunfk = (e1jmunfm * 0.9).
if (e1jmunfk eq 0 and e1jmungk eq 1 and e1jmunfm gt 0) e1jmunfk = e1jmunfm.

if (e1jmunfk gt 0 and e1jmungk gt 1 and e1jmunfm eq 0) e1jmunfm = (e1jmunfk * 1.1).
if (e1jmunfk gt 0 and e1jmungk eq 1 and e1jmunfm eq 0) e1jmunfm = e1jmunfk.


if (e1jmusfk eq 0 and e1jmusgk gt 1 and e1jmusfm gt 0) e1jmusfk = (e1jmusfm * 0.9).
if (e1jmusfk eq 0 and e1jmusgk eq 1 and e1jmusfm gt 0) e1jmusfk = e1jmusfm.

if (e1jmusfk gt 0 and e1jmusgk gt 1 and e1jmusfm eq 0) e1jmusfm = (e1jmusfk * 1.1).
if (e1jmusfk gt 0 and e1jmusgk eq 1 and e1jmusfm eq 0) e1jmusfm = e1jmusfk.


if (e1jatkfk eq 0 and e1jatkgk gt 1 and e1jatkfm gt 0) e1jatkfk = (e1jatkfm * 0.9).
if (e1jatkfk eq 0 and e1jatkgk eq 1 and e1jatkfm gt 0) e1jatkfk = e1jatkfm.

if (e1jatkfk gt 0 and e1jatkgk gt 1 and e1jatkfm eq 0) e1jatkfm = (e1jatkfk * 1.1).
if (e1jatkfk gt 0 and e1jatkgk eq 1 and e1jatkfm eq 0) e1jatkfm = e1jatkfk.


if (e1joszfk eq 0 and e1jostgk gt 1 and e1joszfm gt 0) e1joszfk = (e1joszfm * 0.9).
if (e1joszfk eq 0 and e1jostgk eq 1 and e1joszfm gt 0) e1joszfk = e1joszfm.

if (e1joszfk gt 0 and e1jostgk gt 1 and e1joszfm eq 0) e1joszfm = (e1joszfk * 1.1).
if (e1joszfk gt 0 and e1jostgk eq 1 and e1joszfm eq 0) e1joszfm = e1joszfk.


if (e1jgyefk eq 0 and e1jgyegk gt 1 and e1jgyefm gt 0) e1jgyefk = (e1jgyefm * 0.9).
if (e1jgyefk eq 0 and e1jgyegk eq 1 and e1jgyefm gt 0) e1jgyefk = e1jgyefm.

if (e1jgyefk gt 0 and e1jgyegk gt 1 and e1jgyefm eq 0) e1jgyefm = (e1jgyefk * 1.1).
if (e1jgyefk gt 0 and e1jgyegk eq 1 and e1jgyefm eq 0) e1jgyefm = e1jgyefk.


if (e1jgysfk eq 0 and e1jgysgk gt 1 and e1jgysfm gt 0) e1jgysfk = (e1jgysfm * 0.9).
if (e1jgysfk eq 0 and e1jgysgk eq 1 and e1jgysfm gt 0) e1jgysfk = e1jgysfm.

if (e1jgysfk gt 0 and e1jgysgk gt 1 and e1jgysfm eq 0) e1jgysfm = (e1jgysfk * 1.1).
if (e1jgysfk gt 0 and e1jgysgk eq 1 and e1jgysfm eq 0) e1jgysfm = e1jgysfk.


if (e1jgysfk eq 0 and e1jgysgk gt 1 and e1jgysfm gt 0) e1jgysfk = (e1jgysfm * 0.9).
if (e1jgysfk eq 0 and e1jgysgk eq 1 and e1jgysfm gt 0) e1jgysfk = e1jgysfm.

if (e1jgysfk gt 0 and e1jgysgk gt 1 and e1jgysfm eq 0) e1jgysfm = (e1jgysfk * 1.1).
if (e1jgysfk gt 0 and e1jgysgk eq 1 and e1jgysfm eq 0) e1jgysfm = e1jgysfk.


if (e1jcspfk eq 0 and e1jcspgk gt 1 and e1jcspfm gt 0) e1jcspfk = (e1jcspfm * 0.9).
if (e1jcspfk eq 0 and e1jcspgk eq 1 and e1jcspfm gt 0) e1jcspfk = e1jcspfm.

if (e1jcspfk gt 0 and e1jcspgk gt 1 and e1jcspfm eq 0) e1jcspfm = (e1jcspfk * 1.1).
if (e1jcspfk gt 0 and e1jcspgk eq 1 and e1jcspfm eq 0) e1jcspfm = e1jcspfk.


if (e1jnyufk eq 0 and e1jnyugk gt 1 and e1jnyufm gt 0) e1jnyufk = (e1jnyufm * 0.9).
if (e1jnyufk eq 0 and e1jnyugk eq 1 and e1jnyufm gt 0) e1jnyufk = e1jnyufm.

if (e1jnyufk gt 0 and e1jnyugk gt 1 and e1jnyufm eq 0) e1jnyufm = (e1jnyufk * 1.1).
if (e1jnyufk gt 0 and e1jnyugk eq 1 and e1jnyufm eq 0) e1jnyufm = e1jnyufk.


if (e1jrnyfk eq 0 and e1jrnygk gt 1 and e1jrnyfm gt 0) e1jrnyfk = (e1jrnyfm * 0.9).
if (e1jrnyfk eq 0 and e1jrnygk eq 1 and e1jrnyfm gt 0) e1jrnyfk = e1jrnyfm.

if (e1jrnyfk gt 0 and e1jrnygk gt 1 and e1jrnyfm eq 0) e1jrnyfm = (e1jrnyfk * 1.1).
if (e1jrnyfk gt 0 and e1jrnygk eq 1 and e1jrnyfm eq 0) e1jrnyfm = e1jrnyfk.


if (e1jenyfk eq 0 and e1jenygk gt 1 and e1jenyfm gt 0) e1jenyfk = (e1jenyfm * 0.9).
if (e1jenyfk eq 0 and e1jenygk eq 1 and e1jenyfm gt 0) e1jenyfk = e1jenyfm.

if (e1jenyfk gt 0 and e1jenygk gt 1 and e1jenyfm eq 0) e1jenyfm = (e1jenyfk * 1.1).
if (e1jenyfk gt 0 and e1jenygk eq 1 and e1jenyfm eq 0) e1jenyfm = e1jenyfk.



if (e1jsegfk eq 0 and e1jseggk gt 1 and e1jsegfm gt 0) e1jsegfk = (e1jsegfm * 0.9).
if (e1jsegfk eq 0 and e1jseggk eq 1 and e1jsegfm gt 0) e1jsegfk = e1jsegfm.

if (e1jsegfk gt 0 and e1jseggk gt 1 and e1jsegfm eq 0) e1jsegfm = (e1jsegfk * 1.1).
if (e1jsegfk gt 0 and e1jseggk eq 1 and e1jsegfm eq 0) e1jsegfm = e1jsegfk.



if (e1jnegfk eq 0 and e1jneggk gt 1 and e1jnegfm gt 0) e1jnegfk = (e1jnegfm * 0.9).
if (e1jnegfk eq 0 and e1jneggk eq 1 and e1jnegfm gt 0) e1jnegfk = e1jnegfm.

if (e1jnegfk gt 0 and e1jneggk gt 1 and e1jnegfm eq 0) e1jnegfm = (e1jnegfk * 1.1).
if (e1jnegfk gt 0 and e1jneggk eq 1 and e1jnegfm eq 0) e1jnegfm = e1jnegfk.


if (e1jtarfk eq 0 and e1jtargk gt 1 and e1jtarfm gt 0) e1jtarfk = (e1jtarfm * 0.9).
if (e1jtarfk eq 0 and e1jtargk eq 1 and e1jtarfm gt 0) e1jtarfk = e1jtarfm.

if (e1jtarfk gt 0 and e1jtargk gt 1 and e1jtarfm eq 0) e1jtarfm = (e1jtarfk * 1.1).
if (e1jtarfk gt 0 and e1jtargk eq 1 and e1jtarfm eq 0) e1jtarfm = e1jtarfk.


if (e1jejdfk eq 0 and e1jejdgk gt 1 and e1jejdfm gt 0) e1jejdfk = (e1jejdfm * 0.9).
if (e1jejdfk eq 0 and e1jejdgk eq 1 and e1jejdfm gt 0) e1jejdfk = e1jejdfm.

if (e1jejdfk gt 0 and e1jejdgk gt 1 and e1jejdfm eq 0) e1jejdfm = (e1jejdfk * 1.1).
if (e1jejdfk gt 0 and e1jejdgk eq 1 and e1jejdfm eq 0) e1jejdfm = e1jejdfk.





***********************************************************************.

* ves jvedelem az els s az utols hnap tlagbl
* s a hnapok szmbl.
* Yearly incomes from the mean of first & last month and 
* the frequencies (number of months).

Compute e1jFOMEV = MEAN (e1jFOMfk, e1jFOMfm) * e1jFOMGK.
Variable label e1jfomev '65.k. flls ves jvedelem'.

Compute e1jTAPEV = MEAN (e1jTAPfk, e1jTAPfm) * e1jTAPGK.
Variable label e1jtapev '65.k. tppnz ves jvedelem'.

Compute e1jTULEV = MEAN (e1jTULfk, e1jTULfm) * e1jTULGK.
Variable label e1jtulev '65.k. tlra ves jvedelem'.

Compute e1jETKEV = MEAN (e1jETKfk, e1jETKfm) * e1jETKGK.
Variable label e1jetkev '65.k. tk. hoz. ves jvedelem'.

Compute e1jGKHEV = MEAN (e1jGKHfk, e1jGKHfm) * e1jGKHGK.
Variable label e1jgkhev '65.k. gpk. hoz. ves jvedelem'.

Compute e1jUTHEV = MEAN (e1jUTHfk, e1jUTHfm) * e1jUTHGK.
Variable label e1juthev '65.k. utaz. hoz. ves jvedelem'.

Compute e1jLAHEV = MEAN (e1jLAHfk, e1jLAHfm) * e1jLAHGK.
Variable label e1jlahev '65.k. laks. hoz. ves jvedelem'.

Compute e1jEGHEV = MEAN (e1jEGHfk, e1jEGHfm) * e1jEGHGK.
Variable label e1jeghev '65.k. egyb hoz. ves jvedelem'.

Compute e1jMUNEV = MEAN (e1jMUNfk, e1jMUNfm) * e1jMUNGK.
Variable label e1jmunev '65.k. munkn. jr. ves jvedelem'.

Compute e1jMUSEV = MEAN (e1jMUSfk, e1jMUSfm) * e1jMUSGK.
Variable label e1jmusev '65.k. munkn. seg. ves jvedelem'.

Compute e1jATKEV = MEAN (e1jATKfk, e1jATKfm) * e1jATKGK.
Variable label e1jatkev '65.k. tkp. tm. ves jvedelem'.

Compute e1jostEV = MEAN (e1joszfk, e1joszfm) * e1jostGK.
Variable label e1jostev '65.k. sztndj ves jvedelem'.

Compute e1jGYEEV = MEAN (e1jGYEfk, e1jGYEfm) * e1jGYEGK.
Variable label e1jgyeev '65.k. GYED ves jvedelem'.

Compute e1jGYSEV = MEAN (e1jGYSfk, e1jGYSfm) * e1jGYSGK.
Variable label e1jgysev '65.k. GYES ves jvedelem'.

Compute e1jCSPEV = MEAN (e1jCSPfk, e1jCSPfm) * e1jCSPGK.
Variable label e1jcspev '65.k. csaldip. ves jvedelem'.

Compute e1jNYUEV = MEAN (e1jNYUfk, e1jNYUfm) * e1jNYUGK.
Variable label e1jnyuev '65.k. r. nyugd. ves jvedelem'.

Compute e1jRNYEV = MEAN (e1jRNYfk, e1jRNYfm) * e1jRNYGK.
Variable label e1jrnyev '65.k. rok. nyugd. ves jvedelem'.

Compute e1jENYEV = MEAN (e1jENYfk, e1jENYfm) * e1jENYGK.
Variable label e1jenyev '65.k. egy. nyugd. ves jvedelem'.

Compute e1jSEGEV = MEAN (e1jSEGfk, e1jSEGfm) * e1jSEGGK.
Variable label e1jsegev '65.k. szoc. seg. ves jvedelem'.

Compute e1jNEGEV = MEAN (e1jNEGfk, e1jNEGfm) * e1jNEGGK.
Variable label e1jnegev '65.k. rengk. seg. ves jvedelem'.

Compute e1jTAREV = MEAN (e1jTARfk, e1jTARfm) * e1jTARGK.
Variable label e1jtarev '65.k. tartsdj ves jvedelem'.

Compute e1jEJDEV = MEAN (e1jEJDfk, e1jEJDfm) * e1jEJDGK.
Variable label e1jejdev '65.k. letjradk ves jvedelem'.

desc e1jfomev to e1jejdev.


* fre e1jejdev e1jejdfk e1jejdfm e1jejdgk /sta all /form lim (10).


********************************************************************

* Az 1991 prilisi s az 1992 mrciusi jvedelmek kiszmtsa.
* 1. Az 1991. prilisi llapot.

* Incomes in April of 1991 and March of 1992.
* 1. Incomes in April of 1991.

Compute e1jFOM91 = 0.
Compute e1jTAP91 = 0.
Compute e1jTUL91 = 0.
Compute e1jETK91 = 0.
Compute e1jGKH91 = 0.
Compute e1jUTH91 = 0.
Compute e1jLAH91 = 0.
Compute e1jEGH91 = 0.
Compute e1jMUN91 = 0.
Compute e1jMUS91 = 0.
Compute e1jATK91 = 0.
Compute e1jost91 = 0.
Compute e1jGYE91 = 0.
Compute e1jGYS91 = 0.
Compute e1jCSP91 = 0.
Compute e1jNYU91 = 0.
Compute e1jRNY91 = 0.
Compute e1jENY91 = 0.
Compute e1jSEG91 = 0.
Compute e1jNEG91 = 0.
Compute e1jTAR91 = 0.
Compute e1jEJD91 = 0.

If (e1jFOMAP = 1) e1jFOM91 = e1jFOMfk.
If (e1jTAPAP = 1) e1jTAP91 = e1jTAPfk.
If (e1jTULAP = 1) e1jTUL91 = e1jTULfk.
If (e1jETKAP = 1) e1jETK91 = e1jETKfk.
If (e1jGKHAP = 1) e1jGKH91 = e1jGKHfk.
If (e1jUTHAP = 1) e1jUTH91 = e1jUTHfk.
If (e1jLAHAP = 1) e1jLAH91 = e1jLAHfk.
If (e1jEGHAP = 1) e1jEGH91 = e1jEGHfk.
If (e1jMUNAP = 1) e1jMUN91 = e1jMUNfk.
If (e1jMUSAP = 1) e1jMUS91 = e1jMUSfk.

If (e1jATKAP = 1) e1jATK91 = e1jATKfk.
If (e1joszAP = 1) e1jost91 = e1joszfk.
If (e1jGYEAP = 1) e1jGYE91 = e1jGYEfk.
If (e1jGYSAP = 1) e1jGYS91 = e1jGYSfk.
If (e1jCSPAP = 1) e1jCSP91 = e1jCSPfk.
If (e1jNYUAP = 1) e1jNYU91 = e1jNYUfk.
If (e1jRNYAP = 1) e1jRNY91 = e1jRNYfk.
If (e1jENYAP = 1) e1jENY91 = e1jENYfk.
If (e1jSEGAP = 1) e1jSEG91 = e1jSEGfk.
If (e1jNEGAP = 1) e1jNEG91 = e1jNEGfk.
If (e1jTARAP = 1) e1jTAR91 = e1jTARfk.
If (e1jEJDAP = 1) e1jEJD91 = e1jEJDfk.



* 2. Az 1992 mrciusi llapot.
* Incomes in March of 1992.

Compute e1jFOM92 = 0.
Compute e1jTAP92 = 0.
Compute e1jTUL92 = 0.
Compute e1jETK92 = 0.
Compute e1jGKH92 = 0.
Compute e1jUTH92 = 0.
Compute e1jLAH92 = 0.
Compute e1jEGH92 = 0.
Compute e1jMUN92 = 0.
Compute e1jMUS92 = 0.

Compute e1jATK92 = 0.
Compute e1jost92 = 0.
Compute e1jGYE92 = 0.
Compute e1jGYS92 = 0.
Compute e1jCSP92 = 0.
Compute e1jNYU92 = 0.
Compute e1jRNY92 = 0.
Compute e1jENY92 = 0.
Compute e1jSEG92 = 0.
Compute e1jNEG92 = 0.
Compute e1jTAR92 = 0.
Compute e1jEJD92 = 0.


If (e1jFOMMR = 1) e1jFOM92 = e1jFOMfm.
If (e1jTAPMR = 1) e1jTAP92 = e1jTAPfm.
If (e1jTULMR = 1) e1jTUL92 = e1jTULfm.
If (e1jETKMR = 1) e1jETK92 = e1jETKfm.
If (e1jGKHMR = 1) e1jGKH92 = e1jGKHfm.
If (e1jUTHMR = 1) e1jUTH92 = e1jUTHfm.
If (e1jLAHMR = 1) e1jLAH92 = e1jLAHfm.
If (e1jEGHMR = 1) e1jEGH92 = e1jEGHfm.
If (e1jMUNMR = 1) e1jMUN92 = e1jMUNfm.
If (e1jMUSMR = 1) e1jMUS92 = e1jMUSfm.

If (e1jATKMR = 1) e1jATK92 = e1jATKfm.
If (e1joszMR = 1) e1jost92 = e1joszfm.
If (e1jGYEMR = 1) e1jGYE92 = e1jGYEfm.
If (e1jGYSMR = 1) e1jGYS92 = e1jGYSfm.
If (e1jCSPMR = 1) e1jCSP92 = e1jCSPfm.
If (e1jNYUMR = 1) e1jNYU92 = e1jNYUfm.
If (e1jRNYMR = 1) e1jRNY92 = e1jRNYfm.
If (e1jENYMR = 1) e1jENY92 = e1jENYfm.
If (e1jSEGMR = 1) e1jSEG92 = e1jSEGfm.
If (e1jNEGMR = 1) e1jNEG92 = e1jNEGfm.
If (e1jTARMR = 1) e1jTAR92 = e1jTARfm.
If (e1jEJDMR = 1) e1jEJD92 = e1jEJDfm.

desc e1jfom91 to e1jejd92.

*END OF QUESTION 65.
**********************************************************************.
*                        VARIABLE RECODE                             *.
*                    66 krds - Question 66                         *.
**********************************************************************.


* Kln vltozt definilunk az n lapoz kd alapjn, amely azt jelzi,
* hogy az sszes vltozn hinyz rtkek voltak 66. sz. 
* jvedelemtblban.
* A variable will be defined indicating that all variables had missing
* value for the question 66. I.e., respondent have not had any income 
* in question at all.

* Recode e1jkmuap (0=1) (else=0) into e1jMIST2.
* VARIABLE LABEL e1jMIST2 'sszes vlt. missing, 61. krd.'.
* VALUE LABEL e1jMIST2 1 'az sszes missing'
                       0 'egyb'.


Recode e1jKMUAP e1jKMUMA e1jKMUJU e1jKMUJL e1jKMUAU e1jKMUSZ
       e1jKMUOK e1jKMUNO e1jKMUDE e1jKMUJA e1jKMUFE e1jKMUMR
       e1jASMAP e1jASMMA e1jASMJU e1jASMJL e1jASMAU e1jASMSZ
       e1jASMOK e1jASMNO e1jASMDE e1jASMJA e1jASMFE e1jASMMR
       e1jAMGAP e1jAMGMA e1jAMGJU e1jAMGJL e1jAMGAU e1jAMGSZ
       e1jAMGOK e1jAMGNO e1jAMGDE e1jAMGJA e1jAMGFE e1jAMGMR
       e1jASZOK e1jASZNO e1jASZDE e1jASZJA e1jASZFE e1jASZMR
       e1jASZAP e1jASZMA e1jASZJU e1jASZJL e1jASZAU e1jASZSZ
       e1jAERAP e1jAERMA e1jAERJU e1jAERJL e1jAERAU e1jAERSZ
       e1jAEROK e1jAERNO e1jAERDE e1jAERJA e1jAERFE e1jAERMR
       e1jATAAP e1jATAMA e1jATAJU e1jATAJL e1jATAAU e1jATASZ
       e1jATAOK e1jATANO e1jATADE e1jATAJA e1jATAFE e1jATAMR
       e1jAFUAP e1jAFUMA e1jAFUJU e1jAFUJL e1jAFUAU e1jAFUSZ
       e1jAFUOK e1jAFUNO e1jAFUDE e1jAFUJA e1jAFUFE e1jAFUMR
       e1jKERAP e1jKERMA e1jKERJU e1jKERJL e1jKERAU e1jKERSZ
       e1jKEROK e1jKERNO e1jKERDE e1jKERJA e1jKERFE e1jKERMR
       e1jJUTAP e1jJUTMA e1jJUTJU e1jJUTJL e1jJUTAU e1jJUTSZ
       e1jJUTOK e1jJUTNO e1jJUTDE e1jJUTJA e1jJUTFE e1jJUTMR
       e1jBORAP e1jBORMA e1jBORJU e1jBORJL e1jBORAU e1jBORSZ
       e1jBOROK e1jBORNO e1jBORDE e1jBORJA e1jBORFE e1jBORMR
       e1jTAMAP e1jTAMMA e1jTAMJU e1jTAMJL e1jTAMAU e1jTAMSZ
       e1jTAMOK e1jTAMNO e1jTAMDE e1jTAMJA e1jTAMFE e1jTAMMR
       e1jELLAP e1jELLMA e1jELLJU e1jELLJL e1jELLAU e1jELLSZ
       e1jELLOK e1jELLNO e1jELLDE e1jELLJA e1jELLFE e1jELLMR
       e1jBIZAP e1jBIZMA e1jBIZJU e1jBIZJL e1jBIZAU e1jBIZSZ
       e1jBIZOK e1jBIZNO e1jBIZDE e1jBIZJA e1jBIZFE e1jBIZMR
       (SYSMIS, MISSING, .00, 0 = 0) (else=copy).

Recode e1jKMUSU e1jASMSU e1jAMGSU e1jASZSU e1jAERSU e1jATASU e1jAFUSU
       e1jKERSU e1jJUTSU e1jBORSU e1jTAMSU e1jELLSU e1jBIZSU
       (SYSMIS, MISSING, .00, 0 = 0) (else=copy).

**********************************************************************.
* 66 krds: a jvedelmek gyakorisga.
* Question 66: Frequency of incomes.

Count e1jKMUGK = e1jKMUAP e1jKMUMA e1jKMUJU e1jKMUJL e1jKMUAU e1jKMUSZ
                 e1jKMUOK e1jKMUNO e1jKMUDE e1jKMUJA e1jKMUFE e1jKMUMR (1).
Variable Label e1jkmugk '66.k. rend. kmun. gyakorisga 91. pr. - 92. mrc.'.

Count e1jASMGK = e1jASMAP e1jASMMA e1jASMJU e1jASMJL e1jASMAU e1jASMSZ
                 e1jASMOK e1jASMNO e1jASMDE e1jASMJA e1jASMFE e1jASMMR (1).
Variable Label e1jasmgk '66.k. alk. kmun. gyakorisga 91. pr. - 92. mrc.'.

Count e1jAMGGK = e1jAMGAP e1jAMGMA e1jAMGJU e1jAMGJL e1jAMGAU e1jAMGSZ
                 e1jAMGOK e1jAMGNO e1jAMGDE e1jAMGJA e1jAMGFE e1jAMGMR (1).
Variable Label e1jamggk '66.k. alk. mezm. gyakorisga 91. pr. - 92. mrc.'.

Count e1jASZGK = e1jASZOK e1jASZNO e1jASZDE e1jASZJA e1jASZFE e1jASZMR
                 e1jASZAP e1jASZMA e1jASZJU e1jASZJL e1jASZAU e1jASZSZ (1).
Variable Label e1jaszgk '66.k. alk. szakm. gyakorisga 91. pr. - 92. mrc.'.

Count e1jAERGK = e1jAERAP e1jAERMA e1jAERJU e1jAERJL e1jAERAU e1jAERSZ
                 e1jAEROK e1jAERNO e1jAERDE e1jAERJA e1jAERFE e1jAERMR (1).
Variable Label e1jaergk '66.k. alk. szell. gyakorisga 91. pr. - 92. mrc.'.

Count e1jATAGK = e1jATAAP e1jATAMA e1jATAJU e1jATAJL e1jATAAU e1jATASZ
                 e1jATAOK e1jATANO e1jATADE e1jATAJA e1jATAFE e1jATAMR (1).
Variable Label e1jatagk '66.k. alk. takar. gyakorisga 91. pr. - 92. mrc.'.

Count e1jAFUGK = e1jAFUAP e1jAFUMA e1jAFUJU e1jAFUJL e1jAFUAU e1jAFUSZ
                 e1jAFUOK e1jAFUNO e1jAFUDE e1jAFUJA e1jAFUFE e1jAFUMR (1).
Variable Label e1jafugk '66.k. alk. szll. gyakorisga 91. pr. - 92. mrc.'.

Count e1jKERGK = e1jKERAP e1jKERMA e1jKERJU e1jKERJL e1jKERAU e1jKERSZ
                 e1jKEROK e1jKERNO e1jKERDE e1jKERJA e1jKERFE e1jKERMR (1).
Variable Label e1jkergk '66.k. keresked. gyakorisga 91. pr. - 92. mrc.'.

Count e1jJUTGK = e1jJUTAP e1jJUTMA e1jJUTJU e1jJUTJL e1jJUTAU e1jJUTSZ
                 e1jJUTOK e1jJUTNO e1jJUTDE e1jJUTJA e1jJUTFE e1jJUTMR (1).
Variable Label e1jjutgk '66.k. jutalk gyakorisga 91. pr. - 92. mrc.'.

Count e1jBORGK = e1jBORAP e1jBORMA e1jBORJU e1jBORJL e1jBORAU e1jBORSZ
                 e1jBOROK e1jBORNO e1jBORDE e1jBORJA e1jBORFE e1jBORMR (1).
Variable Label e1jborgk '66.k. borraval gyakorisga 91. pr. - 92. mrc.'.

Count e1jTAMGK = e1jTAMAP e1jTAMMA e1jTAMJU e1jTAMJL e1jTAMAU e1jTAMSZ
                 e1jTAMOK e1jTAMNO e1jTAMDE e1jTAMJA e1jTAMFE e1jTAMMR (1).
Variable Label e1jtamgk '66.k. pnz. tm. gyakorisga 91. pr. - 92. mrc.'.

Count e1jELLGK = e1jELLAP e1jELLMA e1jELLJU e1jELLJL e1jELLAU e1jELLSZ
                 e1jELLOK e1jELLNO e1jELLDE e1jELLJA e1jELLFE e1jELLMR (1).
Variable Label e1jellgk '66.k. ellts gyakorisga 91. pr. - 92. mrc.'.

Count e1jBIZGK = e1jBIZAP e1jBIZMA e1jBIZJU e1jBIZJL e1jBIZAU e1jBIZSZ
                 e1jBIZOK e1jBIZNO e1jBIZDE e1jBIZJA e1jBIZFE e1jBIZMR (1).
Variable Label e1jbizgk '66.k. biztost. gyakorisga 91. pr. - 92. mrc.'.

desc e1jkmugk to e1jbizgk.

*******************************************************************.
* 66. krds: Az ves jvedelem.
* Question 66: Yearly Incomes

Compute e1jKULEV = e1jKMUSU.
Variable Label e1jkulev '66.1.k. rend. kmun. ves jvedelem'.

Compute e1jASMEV = e1jASMSU.
Variable Label e1jasmev '66.2.k. alk. kmun. ves jvedelem'.

Compute e1jAMGEV = e1jAMGSU.
Variable Label e1jamgev '66.3.k. alk. mezm. ves jvedelem'.

Compute e1jASZEV = e1jASZSU.
Variable Label e1jaszev '66.4.k. alk. szakm. ves jvedelem'.

Compute e1jAEREV = e1jAERSU.
Variable Label e1jaerev '66.5.k. alk. szell. ves jvedelem'.

Compute e1jATAEV = e1jATASU.
Variable Label e1jataev '66.6.k. alk. takar. ves jvedelem'.

Compute e1jAFUEV = e1jAFUSU.
Variable Label e1jafuev '66.7.k. alk. szll. ves jvedelem'.

Compute e1jKEREV = e1jKERSU.
Variable Label e1jkerev '66.8.k. keresked. ves jvedelem'.

Compute e1jJUTEV = e1jJUTSU.
Variable Label e1jjutev '66.9.k. jutalk ves jvedelem'.

Compute e1jBOREV = e1jBORSU.
Variable Label e1jborev '66.10.k. borraval ves jvedelem'.

Compute e1jTAMEV = e1jTAMSU.
Variable Label e1jtamev '66.11.k. pnz. tm. ves jvedelem'.

Compute e1jELLEV = e1jELLSU.
Variable Label e1jellev '66.12.k. egyb ellts ves jvedelem'.

Compute e1jBIZEV = e1jBIZSU.
Variable Label e1jbizev '66.13.k. biztostsbl ves jvedelem'.

desc e1jkulev to e1jbizev.

**********************************************************************

* 66. krd. 1991 prilisi s 1992 mrciusi jvedelmek becslse.
* Question 66. Calculating the incomes in April of 1991 & March of 1992.

Compute e1jkul91 = 0.
Compute e1jASM91 = 0.
Compute e1jAMG91 = 0.
Compute e1jASZ91 = 0.
Compute e1jAER91 = 0.
Compute e1jATA91 = 0.
Compute e1jAFU91 = 0.
Compute e1jKER91 = 0.
Compute e1jJUT91 = 0.
Compute e1jBOR91 = 0.
Compute e1jTAM91 = 0.
Compute e1jELL91 = 0.
Compute e1jBIZ91 = 0.

Compute e1jkul92 = 0.
Compute e1jASM92 = 0.
Compute e1jAMG92 = 0.
Compute e1jASZ92 = 0.
Compute e1jAER92 = 0.
Compute e1jATA92 = 0.
Compute e1jAFU92 = 0.
Compute e1jKER92 = 0.
Compute e1jJUT92 = 0.
Compute e1jBOR92 = 0.
Compute e1jTAM92 = 0.
Compute e1jELL92 = 0.
Compute e1jBIZ92 = 0.

If (e1jKMUAP = 1) e1jkul91 = e1jKULEV / e1jKMUGK.
If (e1jASMAP = 1) e1jASM91 = e1jASMEV / e1jASMGK.
If (e1jAMGAP = 1) e1jAMG91 = e1jAMGEV / e1jAMGGK.
If (e1jASZAP = 1) e1jASZ91 = e1jASZEV / e1jASZGK.
If (e1jAERAP = 1) e1jAER91 = e1jAEREV / e1jAERGK.
If (e1jATAAP = 1) e1jATA91 = e1jATAEV / e1jATAGK.
If (e1jAFUAP = 1) e1jAFU91 = e1jAFUEV / e1jAFUGK.
If (e1jKERAP = 1) e1jKER91 = e1jKEREV / e1jKERGK.
If (e1jJUTAP = 1) e1jJUT91 = e1jJUTEV / e1jJUTGK.
If (e1jBORAP = 1) e1jBOR91 = e1jBOREV / e1jBORGK.
If (e1jTAMAP = 1) e1jTAM91 = e1jTAMEV / e1jTAMGK.
If (e1jELLAP = 1) e1jELL91 = e1jELLEV / e1jELLGK.
If (e1jBIZAP = 1) e1jBIZ91 = e1jBIZEV / e1jBIZGK.

If (e1jKMUMR = 1) e1jkul92 = e1jKULEV / e1jKMUGK.
If (e1jASMMR = 1) e1jASM92 = e1jASMEV / e1jASMGK.
If (e1jAMGMR = 1) e1jAMG92 = e1jAMGEV / e1jAMGGK.
If (e1jASZMR = 1) e1jASZ92 = e1jASZEV / e1jASZGK.
If (e1jAERMR = 1) e1jAER92 = e1jAEREV / e1jAERGK.
If (e1jATAMR = 1) e1jATA92 = e1jATAEV / e1jATAGK.
If (e1jAFUMR = 1) e1jAFU92 = e1jAFUEV / e1jAFUGK.
If (e1jKERMR = 1) e1jKER92 = e1jKEREV / e1jKERGK.
If (e1jJUTMR = 1) e1jJUT92 = e1jJUTEV / e1jJUTGK.
If (e1jBORMR = 1) e1jBOR92 = e1jBOREV / e1jBORGK.
If (e1jTAMMR = 1) e1jTAM92 = e1jTAMEV / e1jTAMGK.
If (e1jELLMR = 1) e1jELL92 = e1jELLEV / e1jELLGK.
If (e1jBIZMR = 1) e1jBIZ92 = e1jBIZEV / e1jBIZGK.

desc e1jkul91 to e1jbiz92.

* END OF QUESTION 66.
********************************************************************.

* sszevont vltozk kpzse.
* Computation of Summary variables.

* 67. krds: ritka jvedelmek sszevonsa.
* Megjegyzs: e1fevegp vltoz a 93. krdsbl szrmazik.
* Question 67: Summing up non-regular incomes.
* Yearly incomes & Incomes for Apr. of '91 & March of '92.
* Note: Variable e1FEVEGP is derived from question 93.


Compute e1jritev = e1jpremp + e1jnapip + e1jujitp + e1jegyp + e1fevegp.
Variable Label e1jritev 'ves ritka jvedelem'.

* Note because of inflation we correct the incomes for the 
* ends of reference period.

Compute e1jRIT91 = ((e1jRITEV / 12)*0.9).
Variable Label e1jrit91 'Ritka jvedelem 91 pr.'.

Compute e1jRIT92 = ((e1jRITEV / 12)*1.1).
Variable Label e1jrit92 'Ritka jvedelem 92 mrc.'.


* 71. s 73. krds: Nyeresg, osztalk, rszeseds sszevonsa.
* Question 71 and 73: profits and shares from enterprises.
* ves s havi bontsban - Yearly and monthly break-downs.


Compute e1jnyeev = e1jvpenz + e1jvsump.
Variable Label e1jnyeev 'ves nyeresg s osztalk'.


* Note because of inflation we correct the incomes for the 
* ends of reference period.

Compute e1jnye91 = ((e1jnyeev / 12)*0.9).
Variable Label e1jnye91 'Nyeresg, osztalk 91 pr.'.

Compute e1jnye92 = ((e1jnyeev / 12)*1.1).
Variable Label e1jnye92 'Nyeresg, osztalk 92 mrc.'.

************************************************************************.

* A 65-66. krds jvedelmeinek sszevonsa.
* Summing up variables from questions 65 and 66.
* Yearly incomes.

* Incomes from main job.

Compute e1jfmhev = e1jfomev + e1jtulev + e1jetkev + e1jgkhev + e1juthev +
                   e1jlahev + e1jeghev.
Variable Label e1jfmhev 'Fmunkahelyi ves jvedelem'.

* Incomes social insurance benefits.

Compute e1jtbev  = e1jtapev + e1jmunev + e1jgyeev + e1jgysev + e1jnyuev +
                   e1jrnyev + e1jenyev + e1jellev.
Variable Label e1jtbev 'Trsadalombizt. ves jvedelem'.

* Social incomes. 

Compute e1jszcev = e1jmusev + e1jatkev + e1jostev + e1jcspev + e1jsegev +
                   e1jnegev .
Variable Label e1jszcev 'Szocilis ves jvedelem'.

* Other transfers.

Compute e1jtraev = e1jtarev + e1jejdev + e1jtamev + e1jbizev.
Variable Label e1jtraev 'ves transzfer jvedelem'.

* Market incomes from 2nd and non-regular jobs.

Compute e1jkmuev = e1jkulev + e1jasmev + e1jamgev + e1jaszev + e1jaerev +
                   e1jataev + e1jafuev + e1jkerev + e1jjutev + e1jborev.
Variable Label e1jkmuev 'ves kln jvedelem'.

* Total netto yearly personal income.

Compute e1joszev = e1jfmhev + e1jtbev  + e1jszcev + e1jtraev + e1jkmuev +
                   e1jnyeev + e1jritev.
Variable Label e1joszev 'VES SSZES SZEMLYES JVEDELEM (netto)'.


* Summary variables for april of 1991.
* Main job.
Compute e1jfmh91 = e1jfom91 + e1jtul91 + e1jetk91 + e1jgkh91 + e1juth91 + 
                   e1jlah91 + e1jegh91.
Variable Label e1jfmh91 'Fmunkahelyi jvedelem 91 pr.'.

* Social insurance.
Compute e1jtb91  = e1jtap91 + e1jmun91 + e1jgye91 + e1jgys91 + e1jnyu91 +
                   e1jrny91 + e1jeny91 + e1jell91.
Variable Label e1jtb91 'Trsadalombizt. jvedelem 91 pr.'.

* Social incomes.
Compute e1jszc91 = e1jmus91 + e1jatk91 + e1jost91 + e1jcsp91 + e1jseg91 + e1jneg91.

Variable Label e1jszc91 'Szocilis jvedelem 91 pr.'.

* Other transfers.
Compute e1jtra91 = e1jtar91 + e1jejd91 + e1jtam91 + e1jbiz91.
Variable Label e1jtra91 'Transzfer jvedelem 91 pr.'.

* Non-regular market incomes.
Compute e1jkmu91 = e1jkul91 + e1jasm91 + e1jamg91 + e1jasz91 + e1jaer91 + e1jata91 +
                   e1jafu91 + e1jker91 + e1jjut91 + e1jbor91.
Variable Label e1jkmu91 'Kln jvedelem 91 pr.'.

* Total netto personal income in april of 1991.
Compute e1josz91 = e1jfmh91 + e1jtb91 + e1jszc91 + e1jtra91 + e1jkmu91 +
                   e1jnye91 + e1jrit91.
Variable Label e1josz91 '91 pr. sszes szemlyes jvedelem (netto)'.


* Incomes in March of 1992.

Compute e1jfmh92 = e1jfom92 + e1jtul92 + e1jetk92 + e1jgkh92 + e1juth92 + 
                   e1jlah92 + e1jegh92.
Variable Label e1jfmh92 'Fmunkahelyi jvedelem 92 mrc.'.

Compute e1jtb92  = e1jtap92 + e1jmun92 + e1jgye92 + e1jgys92 + e1jnyu92 +
                   e1jrny92 + e1jeny92 + e1jell92.
Variable Label e1jtb92 'Trsadalombizt. jvedelem 92 mrc.'.

Compute e1jszc92 = e1jmus92 + e1jatk92 + e1jost92 + e1jcsp92 + 
                   e1jseg92 + e1jneg92.

Variable Label e1jszc92 'Szocilis jvedelem 92 mrc.'.

Compute e1jtra92 = e1jtar92 + e1jejd92 + e1jtam92 + e1jbiz92.
Variable Label e1jtra92 'Transzfer jvedelem 92 mrc.'.

Compute e1jkmu92 = e1jkul92 + e1jasm92 + e1jamg92 + e1jasz92 + e1jaer92 + e1jata92 +
                   e1jafu92 + e1jker92 + e1jjut92 + e1jbor92.
Variable Label e1jkmu92 'Kln jvedelem 92 mrc.'.

* Total netto personal income in March of 1992.
Compute e1josz92 = e1jfmh92 + e1jtb92 + e1jszc92 + e1jtra92 + e1jkmu92 +
                   e1jnye92 + e1jrit92.
Variable Label e1josz92 '92 mr. sszes szemlyes jvedelem (netto)'.


* sszehasonltjuk a helyettesito kerdoiv 8. krdsre adott vlaszt a 92 mrciusra 
* kiszmolt jvedelemmel. Azokban az esetekben ahol 0 volt a kiszmolt prilisi 
* s az ves jvedelem is, a 8. krds alapjn becslnk. 
* Comparing calculated income for March of 1992 
* to answer for question 8. For those, who had zero calculated incomes for 
* whole year and April, we shall estimate on the basis of their answers for 
* question 8.
* Leellenrizzk, hogy hny esetben cserljk ki, az ltalunk kiszmolt
* jvedelmet a 8. krd. vlaszval.
* Checking the number of those cases, where calculated income will be
* replaced with the answer for question 8.

compute  jobecs92 = e1jobecs.
variable labels jobecs92 'Havi netto jvedelme (amit hazahoz)'.
value labels jobecs92 0 'nincs jvedelme'.

* temporary.
* select IF (jobecs92 > e1jOSZ92 and e1kerdiv ne 2).
* list eazon92 jobecs92 e1josz92 e1kerdiv.


compute xx=jobecs92-e1josz92.

formats xx (F9.0).

formats e1josz92 (F9.0).
temporary.
select IF (abs(xx) ge 50000 and e1kerdiv eq 1 and e1josz92 gt 0).


list eazon92 jobecs92 e1josz92 e1kerdiv xx.

compute jcheck1=0.
if (jobecs92 > e1josz92 and e1kerdiv eq 1 and jobecs92 gt 0) jcheck1=1.
Variable label JCHECK1 'Szmitott vagy behelyettesitett jvedelem, 92 mrcius'.
VALUE LABEL JCHECK1 0 'SZMTOTT NAGYOBB' 1 'MONDOTT NAGYOBB'.


Compute JCHECK2=0.
If (jobecs92 gt 0 and (e1josz91 eq 0 and e1joszev eq 0)) jcheck2=1.
Variable label JCHECK2 'Szmitott vagy behelyettesitett jvedelem, 91 prilis'.


Compute JCHECK3=0.
If (jobecs92 gt 0 and e1joszev eq 0) jcheck3=1.
Variable label JCHECK3 'Szmitott vagy behelyettesitett ves jvedelem'.
VALUE LABEL JCHECK2 JCHECK3 0 'SZMTOTT' 1 'BEHELYETTESITETT'.


compute JCHECK4=0.
If (jobecs92 eq e1josz92 and e1kerdiv eq 1) jcheck4=1.
Var label jcheck4 'becsult egyenlo-e a szamittotal'.
val label jcheck4 0 'nem egyenlo' 1 'egyenlo'.
 
temporary.
select if (e1kerdiv=1).
fre jcheck1 jcheck2 jcheck3 jcheck4.

temporary.
select if (e1kerdiv=1).
desc e1joszev e1josz91 e1josz92.

If (jobecs92 > e1josz92 and jobecs92 gt 0) e1josz92 = jobecs92.
Variable Label e1josz92 '92 mrc sszes szemlyes jvedelem (netto)'.

If (jobecs92 gt 0 and (e1josz91 eq 0 and e1joszev eq 0)) e1josz91 = (jobecs92 * 0.9).
If (jobecs92 gt 0 and e1joszev eq 0) e1joszev= (Mean (e1josz91, e1josz92))*12.

temporary.
select if (e1kerdiv=1).
desc e1joszev e1josz91 e1josz92.

temporary.
select if (e1kerdiv=2).
desc e1joszev e1josz91 e1josz92 e1jobecs jobecs92.


*********************************************************************
* Income from employment.
Compute e1jovmv  = e1jfmhev + e1jritev.
Variable Label e1jovmv 'ves munkavllali jvedelem'.

* Incomes from enterprises.
Compute e1jval = e1jnyeev + e1jkmuev.
Variable Label e1jval 'ves vllalkozi jvedelem'.

* Social and private transfers (non-market incomes).
Compute e1jjar = e1jtbev + e1jszcev + e1jtraev.
Variable Label e1jjar 'ves jradk jelleg jvedelem'.

* Akik tulajdonosok munkahelykn, azoknak a munkavllali 
* jvedelmt a 'vllalkozi jvedelmekhez' soroljuk.
* For those who are owners in their own workplace, incomes from 
* their main job (employment) will be counted as 
* 'entrepreneurial (self-employed) income'.

Compute e1fmagan = e1ffogvi.
Formats e1fmagan (F1.0).
Variable Label e1fmagan 'Magnszektor vagy sem'.
Value Label e1fmagan 1 'magn'
                     0 'nem magn'.
Recode e1fmagan (2, 4, 5 = 1) (else = 0).
If (e1ffogvi = 3 and e1fgform = 7) e1fmagan = 1.
If (e1fmagan = 1) e1jval = e1jval + e1jfomev + e1jritev.
If (e1fmagan = 1) e1jovmv = 0.

Formats e1jfomgk to e1jejdgk, e1jkmugk to e1jbizgk (F2.0).
Formats e1jfomev to e1jejdev, e1jkulev to e1jbizev
        e1jritev to e1jjar (F9.0).


**********************************************************************.
sort cases by hazon92.
save outfile = 'c:\mhp jovedelemjavitas\adatok\92-es2.sav'
    /compressed.

**********************************************************************.

* Hztarts jvedelmek sszestse.
* Switch to household-level by aggregating individuals 
* & summing up household incomes.

sort cases by hazon92.

aggregate /outfile = 'C:\mhp jovedelemjavitas\adatok\hjov92.sav'
          /presorted
          /break = hazon92
          /h1jfomev = sum (e1jfomev)
          /h1jtapev = sum (e1jtapev)
          /h1jtulev = sum (e1jtulev)
          /h1jetkev = sum (e1jetkev)
          /h1jgkhev = sum (e1jgkhev)
          /h1juthev = sum (e1juthev)
          /h1jlahev = sum (e1jlahev)
          /h1jeghev = sum (e1jeghev)
          /h1jmunev = sum (e1jmunev)
          /h1jmusev = sum (e1jmusev)
          /h1jatkev = sum (e1jatkev)
          /h1jostev = sum (e1jostev)
          /h1jgyeev = sum (e1jgyeev)
          /h1jgysev = sum (e1jgysev)
          /h1jcspev = sum (e1jcspev)
          /h1jnyuev = sum (e1jnyuev)
          /h1jrnyev = sum (e1jrnyev)
          /h1jenyev = sum (e1jenyev)
          /h1jsegev = sum (e1jsegev)
          /h1jnegev = sum (e1jnegev)
          /h1jtarev = sum (e1jtarev)
          /h1jejdev = sum (e1jejdev)
          /h1jkulev = sum (e1jkulev)
          /h1jasmev = sum (e1jasmev)
          /h1jamgev = sum (e1jamgev)
          /h1jaszev = sum (e1jaszev)
          /h1jaerev = sum (e1jaerev)
          /h1jataev = sum (e1jataev)
          /h1jafuev = sum (e1jafuev)
          /h1jkerev = sum (e1jkerev)
          /h1jjutev = sum (e1jjutev)
          /h1jborev = sum (e1jborev)
          /h1jtamev = sum (e1jtamev)
          /h1jellev = sum (e1jellev)
          /h1jbizev = sum (e1jbizev)
          /h1jfmhev = sum (e1jfmhev)
          /h1jtbev  = sum (e1jtbev )
          /h1jszcev = sum (e1jszcev)
          /h1jtraev = sum (e1jtraev)
          /h1jkmuev = sum (e1jkmuev)
          /h1jritev = sum (e1jritev)
          /h1jnyeev = sum (e1jnyeev)
          /h1joszev = sum (e1joszev)
          /h1jfom91 = sum (e1jfom91)
          /h1jtap91 = sum (e1jtap91)
          /h1jtul91 = sum (e1jtul91)
          /h1jetk91 = sum (e1jetk91)
          /h1jgkh91 = sum (e1jgkh91)
          /h1juth91 = sum (e1juth91)
          /h1jlah91 = sum (e1jlah91)
          /h1jegh91 = sum (e1jegh91)
          /h1jmun91 = sum (e1jmun91)
          /h1jmus91 = sum (e1jmus91)
          /h1jatk91 = sum (e1jatk91)
          /h1jost91 = sum (e1jost91)
          /h1jgye91 = sum (e1jgye91)
          /h1jgys91 = sum (e1jgys91)
          /h1jcsp91 = sum (e1jcsp91)
          /h1jnyu91 = sum (e1jnyu91)
          /h1jrny91 = sum (e1jrny91)
          /h1jeny91 = sum (e1jeny91)
          /h1jseg91 = sum (e1jseg91)
          /h1jneg91 = sum (e1jneg91)
          /h1jtar91 = sum (e1jtar91)
          /h1jejd91 = sum (e1jejd91)
          /h1jkul91 = sum (e1jkul91)
          /h1jasm91 = sum (e1jasm91)
          /h1jamg91 = sum (e1jamg91)
          /h1jasz91 = sum (e1jasz91)
          /h1jaer91 = sum (e1jaer91)
          /h1jata91 = sum (e1jata91)
          /h1jafu91 = sum (e1jafu91)
          /h1jker91 = sum (e1jker91)
          /h1jjut91 = sum (e1jjut91)
          /h1jbor91 = sum (e1jbor91)
          /h1jtam91 = sum (e1jtam91)
          /h1jell91 = sum (e1jell91)
          /h1jbiz91 = sum (e1jbiz91)
          /h1jrit91 = sum (e1jrit91)
          /h1jnye91 = sum (e1jnye91)
          /h1jfmh91 = sum (e1jfmh91)
          /h1jtb91  = sum (e1jtb91 )
          /h1jszc91 = sum (e1jszc91)
          /h1jtra91 = sum (e1jtra91)
          /h1jkmu91 = sum (e1jkmu91)
          /h1josz91 = sum (e1josz91)
          /h1jfom92 = sum (e1jfom92)
          /h1jtap92 = sum (e1jtap92)
          /h1jtul92 = sum (e1jtul92)
          /h1jetk92 = sum (e1jetk92)
          /h1jgkh92 = sum (e1jgkh92)
          /h1juth92 = sum (e1juth92)
          /h1jlah92 = sum (e1jlah92)
          /h1jegh92 = sum (e1jegh92)
          /h1jmun92 = sum (e1jmun92)
          /h1jmus92 = sum (e1jmus92)
          /h1jatk92 = sum (e1jatk92)
          /h1jost92 = sum (e1jost92)
          /h1jgye92 = sum (e1jgye92)
          /h1jgys92 = sum (e1jgys92)
          /h1jcsp92 = sum (e1jcsp92)
          /h1jnyu92 = sum (e1jnyu92)
          /h1jrny92 = sum (e1jrny92)
          /h1jeny92 = sum (e1jeny92)
          /h1jseg92 = sum (e1jseg92)
          /h1jneg92 = sum (e1jneg92)
          /h1jtar92 = sum (e1jtar92)
          /h1jejd92 = sum (e1jejd92)
          /h1jkul92 = sum (e1jkul92)
          /h1jasm92 = sum (e1jasm92)
          /h1jamg92 = sum (e1jamg92)
          /h1jasz92 = sum (e1jasz92)
          /h1jaer92 = sum (e1jaer92)
          /h1jata92 = sum (e1jata92)
          /h1jafu92 = sum (e1jafu92)
          /h1jker92 = sum (e1jker92)
          /h1jjut92 = sum (e1jjut92)
          /h1jbor92 = sum (e1jbor92)
          /h1jtam92 = sum (e1jtam92)
          /h1jell92 = sum (e1jell92)
          /h1jbiz92 = sum (e1jbiz92)
          /h1jrit92 = sum (e1jrit92)
          /h1jnye92 = sum (e1jnye92)
          /h1jfmh92 = sum (e1jfmh92)
          /h1jtb92  = sum (e1jtb92 )
          /h1jszc92 = sum (e1jszc92)
          /h1jtra92 = sum (e1jtra92)
          /h1jkmu92 = sum (e1jkmu92)
          /h1josz92 = sum (e1josz92)
          /h1jovmv  = sum (e1jovmv)
          /h1jval   = sum (e1jval)
          /h1jjar   = sum (e1jjar)
          /h1n      = NU.



*********************************************************************.

* a HT kpzet jvedelmek hozzmsolsa a f file-hoz.
* Matching household-level variables to main (individual-level) file.

Match files  file  = 'C:\mhp jovedelemjavitas\adatok\92-es2.sav'
            /table = 'C:\mhp jovedelemjavitas\adatok\hjov92.sav'
            /by    = hazon92.
Execute.

variable labels  h1jfomev '65.k. flls, ves jvedelem'
                /h1jtapev '65.k. tppnz, ves jvedelem'
                /h1jtulev '65.k. tlra, ves jvedelem'
                /h1jetkev '65.k. tkezsi hj, ves jvedelem'
                /h1jgkhev '65.k. gpkocsi hj, ves jvedelem'
                /h1juthev '65.k. utazsi hj, ves jvedelem'
                /h1jlahev '65.k. laks hj, ves jvedelem'
                /h1jeghev '65.k. egyb hj, ves jvedelem'
                /h1jmunev '65.k. munkanlkli j, ves jvedelem'
                /h1jmusev '65.k. munk jv.potl tmogats, ves jvedelem'
                /h1jatkev '65.k. tkpzsi tmogats, ves jvedelem'
                /h1jostev '65.k. sztndj, ves jvedelem'
                /h1jgyeev '65.k. GYED, ves jvedelem'
                /h1jgysev '65.k. GYES, ves jvedelem'
                /h1jcspev '65.k. csaldi ptlk, ves jvedelem'
                /h1jnyuev '65.k. regsgi nyugdj, ves jvedelem'
                /h1jrnyev '65.k. rokkant nyugdj, ves jvedelem'
                /h1jenyev '65.k. egyb nyugdj, ves jvedelem'
                /h1jsegev '65.k. rendszeres szocilis seg, ves jvedelem'
                /h1jnegev '65.k. rendkvli szocilis seg, ves jvedelem'
                /h1jtarev '65.k. tartsdj, ves jvedelem'
                /h1jejdev '65.k. ltejradk, ves jvedelem'
                /h1jkulev '65.k. rendszeres klnmunka, ves jvedelem'
                /h1jasmev '65.k. alkalmi segdmunka, ves jvedelem'
                /h1jamgev '65.k. alkalmi mezgazdi munka, ves jvedelem'
                /h1jaszev '65.k. alkalmi szakmunka, ves jvedelem'
                /h1jaerev '65.k. alkalmi szellemi munka, ves jvedelem'
                /h1jataev '65.k. takarts, gyermekrzs, ves jvedelem'
                /h1jafuev '65.k. fuvarozs, ves jvedelem'
                /h1jkerev '65.k. kereskedelem, ves jvedelem'
                /h1jjutev '65.k. jutalk, ves jvedelem'
                /h1jborev '65.k. borraval, ves jvedelem'
                /h1jtamev '65.k. pnzbeni tmogats, ves jvedelem'
                /h1jellev '65.k. egyb ellts, ves jvedelem'
                /h1jbizev '65.k. egyb biztosts, ves jvedelem'
                /h1jfmhev 'sszes fmunkahelyhez kapcs. ves jvedelem'
                /h1jtbev  'sszes trsadalombiztostsi ves jvedelem'
                /h1jszcev 'sszes szocilis, ves jvedelem'
                /h1jtraev 'sszes transzfer, ves jvedelem'
                /h1jkmuev 'sszes klnmunka, ves jvedelem '
                /h1jritev 'sszes ritka jvedelem, ves'
                /h1jnyeev 'sszes vllalkozi jvedelem, ves'
                /h1joszev 'sszes szemlyes jvedelem, ves'
                /h1jfom91 'flls jved., 91 prilis'
                /h1jtap91 'tppnz jved., 91 prilis'
                /h1jtul91 'tlra jved., 91 prilis'
                /h1jetk91 'tkezsi hozzjruls jved., 91 prilis'
                /h1jgkh91 'gpkocsi hozzjruls jved., 91 prilis'
                /h1juth91 'utazsi hozzjruls jved., 91 prilis'
                /h1jlah91 'laks hozzjruls jved., 91 prilis'
                /h1jegh91 'egyb hozzjruls jved., 91 prilis'
                /h1jmun91 'munkanlkli jradk jved., 91 prilis'
                /h1jmus91 'munk jv.potl tmogats jved., 91 prilis'
                /h1jatk91 'tkpzsi tmogats jved., 91 prilis'
                /h1jost91 'sztndj jved., 91 prilis'
                /h1jgye91 'GYED jved., 91 prilis'
                /h1jgys91 'GYES jved., 91 prilis'
                /h1jcsp91 'csaldi ptlk jved., 91 prilis'
                /h1jnyu91 'regsgi nyugdj jved., 91 prilis'
                /h1jrny91 'rokkant nyugdj jved., 91 prilis'
                /h1jeny91 'egyb nyugdj jved., 91 prilis'
                /h1jseg91 'rendszeres szocilis seg jved., 91 prilis'
                /h1jneg91 'rendkvli szocilis seg jved., 91 prilis'
                /h1jtar91 'tartsdj jved., 91 prilis'
                /h1jejd91 'ltejradk jved., 91 prilis'
                /h1jkul91 '65.k. rendszeres klnmunka, 91 prilis'
                /h1jasm91 '65.k. alkalmi segdmunka, 91 prilis'
                /h1jamg91 '65.k. alkalmi mezgazdi munka, 91 prilis'
                /h1jasz91 '65.k. alkalmi szakmunka, 91 prilis'
                /h1jaer91 '65.k. alkalmi szellemi munka, 91 prilis'
                /h1jata91 '65.k. takarts, gyermekrzs, 91 prilis'
                /h1jafu91 '65.k. fuvarozs, 91 prilis'
                /h1jker91 '65.k. kereskedelem, 91 prilis'
                /h1jjut91 '65.k. jutalk, 91 prilis'
                /h1jbor91 '65.k. borraval, 91 prilis'
                /h1jtam91 '65.k. pnzbeni tmogats, 91 prilis'
                /h1jell91 '65.k. egyb ellts, 91 prilis'
                /h1jbiz91 '65.k. egyb biztosts, 91 prilis'
                /h1jrit91 'sszes ritka jvedelem, 91 prilis'
                /h1jnye91 'sszes vllalkozi jvedelem, 91 prilis'
                /h1jfmh91 'sszes fmunkhelyhez kapcs. jved., 91 prilis'
                /h1jtb91  'sszes trsadalombizt. jved., 91 prilis'
                /h1jszc91 'sszes szocilis jved., 91 prilis'
                /h1jtra91 'sszes transzfer jved., 91 prilis'
                /h1jkmu91 'sszes klnmunka jved., 91 prilis'
                /h1josz91 'sszes szemlyes jvedelem, 91 prilis'
                /h1jfom92 'flls jved., 92 mrcius'
                /h1jtap92 'tppnz jved., 92 mrcius'
                /h1jtul92 'tlra jved., 92 mrcius'
                /h1jetk92 'tkezsi hozzjruls jved., 92 mrcius'
                /h1jgkh92 'gpkocsi hozzjruls jved., 92 mrcius'
                /h1juth92 'utazsi hozzjruls jved., 92 mrcius'
                /h1jlah92 'laks hozzjruls jved., 92 mrcius'
                /h1jegh92 'egyb hozzjruls jved., 92 mrcius'
                /h1jmun92 'munkanlkli jradk jved., 92 mrcius'
                /h1jmus92 'munk jv.potl tmogats jved., 92 mrcius'
                /h1jatk92 'tkpzsi tmogats jved., 92 mrcius'
                /h1jost92 'sztndj jved., 92 mrcius'
                /h1jgye92 'GYED jved., 92 mrcius'
                /h1jgys92 'GYES jved., 92 mrcius'
                /h1jcsp92 'csaldi ptlk jved., 92 mrcius'
                /h1jnyu92 'regsgi nyugdj jved., 92 mrcius'
                /h1jrny92 'rokkant nyugdj jved., 92 mrcius'
                /h1jeny92 'egyb nyugdj jved., 92 mrcius'
                /h1jseg92 'rendszeres szocilis seg jved., 92 mrcius'
                /h1jneg92 'rendkvli szocilis seg jved., 92 mrcius'
                /h1jtar92 'tartsdj jved., 92 mrcius'
                /h1jejd92 'ltejradk jved., 92 mrcius'
                /h1jkul92 '65.k. rendszeres klnmunka, 92 mrcius'
                /h1jasm92 '65.k. alkalmi segdmunka, 92 mrcius'
                /h1jamg92 '65.k. alkalmi mezgazdi munka, 92 mrcius'
                /h1jasz92 '65.k. alkalmi szakmunka, 92 mrcius'
                /h1jaer92 '65.k. alkalmi szellemi munka, 92 mrcius'
                /h1jata92 '65.k. takarts, gyermekrzs, 92 mrcius'
                /h1jafu92 '65.k. fuvarozs, 92 mrcius'
                /h1jker92 '65.k. kereskedelem, 92 mrcius'
                /h1jjut92 '65.k. jutalk, 92 mrcius'
                /h1jbor92 '65.k. borraval, 92 mrcius'
                /h1jtam92 '65.k. pnzbeni tmogats, 92 mrcius'
                /h1jell92 '65.k. egyb ellts, 92 mrcius'
                /h1jbiz92 '65.k. egyb biztosts, 92 mrcius'
                /h1jrit92 'sszes ritka jvedelem, 92 mrcius'
                /h1jnye92 'sszes vllalkozi jvedelem, 92 mrcius'
                /h1jfmh92 'sszes fmunkhelyhez kapcs. jved., 92 mrcius'
                /h1jtb92  'sszes trsadalombizt jved., 92 mrcius'
                /h1jszc92 'sszes szocilis jved., 92 mrcius'
                /h1jtra92 'sszes transzfer jved., 92 mrcius'
                /h1jkmu92 'sszes klnmunka jved., 92 mrcius'
                /h1josz92 'sszes szemlyes jvedelem, 92 mrcius'
                /h1jovmv  'sszes munkavllali jvedelem, ves'
                /h1jval   'sszes vllalkozi s kln jvedelem, ves'
                /h1jjar   'sszes transzfer jvedelem, ves'
                /h1n      'Hztartstagok szma'.

variable labels  e1jfomev '65.k. flls, ves jvedelem'
                /e1jtapev '65.k. tppnz, ves jvedelem'
                /e1jtulev '65.k. tlra, ves jvedelem'
                /e1jetkev '65.k. tkezsi hj, ves jvedelem'
                /e1jgkhev '65.k. gpkocsi hj, ves jvedelem'
                /e1juthev '65.k. utazsi hj, ves jvedelem'
                /e1jlahev '65.k. laks hj, ves jvedelem'
                /e1jeghev '65.k. egyb hj, ves jvedelem'
                /e1jmunev '65.k. munkanlkli j, ves jvedelem'
                /e1jmusev '65.k. munk jv.potl tmogats, ves jvedelem'
                /e1jatkev '65.k. tkpzsi tmogats, ves jvedelem'
                /e1jostev '65.k. sztndj, ves jvedelem'
                /e1jgyeev '65.k. GYED, ves jvedelem'
                /e1jgysev '65.k. GYES, ves jvedelem'
                /e1jcspev '65.k. csaldi ptlk, ves jvedelem'
                /e1jnyuev '65.k. regsgi nyugdj, ves jvedelem'
                /e1jrnyev '65.k. rokkant nyugdj, ves jvedelem'
                /e1jenyev '65.k. egyb nyugdj, ves jvedelem'
                /e1jsegev '65.k. rendszeres szocilis seg, ves jvedelem'
                /e1jnegev '65.k. rendkvli szocilis seg, ves jvedelem'
                /e1jtarev '65.k. tartsdj, ves jvedelem'
                /e1jejdev '65.k. ltejradk, ves jvedelem'
                /e1jkulev '66.k. rendszeres klnmunka, ves jvedelem'
                /e1jasmev '66.k. alkalmi segdmunka, ves jvedelem'
                /e1jamgev '66.k. alkalmi mezgazdi munka, ves jvedelem'
                /e1jaszev '66.k. alkalmi szakmunka, ves jvedelem'
                /e1jaerev '66.k. alkalmi szellemi munka, ves jvedelem'
                /e1jataev '66.k. takarts, gyermekrzs, ves jvedelem'
                /e1jafuev '66.k. fuvarozs, ves jvedelem'
                /e1jkerev '66.k. kereskedelem, ves jvedelem'
                /e1jjutev '66.k. jutalk, ves jvedelem'
                /e1jborev '66.k. borraval, ves jvedelem'
                /e1jtamev '66.k. pnzbeni tmogats, ves jvedelem'
                /e1jellev '66.k. egyb ellts, ves jvedelem'
                /e1jbizev '66.k. egyb biztosts, ves jvedelem'
                /e1jfmhev 'sszes fmunkahelyhez kapcs. ves jvedelem'
                /e1jtbev  'sszes trsadalombiztostsi ves jvedelem'
                /e1jszcev 'sszes szocilis, ves jvedelem'
                /e1jtraev 'sszes transzfer, ves jvedelem'
                /e1jkmuev 'sszes klnmunka, ves jvedelem '
                /e1jritev 'sszes ritka jvedelem, ves'
                /e1jnyeev 'sszes vllalkozi jvedelem, ves'
                /e1joszev 'sszes szemlyes jvedelem, ves'
                /e1jfom91 'flls jved., 91 prilis'
                /e1jtap91 'tppnz jved., 91 prilis'
                /e1jtul91 'tlra jved., 91 prilis'
                /e1jetk91 'tkezsi hozzjruls jved., 91 prilis'
                /e1jgkh91 'gpkocsi hozzjruls jved., 91 prilis'
                /e1juth91 'utazsi hozzjruls jved., 91 prilis'
                /e1jlah91 'laks hozzjruls jved., 91 prilis'
                /e1jegh91 'egyb hozzjruls jved., 91 prilis'
                /e1jmun91 'munkanlkli jradk jved., 91 prilis'
                /e1jmus91 'munk jv.potl tmogats jved., 91 prilis'
                /e1jatk91 'tkpzsi tmogats jved., 91 prilis'
                /e1jost91 'sztndj jved., 91 prilis'
                /e1jgye91 'GYED jved., 91 prilis'
                /e1jgys91 'GYES jved., 91 prilis'
                /e1jcsp91 'csaldi ptlk jved., 91 prilis'
                /e1jnyu91 'regsgi nyugdj jved., 91 prilis'
                /e1jrny91 'rokkant nyugdj jved., 91 prilis'
                /e1jeny91 'egyb nyugdj jved., 91 prilis'
                /e1jseg91 'rendszeres szocilis seg jved., 91 prilis'
                /e1jneg91 'rendkvli szocilis seg jved., 91 prilis'
                /e1jtar91 'tartsdj jved., 91 prilis'
                /e1jejd91 'ltejradk jved., 91 prilis'
                /e1jkul91 '66.k. rendszeres klnmunka, 91 prilis'
                /e1jasm91 '66.k. alkalmi segdmunka, 91 prilis'
                /e1jamg91 '66.k. alkalmi mezgazdi munka, 91 prilis'
                /e1jasz91 '66.k. alkalmi szakmunka, 91 prilis'
                /e1jaer91 '66.k. alkalmi szellemi munka, 91 prilis'
                /e1jata91 '66.k. takarts, gyermekrzs, 91 prilis'
                /e1jafu91 '66.k. fuvarozs, 91 prilis'
                /e1jker91 '66.k. kereskedelem, 91 prilis'
                /e1jjut91 '66.k. jutalk, 91 prilis'
                /e1jbor91 '66.k. borraval, 91 prilis'
                /e1jtam91 '66.k. pnzbeni tmogats, 91 prilis'
                /e1jell91 '66.k. egyb ellts, 91 prilis'
                /e1jbiz91 '66.k. egyb biztosts, 91 prilis'
                /e1jrit91 'sszes ritka jvedelem, 91 prilis'
                /e1jnye91 'sszes vllalkozi jvedelem, 91 prilis'
                /e1jfmh91 'sszes fmunkhelyhez kapcs. jved., 91 prilis'
                /e1jtb91  'sszes trsadalombizt. jved., 91 prilis'
                /e1jszc91 'sszes szocilis jved., 91 prilis'
                /e1jtra91 'sszes transzfer jved., 91 prilis'
                /e1jkmu91 'sszes klnmunka jved., 91 prilis'
                /e1josz91 'sszes szemlyes jvedelem, 91 prilis'
                /e1jfom92 'flls jved., 92 mrcius'
                /e1jtap92 'tppnz jved., 92 mrcius'
                /e1jtul92 'tlra jved., 92 mrcius'
                /e1jetk92 'tkezsi hozzjruls jved., 92 mrcius'
                /e1jgkh92 'gpkocsi hozzjruls jved., 92 mrcius'
                /e1juth92 'utazsi hozzjruls jved., 92 mrcius'
                /e1jlah92 'laks hozzjruls jved., 92 mrcius'
                /e1jegh92 'egyb hozzjruls jved., 92 mrcius'
                /e1jmun92 'munkanlkli jradk jved., 92 mrcius'
                /e1jmus92 'munk jv.potl tmogats jved., 92 mrcius'
                /e1jost92 'sztndj jved., 92 mrcius'
                /e1jgye92 'GYED jved., 92 mrcius'
                /e1jgys92 'GYES jved., 92 mrcius'
                /e1jcsp92 'csaldi ptlk jved., 92 mrcius'
                /e1jnyu92 'regsgi nyugdj jved., 92 mrcius'
                /e1jrny92 'rokkant nyugdj jved., 92 mrcius'
                /e1jeny92 'egyb nyugdj jved., 92 mrcius'
                /e1jseg92 'rendszeres szocilis seg jved., 92 mrcius'
                /e1jneg92 'rendkvli szocilis seg jved., 92 mrcius'
                /e1jtar92 'tartsdj jved., 92 mrcius'
                /e1jejd92 'ltejradk jved., 92 mrcius'
                /e1jkul92 '66.k. rendszeres klnmunka, 92 mrcius'
                /e1jasm92 '66.k. alkalmi segdmunka, 92 mrcius'
                /e1jamg92 '66.k. alkalmi mezgazdi munka, 92 mrcius'
                /e1jasz92 '66.k. alkalmi szakmunka, 92 mrcius'
                /e1jaer92 '66.k. alkalmi szellemi munka, 92 mrcius'
                /e1jata92 '66.k. takarts, gyermekrzs, 92 mrcius'
                /e1jafu92 '66.k. fuvarozs, 92 mrcius'
                /e1jker92 '66.k. kereskedelem, 92 mrcius'
                /e1jjut92 '66.k. jutalk, 92 mrcius'
                /e1jbor92 '66.k. borraval, 92 mrcius'
                /e1jtam92 '66.k. pnzbeni tmogats, 92 mrcius'
                /e1jell92 '66.k. egyb ellts, 92 mrcius'
                /e1jbiz92 '66.k. egyb biztosts, 92 mrcius'
                /e1jrit92 'sszes ritka jvedelem, 92 mrcius'
                /e1jnye92 'sszes vllalkozi jvedelem, 92 mrcius'
                /e1jfmh92 'sszes fmunkhelyhez kapcs. jved., 92 mrcius'
                /e1jtb92  'sszes trsadalombizt jved., 92 mrcius'
                /e1jszc92 'sszes szocilis jved., 92 mrcius'
                /e1jtra92 'sszes transzfer jved., 92 mrcius'
                /e1jkmu92 'sszes klnmunka jved., 92 mrcius'
                /e1josz92 'sszes szemlyes jvedelem, 92 mrcius'
                /e1jval   'sszes vllalkozi s kln jvedelem, ves'
                /e1jjar   'sszes transzfer jvedelem, ves'.
 
execute.   
  
temporary.
select if (h1htsz92 = 1 and h1joszev ne e1joszev).
list eazon92 e1joszev h1joszev e1jfmhev h1jfmhev e1jtbev h1jtbev.

compute yy=h1n-h1htsz92.
temporary.
select if (yy ne 0).
list eazon92 h1n h1htsz92.

**********************************************************************

* Total household incomes BETWEEN APRIL OF 91 AND MARCH OF 92.
Compute h1jhztev = h1joszev + h1jovosz.
Variable Label h1jhztev 'HZTARTS VES SSZJVEDELME 91-92'.

* Az idszak elejre vonatkoz hztarts szinten mrt adatokon alapul
* jvedelembecslsnket az inflci hatst szimull 0,9-es szorzval
* vgezzk el. Az idszak vgre ksztett becslshez 1,1-es szorzt
* hasznlunk. 
* To take into account of the inflation effect, we use a 0.9 multiplier
* for estimating the incomes at the begining of reference period, since
* these incomes are based on household-level data and available only 
* yearly amounts. For the end of reference period we apply an 1.1
* multiplier. 

* Total household incomes IN APRIL OF 91.

Compute h1jhzt91 = h1josz91 + ((h1jovosz /12)*0.9).
Variable Label h1jhzt91 'HZTARTS SSZJVEDELME 91 PRILISBAN'.

* Total household incomes IN mARCH OF 92.
Compute h1jhzt92 = h1josz92 + ((h1jovosz /12)*1.1).
Variable Label h1jhzt92 'HZTARTS SSZJVEDELME 92 MRCIUSBAN'.

* Egy fre jut jvedelem.
* YEARLY PER CAPITA HOUSEHOLD INCOMES.

COMPUTE h1jHPCEV = h1jHZTEV / h1htsz92.
VARIABLE LABEL h1jHPCEV 'egy fre jut ves hztarts jvedelem'.


* PER CAPITA HOUSEHOLD INCOMES IN APRIL OF 1991.

COMPUTE h1jHPC91 = h1jHZT91 / h1htsz92.
VARIABLE LABEL h1jHPC91 'egy fre jut hztarts jv. 91 prilis'.


* PER CAPITA HOUSEHOLD INCOMES IN MARCH OF 1992.

COMPUTE h1jHPC92 = h1jHZT92 / h1htsz92.
VARIABLE LABEL h1jHPC92 'egy fre jut hztarts jv. 92 mrcius'.

************************************************************************.
formats h1jielad to h1jovosz (f9.0).
Formats h1jhztev to h1jhpc92 (F9.0).

temporary.
select if (e1htfovi=1).
desc h1jielad to h1jovosz.

temporary.
select if (e1kerdiv=1).
desc e1jfomev to e1jjar.

temporary.
select if (e1htfovi=1).
desc h1jhztev to h1jhpc92.

**********************************************************************

**********************************************************************.
*           CREATING SUMMARY MISSING INDICATOR (e1jMISS), I          *.
*          Value 0 on e1jMISS variable indicates OK status           *.
**********************************************************************.

compute e1jmiss = 0.
variable labels e1jmiss 'Jvedelem krdsre vlaszolt'.
value    labels e1jmiss 0 'Mindenre vlaszolt, OK'
                        1 '(Rszben) nem vlaszolt'.


Recode e1jFOMfk e1jFOMfm e1jTAPfk e1jTAPfm e1jTULfk e1jTULfm
       e1jETKfk e1jETKfm e1jGKHfk e1jGKHfm e1jUTHfk e1jUTHfm
       e1jLAHfk e1jLAHfm e1jEGHfk e1jEGHfm e1jMUNfk e1jMUNfm
       e1jMUSfk e1jMUSfm  
       e1jATKfk e1jATKfm e1joszfk e1joszfm e1jGYEfk e1jGYEfm
       e1jGYSfk e1jGYSfm e1jCSPfk e1jCSPfm e1jNYUfk e1jNYUfm
       e1jRNYfk e1jRNYfm e1jENYfk e1jENYfm e1jSEGfk e1jSEGfm
       e1jNEGfk e1jNEGfm e1jTARfk e1jTARfm e1jEJDfk e1jEJDfm
       jobecs92 e1jKMUSU e1jASMSU e1jAMGSU
       e1jASZSU e1jAERSU e1jATASU e1jAFUSU e1jKERSU e1jJUTSU 
       e1jBORSU e1jTAMSU e1jELLSU e1jBIZSU
       (SYSMIS, MISSING = -1) (.00, 0 = 0) (else=copy).

* A vlaszmegtagadktl (a helyettesitben) a 0 jvedelmet nem fogadjuk el
* ha aktivak.

do if (e1kerdiv=2).
if (e1ffogvi lt 5 and e1jobecs=0) e1jmiss = 1.
end if. 

* Ha 0 az sszjvedelem s a ht-n kivli tmogatst nem mondjk meg.

if (h1jhztev=0 and e1jtamgk gt 0 and e1jtamsu le 0) e1jmiss=1. 

* Kizrjuk azokat, akik vlaszmegtagadk voltak s a helyettesit krdiv     .
* e1jOBECS vltozja hinyzik vagy egyltaln nem kszlt helyettesit krdiv.
* Exclude those who refused to answer and there is missing value for jobecs92 .

* 1A, Van helyettest krdv, de nincs jvedelemadat.

if (e1kerdiv = 2 and jobecs92 = -1) e1jmiss = 1.

* 1B, Nincs helyettest krdv.

if (rsel92=4 and jobecs92 = -1) e1jmiss = 1.


* A munkaerpiaci sttusz s a jvedelem gyakorisgok alapjn kizrjuk
* a vlaszmegtagadkat.
* Comparing labor force (employment) status and frequency of incomes.

* alkalmazott.
if (e1maktiv = 1 and e1jfomgk = 0 and jobecs92 < 1 
    and e1jtapmr ne 1) e1jmiss = 1.

if (e1maktiv = 5 and e1joszev = 0 and e1jobecs < 1)
    e1jmiss = 1.

* nyugdijas.
if (e1maktiv = 0 and e1mmibel=2 and e1jnyugk = 0 and jobecs92 < 1) 
    e1jmiss = 1.

* rokkant nyugdijas.
if (e1maktiv =  0 and e1mmibel=3 and e1jrnygk = 0 and jobecs92 < 1)
    e1jmiss = 1.

* zvegyi nyugdijas.
if (e1maktiv =  0 and e1mmibel=4 and e1jenygk = 0 and jobecs92 < 1)
    e1jmiss = 1.


* alkalmi munkbl l.

if (e1maktiv =  0 and e1mmibel  = 1  and
                      (e1jkmugk = 0  and
                       e1jasmgk = 0  and
                       e1jamggk = 0  and
                       e1jaszgk = 0  and
                       e1jaergk = 0  and
                       e1jatagk = 0  and
                       e1jafugk = 0  and
                       e1jkergk = 0  and
                       e1jjutgk = 0  and
                       e1jborgk = 0) and jobecs92 < 1) e1jmiss = 1.

* Az els jvedelemtbla gyakorisgai s jvedelemsszegei alapjn 
  azonositjuk a vlaszmegtagadkat.
* Ellenrizzk azt is, hogy a becslt jvedelem sszege hinyzik vagy 0.

* Hinyz adat - Missing data.
* 1 Flls.
 if (e1jFOMgk gt 0 and (jobecs92 <  1 and e1jFOMfk = -1 and e1jFOMfm = -1))
     e1jmiss = 1.
* 2 sztndij.
 if (e1jostgk gt 0 and (jobecs92 <  1 and e1joszfk = -1 and e1joszfm = -1))
     e1jmiss = 1.
* 3 GYED.
 if (e1jGYEgk gt 0 and (jobecs92 <  1 and e1jGYEfk = -1 and e1jGYEfm = -1))
     e1jmiss = 1.
* 4 Nyugdij.
 if (e1jNYUgk gt 0 and (jobecs92 <  1 and e1jNYUfk = -1 and e1jNYUfm = -1))
     e1jmiss = 1.
* 5 Rokkant nyugdij.
 if (e1jRNYgk gt 0 and (jobecs92 <  1 and e1jRNYfk = -1 and e1jRNYfm = -1))
     e1jmiss = 1.
* 6 Egyb nyugdij.
 if (e1jENYgk gt 0 and (jobecs92 <  1 and e1jENYfk = -1 and e1jENYfm = -1))
     e1jmiss = 1.

* Zero incomes.

 if (e1jFOMgk gt 0 and (jobecs92 <  1 and e1jFOMfk = 0  and e1jFOMfm = 0 ))
     e1jmiss = 1.
 if (e1jostgk gt 0 and (jobecs92 <  1 and e1joszfk = 0  and e1joszfm = 0 ))
     e1jmiss = 1.
 if (e1jGYEgk gt 0 and (jobecs92 <  1 and e1jGYEfk = 0  and e1jGYEfm = 0 ))
     e1jmiss = 1.
 if (e1jNYUgk gt 0 and (jobecs92 <  1 and e1jNYUfk = 0  and e1jNYUfm = 0 ))
     e1jmiss = 1.
 if (e1jRNYgk gt 0 and (jobecs92 <  1 and e1jRNYfk = 0  and e1jRNYfm = 0 ))
     e1jmiss = 1.
 if (e1jENYgk gt 0 and (jobecs92 <  1 and e1jENYfk = 0  and e1jENYfm = 0 ))
     e1jmiss = 1.


 if (e1jkmugk gt 0 and (jobecs92 <  1 and e1jkmusu = -1)) e1jmiss = 1.
 if (e1jaszgk gt 0 and (jobecs92 <  1 and e1jaszsu = -1)) e1jmiss = 1.
 if (e1jaergk gt 0 and (jobecs92 <  1 and e1jaersu = -1)) e1jmiss = 1.
 if (e1jkergk gt 0 and (jobecs92 <  1 and e1jkersu = -1)) e1jmiss = 1.
 if (e1jjutgk gt 0 and (jobecs92 <  1 and e1jjutsu = -1)) e1jmiss = 1.
 if (e1jborgk gt 0 and (jobecs92 <  1 and e1jborsu = -1)) e1jmiss = 1.
 
 if (e1jkmugk gt 0 and (jobecs92 <  1 and e1jkmusu =  0)) e1jmiss = 1.
 if (e1jaszgk gt 0 and (jobecs92 <  1 and e1jaszsu =  0)) e1jmiss = 1.
 if (e1jaergk gt 0 and (jobecs92 <  1 and e1jaersu =  0)) e1jmiss = 1.
 if (e1jkergk gt 0 and (jobecs92 <  1 and e1jkersu =  0)) e1jmiss = 1.
 if (e1jjutgk gt 0 and (jobecs92 <  1 and e1jjutsu =  0)) e1jmiss = 1.
 if (e1jborgk gt 0 and (jobecs92 <  1 and e1jborsu =  0)) e1jmiss = 1.

 if (e1jvpenz = -1 and (jobecs92 <  1 and e1jvnyer gt 0
     and e1jvnyer ne 9)) e1jmiss = 1.
 if (e1jvsump = -1 and (jobecs92 <  1 and e1jvszam gt 0)) e1jmiss = 1.



***************************************************************.
sort cases by hazon92.
aggregate /outfile = 'C:\mhp jovedelemjavitas\adatok\hjmiss92.sav'
          /presorted
          /break   = hazon92
          /h1jmiss = sum(e1jmiss).

Match files  file  = *
            /table = 'C:\mhp jovedelemjavitas\adatok\hjmiss92.sav'
            /by    = hazon92.
execute.
variable label h1jmiss 'Hny f nem vlaszolt jvedelem krdsre'.

temporary.
select if (e1htfovi=1).
fre h1jmiss.

if (h1jmiss gt 0) h1jhztev = -1.
if (h1jmiss gt 0) h1joszev = -1.

if (h1jmiss gt 0) h1jhzt91 = -1.
if (h1jmiss gt 0) h1josz91 = -1.

if (h1jmiss gt 0) h1jhzt92 = -1.
if (h1jmiss gt 0) h1josz92 = -1.

if (h1jmiss gt 0) h1jhpcev = -1.
if (h1jmiss gt 0) h1jhpc91 = -1.
if (h1jmiss gt 0) h1jhpc92 = -1.

missing value h1jhztev h1jhzt91 h1jhzt92 h1jhpcev h1jhpc91 h1jhpc92
              h1joszev h1josz91 h1josz92 (-1).
value labels  h1jhztev h1jhzt91 h1jhzt92 h1jhpcev h1jhpc91 h1jhpc92
              h1joszev h1josz91 h1josz92 -1 'Vlaszmegtagad'.
execute.

if (e1jmiss gt 0) e1joszev = -1.
if (e1jmiss gt 0) e1josz91 = -1.
if (e1jmiss gt 0) e1josz92 = -1.

missing value e1joszev e1josz91 e1josz92 (-1).
value label e1joszev e1josz91 e1josz92 -1 'Vlaszmegtagad'.
execute.
sort cases by case.
save outfile = 'C:\mhp jovedelemjavitas\adatok\jovedelem92.sav'
    /compressed
    /drop = xx yy jcheck1 to jcheck3 jcheck4 e1fmagan h1n
    /keep = case h1jielad to h1jhpc92
            e1jmiss h1jmiss.

get file = 'C:\MHP jovedelemjavitas\adatok\92-es1.SAV'
            /drop = h1jielad to h1jmiss.

sort cases by case.
execute.

match file /file = * /in alpha
           /file = 'C:\mhp jovedelemjavitas\adatok\jovedelem92.sav' /in beta
           /by   = case.
fre alpha beta akttag92.


save outfile = 'c:\mhp jovedelemjavitas\adatok\PANEL92_010709.sav'
             /drop = alpha beta /comp.
execute.



get file = 'c:\mhp jovedelemjavitas\adatok\PANEL92_010709.sav'.
select if (akttag92=1).

temporary.
select if (e1htfovi=1).
desc h1jielad to h1jovosz.

temporary.
select if (e1kerdiv=1).
desc e1jfomev to e1jjar.

temporary.
select if (e1htfovi=1).
desc h1jfomev to h1jhpc92.

temporary.
select if (e1htfovi=1 and h1jhztev lt 50000).
list eazon92 h1jhztev h1htsz92 h1jtbev h1jszcev 
     h1jtraev h1jovosz.


Andorka Rudolf

(1931-1997) szociológus, egyetemi tanár, 1990-től az MTA levelező tagja, a BKE rektora (1991-1997), az OTKA elnöke (1991-1996), a magyarországi Lutheránus Egyház világi elnöke. Andorka Rudolf számos folyóirat szerkesztőségének tagja volt. Az ISA Research Committee
28 on Social Stratification and Mobility (RC28) elnöke volt 1986 és 1990 között.

tovább


adatbázis letöltéshez

A honlapunk regisztrált felhasználó letölthetik a mind az MHP, mind a HÉV kutatási adatbázisait. Ha még nem regisztrált felhasználó, kérjük, kattintson ide. Az adatfelhasználási feltételeket megtekintheti a regisztrációs űrlapon. Legyen Ön is regisztrált felhasználónk.