Document Actions

jövedelemváltozó syntax 1993

Click here to get the file

Size 104.7 kB - File type text/plain

File contents

*jov93_01_07.sps************************************************************.
*                                                                    *.
*                  COMPUTATION OF INCOME VARIABLES                   *.
*        2nd WAVE OF HUNGARIAN HOUSEHOLD PANEL SURVEY 1993           *.
*              SOCIAL RESEARCH INFORMATICS CENTER (TARKI)            *.
*                                                                    *.
**********************************************************************.

Get File = 'c:\mhp jovedelemjavitas\adatok\panel93_0714.sav'
         /keep=case eazon93  hazon93  e2kerdiv hullam93 akttag93 rsel93
               e2fagaz  e2fgform
               h2HTSZ93 e2htfovi e2MAKBEL
               h2VINGA1 h2VFOLA1 h2VTELA1 h2VNYAA1 h2VAUTA1
               h2VJARA1 h2VINGL1 h2VFOLL1 h2VTELL1 h2VNYAL1
               h2VAUTL1 h2VJARL1 h2jLAKK1 h2jALBK1 h2jNYAK1 h2jGEPK1
               h2jFOLK1 h2jNYER1 h2jSEG1  h2jTAMO1 h2jKARP1
               h2GAELAP h2GAELFP h2GAELFT h2GAFOGP h2GAFOGT h2GNELAP
               h2GNELFP h2GNELFT h2GNFOGP
               e2jOBECS e2FEVEGP e2jPREMP e2jNAPIP e2jUJITP e2jEGYP
               e2jVPENZ e2jVSUMP
               e2jFOMfk e2jFOMfm e2jTAPfk e2jTAPfm e2jTULfk e2jTULfm
               e2jETKfk e2jETKfm e2jGKHfk e2jGKHfm e2jUTHfk e2jUTHfm
               e2jLAHfk e2jLAHfm e2jEGHfk e2jEGHfm e2jMUNfk e2jMUNfm
               e2jMUSfk e2jMUSfm
               e2jATKfk e2jATKfm e2JOSZfk e2JOSZfm e2jGYEfk e2jGYEfm
               e2jGYSfk e2jGYSfm e2jCSPfk e2jCSPfm e2jNYUfk e2jNYUfm
               e2jRNYfk e2jRNYfm e2jENYfk e2jENYfm e2jSEGfk e2jSEGfm
               e2jNEGfk e2jNEGfm e2jTARfk e2jTARfm e2jEJDfk e2jEJDfm
                                 e2jKMUSU e2jASMSU e2jAMGSU e2jASZSU
               e2jAERSU e2jATASU e2jAFUSU e2jKERSU e2jJUTSU e2jBORSU
               e2jTAMSU e2jELLSU e2jBIZSU
               e2jFOMAP e2jFOMMA e2jFOMJU e2jFOMJL e2jFOMAU e2jFOMSZ
               e2jFOMOK e2jFOMNO e2jFOMDE e2jFOMJA e2jFOMFE e2jFOMMR
               e2jTAPAP e2jTAPMA e2jTAPJU e2jTAPJL e2jTAPAU e2jTAPSZ
               e2jTAPOK e2jTAPNO e2jTAPDE e2jTAPJA e2jTAPFE e2jTAPMR
               e2jTULAP e2jTULMA e2jTULJU e2jTULJL e2jTULAU e2jTULSZ
               e2jTULOK e2jTULNO e2jTULDE e2jTULJA e2jTULFE e2jTULMR
               e2jETKAP e2jETKMA e2jETKJU e2jETKJL e2jETKAU e2jETKSZ
               e2jETKOK e2jETKNO e2jETKDE e2jETKJA e2jETKFE e2jETKMR
               e2jGKHAP e2jGKHMA e2jGKHJU e2jGKHJL e2jGKHAU e2jGKHSZ
               e2jGKHOK e2jGKHNO e2jGKHDE e2jGKHJA e2jGKHFE e2jGKHMR
               e2jUTHAP e2jUTHMA e2jUTHJU e2jUTHJL e2jUTHAU e2jUTHSZ
               e2jUTHOK e2jUTHNO e2jUTHDE e2jUTHJA e2jUTHFE e2jUTHMR
               e2jLAHAP e2jLAHMA e2jLAHJU e2jLAHJL e2jLAHAU e2jLAHSZ
               e2jLAHOK e2jLAHNO e2jLAHDE e2jLAHJA e2jLAHFE e2jLAHMR
               e2jEGHAP e2jEGHMA e2jEGHJU e2jEGHJL e2jEGHAU e2jEGHSZ
               e2jEGHOK e2jEGHNO e2jEGHDE e2jEGHJA e2jEGHFE e2jEGHMR
               e2jMUNAP e2jMUNMA e2jMUNJU e2jMUNJL e2jMUNAU e2jMUNSZ
               e2jMUNOK e2jMUNNO e2jMUNDE e2jMUNJA e2jMUNFE e2jMUNMR
               e2jMUSAP e2jMUSMA e2jMUSJU e2jMUSJL e2jMUSAU e2jMUSSZ
               e2jMUSOK e2jMUSNO e2jMUSDE e2jMUSJA e2jMUSFE e2jMUSMR
               e2jATKAP e2jATKMA e2jATKJU e2jATKJL e2jATKAU e2jATKSZ
               e2jATKOK e2jATKNO e2jATKDE e2jATKJA e2jATKFE e2jATKMR
               e2joszAP e2joszMA e2joszJU e2joszJL e2joszAU e2joszSZ
               e2joszOK e2joszNO e2joszDE e2joszJA e2joszFE e2joszMR
               e2jGYEAP e2jGYEMA e2jGYEJU e2jGYEJL e2jGYEAU e2jGYESZ
               e2jGYEOK e2jGYENO e2jGYEDE e2jGYEJA e2jGYEFE e2jGYEMR
               e2jGYSAP e2jGYSMA e2jGYSJU e2jGYSJL e2jGYSAU e2jGYSSZ
               e2jGYSOK e2jGYSNO e2jGYSDE e2jGYSJA e2jGYSFE e2jGYSMR
               e2jCSPAP e2jCSPMA e2jCSPJU e2jCSPJL e2jCSPAU e2jCSPSZ
               e2jCSPOK e2jCSPNO e2jCSPDE e2jCSPJA e2jCSPFE e2jCSPMR
               e2jNYUAP e2jNYUMA e2jNYUJU e2jNYUJL e2jNYUAU e2jNYUSZ
               e2jNYUOK e2jNYUNO e2jNYUDE e2jNYUJA e2jNYUFE e2jNYUMR
               e2jRNYAP e2jRNYMA e2jRNYJU e2jRNYJL e2jRNYAU e2jRNYSZ
               e2jRNYOK e2jRNYNO e2jRNYDE e2jRNYJA e2jRNYFE e2jRNYMR
               e2jENYAP e2jENYMA e2jENYJU e2jENYJL e2jENYAU e2jENYSZ
               e2jENYOK e2jENYNO e2jENYDE e2jENYJA e2jENYFE e2jENYMR
               e2jSEGAP e2jSEGMA e2jSEGJU e2jSEGJL e2jSEGAU e2jSEGSZ
               e2jSEGOK e2jSEGNO e2jSEGDE e2jSEGJA e2jSEGFE e2jSEGMR
               e2jNEGAP e2jNEGMA e2jNEGJU e2jNEGJL e2jNEGAU e2jNEGSZ
               e2jNEGOK e2jNEGNO e2jNEGDE e2jNEGJA e2jNEGFE e2jNEGMR
               e2jTARAP e2jTARMA e2jTARJU e2jTARJL e2jTARAU e2jTARSZ
               e2jTAROK e2jTARNO e2jTARDE e2jTARJA e2jTARFE e2jTARMR
               e2jEJDAP e2jEJDMA e2jEJDJU e2jEJDJL e2jEJDAU e2jEJDSZ
               e2jEJDOK e2jEJDNO e2jEJDDE e2jEJDJA e2jEJDFE e2jEJDMR
               e2jKMUAP e2jKMUMA e2jKMUJU e2jKMUJL e2jKMUAU e2jKMUSZ
               e2jKMUOK e2jKMUNO e2jKMUDE e2jKMUJA e2jKMUFE e2jKMUMR
               e2jASMAP e2jASMMA e2jASMJU e2jASMJL e2jASMAU e2jASMSZ
               e2jASMOK e2jASMNO e2jASMDE e2jASMJA e2jASMFE e2jASMMR
               e2jAMGAP e2jAMGMA e2jAMGJU e2jAMGJL e2jAMGAU e2jAMGSZ
               e2jAMGOK e2jAMGNO e2jAMGDE e2jAMGJA e2jAMGFE e2jAMGMR
               e2jASZOK e2jASZNO e2jASZDE e2jASZJA e2jASZFE e2jASZMR
               e2jASZAP e2jASZMA e2jASZJU e2jASZJL e2jASZAU e2jASZSZ
               e2jAERAP e2jAERMA e2jAERJU e2jAERJL e2jAERAU e2jAERSZ
               e2jAEROK e2jAERNO e2jAERDE e2jAERJA e2jAERFE e2jAERMR
               e2jATAAP e2jATAMA e2jATAJU e2jATAJL e2jATAAU e2jATASZ
               e2jATAOK e2jATANO e2jATADE e2jATAJA e2jATAFE e2jATAMR
               e2jAFUAP e2jAFUMA e2jAFUJU e2jAFUJL e2jAFUAU e2jAFUSZ
               e2jAFUOK e2jAFUNO e2jAFUDE e2jAFUJA e2jAFUFE e2jAFUMR
               e2jKERAP e2jKERMA e2jKERJU e2jKERJL e2jKERAU e2jKERSZ
               e2jKEROK e2jKERNO e2jKERDE e2jKERJA e2jKERFE e2jKERMR
               e2jJUTAP e2jJUTMA e2jJUTJU e2jJUTJL e2jJUTAU e2jJUTSZ
               e2jJUTOK e2jJUTNO e2jJUTDE e2jJUTJA e2jJUTFE e2jJUTMR
               e2jBORAP e2jBORMA e2jBORJU e2jBORJL e2jBORAU e2jBORSZ
               e2jBOROK e2jBORNO e2jBORDE e2jBORJA e2jBORFE e2jBORMR
               e2jTAMAP e2jTAMMA e2jTAMJU e2jTAMJL e2jTAMAU e2jTAMSZ
               e2jTAMOK e2jTAMNO e2jTAMDE e2jTAMJA e2jTAMFE e2jTAMMR
               e2jELLAP e2jELLMA e2jELLJU e2jELLJL e2jELLAU e2jELLSZ
               e2jELLOK e2jELLNO e2jELLDE e2jELLJA e2jELLFE e2jELLMR
               e2jBIZAP e2jBIZMA e2jBIZJU e2jBIZJL e2jBIZAU e2jBIZSZ
               e2jBIZOK e2jBIZNO e2jBIZDE e2jBIZJA e2jBIZFE e2jBIZMR
               e2ffogvi e2fgform e2jvszam e2jvnyer.
execute.

*************************************************************.
* A panel93-hoz javt program az e2jegyp                   *.
* vltoz javtsra.                                       *.
*************************************************************.

if (eazon93=11001)   e2jegyp=47000.
if (eazon93=91001)   e2jegyp=6000.
if (eazon93=132007)  e2jegyp=900.
if (eazon93=181102)  e2jegyp=3000.
if (eazon93=211002)  e2jegyp=2000.
if (eazon93=271005)  e2jegyp=4000.
if (eazon93=291003)  e2jegyp=3000.
if (eazon93=601001)  e2jegyp=10000.
if (eazon93=681002)  e2jegyp=20000.
if (eazon93=1131001) e2jegyp=500.
if (eazon93=1231001) e2jegyp=1000.
if (eazon93=1321101) e2jegyp=8000.
if (eazon93=1521002) e2jegyp=60000.
if (eazon93=1941222) e2jegyp=36480.
if (eazon93=3071002) e2jegyp=17800.
if (eazon93=3361002) e2jegyp=3000.
if (eazon93=3621002) e2jegyp=2500.
if (eazon93=4621001) e2jegyp=9000.
if (eazon93=4691001) e2jegyp=5000.
if (eazon93=5051001) e2jegyp=40000.
if (eazon93=5091001) e2jegyp=2700.
if (eazon93=5111002) e2jegyp=15000.
if (eazon93=5661221) e2jegyp=10000.
if (eazon93=5681003) e2jegyp=1000.
if (eazon93=5701002) e2jegyp=26000.
if (eazon93=5841001) e2jegyp=10000.
if (eazon93=5841002) e2jegyp=700.
if (eazon93=6671003) e2jegyp=10000.
if (eazon93=6691001) e2jegyp=500.
if (eazon93=6691002) e2jegyp=5000.
if (eazon93=6711001) e2jegyp=8000.
if (eazon93=6921002) e2jegyp=49000.
if (eazon93=6951001) e2jegyp=100000.
if (eazon93=6971001) e2jegyp=45000.
if (eazon93=7771002) e2jegyp=3000.
if (eazon93=7811001) e2jegyp=4000.
if (eazon93=7911001) e2jegyp=1500.
if (eazon93=8041001) e2jegyp=1900.
if (eazon93=8201002) e2jegyp=4000.
if (eazon93=9251002) e2jegyp=4000.
if (eazon93=9911001) e2jegyp=5500.
if (eazon93=9941002) e2jegyp=4000.
if (eazon93=9972002) e2jegyp=70000.
if (eazon93=10121001) e2jegyp=50000.
if (eazon93=10151002) e2jegyp=400.
if (eazon93=10171003) e2jegyp=2600.
if (eazon93=11851004) e2jegyp=7000.
if (eazon93=11981002) e2jegyp=18000.
if (eazon93=12361001) e2jegyp=5000.
if (eazon93=12651001) e2jegyp=25000.
if (eazon93=13141001) e2jegyp=2000.
if (eazon93=13311002) e2jegyp=3000.
if (eazon93=13861002) e2jegyp=15000.
if (eazon93=13921003) e2jegyp=2000.
if (eazon93=14121003) e2jegyp=2000.
if (eazon93=14611003) e2jegyp=12000.
if (eazon93=15071003) e2jegyp=3000.
if (eazon93=15631002) e2jegyp=50000.
if (eazon93=16071001) e2jegyp=40000.
if (eazon93=16211002) e2jegyp=22000.
if (eazon93=17081002) e2jegyp=20000.
if (eazon93=17641001) e2jegyp=9000.
if (eazon93=17791002) e2jegyp=8000.
if (eazon93=17841001) e2jegyp=1000.
if (eazon93=18041001) e2jegyp=8000.
if (eazon93=18251001) e2jegyp=50000.
if (eazon93=18271001) e2jegyp=1000.
if (eazon93=18521001) e2jegyp=25000.
if (eazon93=18591001) e2jegyp=14000.
if (eazon93=18631001) e2jegyp=3000.
if (eazon93=18651002) e2jegyp=400000.
if (eazon93=18671001) e2jegyp=65000.
if (eazon93=18781001) e2jegyp=5000.
if (eazon93=19301002) e2jegyp=18000.
if (eazon93=19501003) e2jegyp=30000.
if (eazon93=19601002) e2jegyp=60000.
if (eazon93=19681022) e2jegyp=6000.
if (eazon93=20001002) e2jegyp=70000.
if (eazon93=20201001) e2jegyp=30000.
if (eazon93=20401002) e2jegyp=8000.
if (eazon93=20641002) e2jegyp=1200.
if (eazon93=21141001) e2jegyp=5000.
if (eazon93=21441002) e2jegyp=80000.
if (eazon93=21601001) e2jegyp=100000.
if (eazon93=21691001) e2jegyp=1500.
if (eazon93=21861001) e2jegyp=18000.
if (eazon93=22281003) e2jegyp=36000.
if (eazon93=22361002) e2jegyp=11000.
if (eazon93=22511001) e2jegyp=1500000.
if (eazon93=22851003) e2jegyp=5000.
if (eazon93=23121001) e2jegyp=19600.
if (eazon93=23511001) e2jegyp=30000.
if (eazon93=24271001) e2jegyp=2000.
if (eazon93=25181101) e2jegyp=1000.
if (eazon93=25391001) e2jegyp=22500.
if (eazon93=25751103) e2jegyp=65000.
if (eazon93=25821001) e2jegyp=10000.
if (eazon93=25891002) e2jegyp=20000.

recode e2jegyp (0=sysmis).

fre e2jegyp.

******************************************************************.
* Kltsgvetsi dolgozk.
if (e2fagaz=11 and sysmis(e2fgform)) e2fgform=4.
if (e2fagaz=13 and sysmis(e2fgform)) e2fgform=4.
if (e2fagaz=12 and sysmis(e2fgform)) e2fgform=3.
fre e2fgform.
*******************************************************************.
* krdezi hiba, vegvisszavlts.

if (eazon93=17131001) e2jkerap=1.
if (eazon93=17131001) e2jkerma=1.
if (eazon93=17131001) e2jkerju=1.
if (eazon93=17131001) e2jkerjl=1.
if (eazon93=17131001) e2jkerau=1.
if (eazon93=17131001) e2jkersz=1.
if (eazon93=17131001) e2jkerok=1.
if (eazon93=17131001) e2jkerno=1.
if (eazon93=17131001) e2jkerde=1.
if (eazon93=17131001) e2jkerja=1.
if (eazon93=17131001) e2jkerfe=1.
if (eazon93=17131001) e2jkermr=1.
*****************************************************************.

fre e2jvpenz e2jvsump.

temporary.
select if (e2htfovi=1).
fre h2VINGA1 h2VFOLA1 h2VTELA1 h2VNYAA1 h2VAUTA1
             h2VJARA1 h2VINGL1 h2VFOLL1 h2VTELL1 h2VNYAL1
             h2VAUTL1 h2VJARL1 h2jLAKK1 h2jALBK1 h2jNYAK1 h2jGEPK1
             h2jFOLK1 h2jNYER1 h2jSEG1  h2jTAMO1 h2jKARP1
             h2GAELAP h2GAELFP h2GAELFT h2GAFOGP h2GNELAP
             h2GNELFP h2GNELFT h2GNFOGP.

*Kdols javitsa, vissza krdivbe.

*C vlaszlap.
recode h2VINGA1 h2VFOLA1 h2VTELA1 h2VNYAA1 h2VAUTA1
       h2VJARA1 h2VINGL1 h2VFOLL1 h2VTELL1 h2VNYAL1
       h2VAUTL1 h2VJARL1
      (50000  =1)
      (200000 =2)
      (400000 =3)
      (700000 =4)
      (850000 =5)
      (2000000=6)
      (4000000=7)
      (7000000=8)
      (9000000=9)
      (else=copy).

*B vlaszlap.
recode h2jLAKK1 h2jALBK1 h2jNYAK1 h2jGEPK1
       h2jFOLK1 h2jNYER1 h2jSEG1  h2jTAMO1 h2jKARP1
       h2GAELAP h2GAELFP h2GNELAP
       h2GNELFP
      (5000  =1)
      (20000 =2)
      (40000 =3)
      (60000 =4)
      (90000 =5)
      (200000=6)
      (400000=7)
      (700000=8)
      (900000=9)
      (else=copy).

recode e2jvpenz e2jvsump
      (10000 =1)
      (25000 =2)
      (50000 =3)
      (75000 =4)
      (99000 =5)
      (249000=6)
      (499000=7)
      (749000=8)
      (999000=9)
      (else=copy).

fre e2jvpenz e2jvsump.

temporary.
select if (e2htfovi=1).
fre h2VINGA1 h2VFOLA1 h2VTELA1 h2VNYAA1 h2VAUTA1
             h2VJARA1 h2VINGL1 h2VFOLL1 h2VTELL1 h2VNYAL1
             h2VAUTL1 h2VJARL1 h2jLAKK1 h2jALBK1 h2jNYAK1 h2jGEPK1
             h2jFOLK1 h2jNYER1 h2jSEG1  h2jTAMO1 h2jKARP1
             h2GAELAP h2GAELFP h2GAELFT h2GAFOGP h2GNELAP
             h2GNELFP h2GNELFT h2GNFOGP.

sort cases by case.
exec.
save outfile = 'c:\mhp jovedelemjavitas\adatok\93-as1.sav'
                    e2jkerap e2jkerma e2jkerju e2jkerjl
                     e2jkerau e2jkersz e2jkerok e2jkerno
                     e2jkerde e2jkerja e2jkerfe e2jkermr
                     e2jvpenz e2jvsump
                     h2VINGA1 h2VFOLA1 h2VTELA1 h2VNYAA1 h2VAUTA1
                     h2VJARA1 h2VINGL1 h2VFOLL1 h2VTELL1 h2VNYAL1
                     h2VAUTL1 h2VJARL1
                     h2jLAKK1 h2jALBK1 h2jNYAK1 h2jGEPK1
                     h2jFOLK1 h2jNYER1 h2jSEG1  h2jTAMO1 h2jKARP1
                     h2GAELAP h2GAELFP h2GNELAP
                                  /compressed.


Get File = 'c:\mhp jovedelemjavitas\adatok\93-as1.sav'
         /keep=case eazon93  hazon93  e2kerdiv hullam93 akttag93 rsel93
               e2fagaz  e2fgform
               h2HTSZ93 e2htfovi e2MAKBEL
               h2VINGA1 h2VFOLA1 h2VTELA1 h2VNYAA1 h2VAUTA1
               h2VJARA1 h2VINGL1 h2VFOLL1 h2VTELL1 h2VNYAL1
               h2VAUTL1 h2VJARL1 h2jLAKK1 h2jALBK1 h2jNYAK1 h2jGEPK1
               h2jFOLK1 h2jNYER1 h2jSEG1  h2jTAMO1 h2jKARP1
               h2GAELAP h2GAELFP h2GAELFT h2GAFOGP h2GAFOGT h2GNELAP
               h2GNELFP h2GNELFT h2GNFOGP
               e2jOBECS e2FEVEGP e2jPREMP e2jNAPIP e2jUJITP e2jEGYP
               e2jVPENZ e2jVSUMP
               e2jFOMfk e2jFOMfm e2jTAPfk e2jTAPfm e2jTULfk e2jTULfm
               e2jETKfk e2jETKfm e2jGKHfk e2jGKHfm e2jUTHfk e2jUTHfm
               e2jLAHfk e2jLAHfm e2jEGHfk e2jEGHfm e2jMUNfk e2jMUNfm
               e2jMUSfk e2jMUSfm
               e2jATKfk e2jATKfm e2JOSZfk e2JOSZfm e2jGYEfk e2jGYEfm
               e2jGYSfk e2jGYSfm e2jCSPfk e2jCSPfm e2jNYUfk e2jNYUfm
               e2jRNYfk e2jRNYfm e2jENYfk e2jENYfm e2jSEGfk e2jSEGfm
               e2jNEGfk e2jNEGfm e2jTARfk e2jTARfm e2jEJDfk e2jEJDfm
                                 e2jKMUSU e2jASMSU e2jAMGSU e2jASZSU
               e2jAERSU e2jATASU e2jAFUSU e2jKERSU e2jJUTSU e2jBORSU
               e2jTAMSU e2jELLSU e2jBIZSU
               e2jFOMAP e2jFOMMA e2jFOMJU e2jFOMJL e2jFOMAU e2jFOMSZ
               e2jFOMOK e2jFOMNO e2jFOMDE e2jFOMJA e2jFOMFE e2jFOMMR
               e2jTAPAP e2jTAPMA e2jTAPJU e2jTAPJL e2jTAPAU e2jTAPSZ
               e2jTAPOK e2jTAPNO e2jTAPDE e2jTAPJA e2jTAPFE e2jTAPMR
               e2jTULAP e2jTULMA e2jTULJU e2jTULJL e2jTULAU e2jTULSZ
               e2jTULOK e2jTULNO e2jTULDE e2jTULJA e2jTULFE e2jTULMR
               e2jETKAP e2jETKMA e2jETKJU e2jETKJL e2jETKAU e2jETKSZ
               e2jETKOK e2jETKNO e2jETKDE e2jETKJA e2jETKFE e2jETKMR
               e2jGKHAP e2jGKHMA e2jGKHJU e2jGKHJL e2jGKHAU e2jGKHSZ
               e2jGKHOK e2jGKHNO e2jGKHDE e2jGKHJA e2jGKHFE e2jGKHMR
               e2jUTHAP e2jUTHMA e2jUTHJU e2jUTHJL e2jUTHAU e2jUTHSZ
               e2jUTHOK e2jUTHNO e2jUTHDE e2jUTHJA e2jUTHFE e2jUTHMR
               e2jLAHAP e2jLAHMA e2jLAHJU e2jLAHJL e2jLAHAU e2jLAHSZ
               e2jLAHOK e2jLAHNO e2jLAHDE e2jLAHJA e2jLAHFE e2jLAHMR
               e2jEGHAP e2jEGHMA e2jEGHJU e2jEGHJL e2jEGHAU e2jEGHSZ
               e2jEGHOK e2jEGHNO e2jEGHDE e2jEGHJA e2jEGHFE e2jEGHMR
               e2jMUNAP e2jMUNMA e2jMUNJU e2jMUNJL e2jMUNAU e2jMUNSZ
               e2jMUNOK e2jMUNNO e2jMUNDE e2jMUNJA e2jMUNFE e2jMUNMR
               e2jMUSAP e2jMUSMA e2jMUSJU e2jMUSJL e2jMUSAU e2jMUSSZ
               e2jMUSOK e2jMUSNO e2jMUSDE e2jMUSJA e2jMUSFE e2jMUSMR
               e2jATKAP e2jATKMA e2jATKJU e2jATKJL e2jATKAU e2jATKSZ
               e2jATKOK e2jATKNO e2jATKDE e2jATKJA e2jATKFE e2jATKMR
               e2joszAP e2joszMA e2joszJU e2joszJL e2joszAU e2joszSZ
               e2joszOK e2joszNO e2joszDE e2joszJA e2joszFE e2joszMR
               e2jGYEAP e2jGYEMA e2jGYEJU e2jGYEJL e2jGYEAU e2jGYESZ
               e2jGYEOK e2jGYENO e2jGYEDE e2jGYEJA e2jGYEFE e2jGYEMR
               e2jGYSAP e2jGYSMA e2jGYSJU e2jGYSJL e2jGYSAU e2jGYSSZ
               e2jGYSOK e2jGYSNO e2jGYSDE e2jGYSJA e2jGYSFE e2jGYSMR
               e2jCSPAP e2jCSPMA e2jCSPJU e2jCSPJL e2jCSPAU e2jCSPSZ
               e2jCSPOK e2jCSPNO e2jCSPDE e2jCSPJA e2jCSPFE e2jCSPMR
               e2jNYUAP e2jNYUMA e2jNYUJU e2jNYUJL e2jNYUAU e2jNYUSZ
               e2jNYUOK e2jNYUNO e2jNYUDE e2jNYUJA e2jNYUFE e2jNYUMR
               e2jRNYAP e2jRNYMA e2jRNYJU e2jRNYJL e2jRNYAU e2jRNYSZ
               e2jRNYOK e2jRNYNO e2jRNYDE e2jRNYJA e2jRNYFE e2jRNYMR
               e2jENYAP e2jENYMA e2jENYJU e2jENYJL e2jENYAU e2jENYSZ
               e2jENYOK e2jENYNO e2jENYDE e2jENYJA e2jENYFE e2jENYMR
               e2jSEGAP e2jSEGMA e2jSEGJU e2jSEGJL e2jSEGAU e2jSEGSZ
               e2jSEGOK e2jSEGNO e2jSEGDE e2jSEGJA e2jSEGFE e2jSEGMR
               e2jNEGAP e2jNEGMA e2jNEGJU e2jNEGJL e2jNEGAU e2jNEGSZ
               e2jNEGOK e2jNEGNO e2jNEGDE e2jNEGJA e2jNEGFE e2jNEGMR
               e2jTARAP e2jTARMA e2jTARJU e2jTARJL e2jTARAU e2jTARSZ
               e2jTAROK e2jTARNO e2jTARDE e2jTARJA e2jTARFE e2jTARMR
               e2jEJDAP e2jEJDMA e2jEJDJU e2jEJDJL e2jEJDAU e2jEJDSZ
               e2jEJDOK e2jEJDNO e2jEJDDE e2jEJDJA e2jEJDFE e2jEJDMR
               e2jKMUAP e2jKMUMA e2jKMUJU e2jKMUJL e2jKMUAU e2jKMUSZ
               e2jKMUOK e2jKMUNO e2jKMUDE e2jKMUJA e2jKMUFE e2jKMUMR
               e2jASMAP e2jASMMA e2jASMJU e2jASMJL e2jASMAU e2jASMSZ
               e2jASMOK e2jASMNO e2jASMDE e2jASMJA e2jASMFE e2jASMMR
               e2jAMGAP e2jAMGMA e2jAMGJU e2jAMGJL e2jAMGAU e2jAMGSZ
               e2jAMGOK e2jAMGNO e2jAMGDE e2jAMGJA e2jAMGFE e2jAMGMR
               e2jASZOK e2jASZNO e2jASZDE e2jASZJA e2jASZFE e2jASZMR
               e2jASZAP e2jASZMA e2jASZJU e2jASZJL e2jASZAU e2jASZSZ
               e2jAERAP e2jAERMA e2jAERJU e2jAERJL e2jAERAU e2jAERSZ
               e2jAEROK e2jAERNO e2jAERDE e2jAERJA e2jAERFE e2jAERMR
               e2jATAAP e2jATAMA e2jATAJU e2jATAJL e2jATAAU e2jATASZ
               e2jATAOK e2jATANO e2jATADE e2jATAJA e2jATAFE e2jATAMR
               e2jAFUAP e2jAFUMA e2jAFUJU e2jAFUJL e2jAFUAU e2jAFUSZ
               e2jAFUOK e2jAFUNO e2jAFUDE e2jAFUJA e2jAFUFE e2jAFUMR
               e2jKERAP e2jKERMA e2jKERJU e2jKERJL e2jKERAU e2jKERSZ
               e2jKEROK e2jKERNO e2jKERDE e2jKERJA e2jKERFE e2jKERMR
               e2jJUTAP e2jJUTMA e2jJUTJU e2jJUTJL e2jJUTAU e2jJUTSZ
               e2jJUTOK e2jJUTNO e2jJUTDE e2jJUTJA e2jJUTFE e2jJUTMR
               e2jBORAP e2jBORMA e2jBORJU e2jBORJL e2jBORAU e2jBORSZ
               e2jBOROK e2jBORNO e2jBORDE e2jBORJA e2jBORFE e2jBORMR
               e2jTAMAP e2jTAMMA e2jTAMJU e2jTAMJL e2jTAMAU e2jTAMSZ
               e2jTAMOK e2jTAMNO e2jTAMDE e2jTAMJA e2jTAMFE e2jTAMMR
               e2jELLAP e2jELLMA e2jELLJU e2jELLJL e2jELLAU e2jELLSZ
               e2jELLOK e2jELLNO e2jELLDE e2jELLJA e2jELLFE e2jELLMR
               e2jBIZAP e2jBIZMA e2jBIZJU e2jBIZJL e2jBIZAU e2jBIZSZ
               e2jBIZOK e2jBIZNO e2jBIZDE e2jBIZJA e2jBIZFE e2jBIZMR
               e2ffogvi e2fgform e2jvszam e2jvnyer.
execute.



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

select if (akttag93 = 1).
execute.
        
**********************************************************************.
*              DEFINITION of MISSING VALUES                          *.
**********************************************************************.

fre e2jOBECS e2FEVEGP e2jPREMP e2jNAPIP e2jUJITP e2jEGYP
              e2jvpenz e2jvsump.
              

frequency     e2jFOMfk e2jFOMfm e2jTAPfk e2jTAPfm e2jTULfk e2jTULfm
              e2jETKfk e2jETKfm e2jGKHfk e2jGKHfm e2jUTHfk e2jUTHfm
              e2jLAHfk e2jLAHfm e2jEGHfk e2jEGHfm e2jMUNfk e2jMUNfm
              e2jMUSfk e2jMUSfm  
              e2jATKfk e2jATKfm e2joszfk e2joszfm e2jGYEfk e2jGYEfm
              e2jGYSfk e2jGYSfm e2jCSPfk e2jCSPfm e2jNYUfk e2jNYUfm
              e2jRNYfk e2jRNYfm e2jENYfk e2jENYfm e2jSEGfk e2jSEGfm
              e2jNEGfk e2jNEGfm e2jTARfk e2jTARfm e2jEJDfk e2jEJDfm
              e2jKMUSU e2jASMSU e2jAMGSU e2jASZSU
              e2jAERSU e2jATASU e2jAFUSU e2jKERSU e2jJUTSU e2jBORSU
              e2jTAMSU e2jELLSU e2jBIZSU /sta all.



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


* I. Hztarts krdiv - Household questionnaire.

* A 59,62, 72-78 krds - QUESTION 59,62 72-78.
*Income brackets should be recoded.

*B vlaszlap.

recode e2jVPENZ e2jVSUMP h2jLAKK1 h2jALBK1 h2jNYAK1 h2jGEPK1 
       h2jFOLK1 h2jNYER1 h2jSEG1  h2jTAMO1 h2jKARP1          
       h2GAELAP h2GAELFP h2GAELFT h2GAFOGP h2GNELAP 
       h2GNELFP h2GNELFT h2GNFOGP (SYSMIS, MISSING, 0 = 0)
      (1= 5000)
      (2=20000)
      (3=40000)
      (4=60000)
      (5=90000)
      (6=200000)
      (7=400000)
      (8=700000)
      (9=900000)
      (else=copy).

* C vlaszlap.

recode h2VINGA1 h2VFOLA1 h2VTELA1 h2VNYAA1 h2VAUTA1 
       h2VJARA1 h2VINGL1 h2VFOLL1 h2VTELL1 h2VNYAL1 
       h2VAUTL1 h2VJARL1 (SYSMIS, MISSING, 0 = 0)
      (1=  50000)
      (2= 200000)
      (3= 400000)
      (4= 700000)
      (5= 850000)
      (6=2000000)
      (7=4000000)
      (8=7000000)
      (9=9000000)
      (else=copy).

fre e2jvpenz e2jvsump.

temporary.
select if (e2htfovi=1).
fre h2VINGA1 h2VFOLA1 h2VTELA1 h2VNYAA1 h2VAUTA1
    h2VINGL1 h2VFOLL1 h2VTELL1 h2VNYAL1
    h2VAUTL1 h2VJARL1
    h2jLAKK1 h2jALBK1 h2jNYAK1 h2jGEPK1
    h2jFOLK1 h2jNYER1 h2jSEG1  h2jTAMO1 h2jKARP1
    h2GAELAP h2GAELFP h2GAELFT h2GAFOGP h2GNELAP
    h2GNELFP h2GNELFT h2GNFOGP.

* Individual questionnaire.

recode e2jOBECS e2FEVEGP e2jPREMP e2jNAPIP e2jUJITP e2jEGYP   
       (SYSMIS, MISSING, 0 = 0) (else=copy).



recode  e2jFOMfk e2jFOMfm e2jTAPfk e2jTAPfm e2jTULfk e2jTULfm
        e2jETKfk e2jETKfm e2jGKHfk e2jGKHfm e2jUTHfk e2jUTHfm
        e2jLAHfk e2jLAHfm e2jEGHfk e2jEGHfm e2jMUNfk e2jMUNfm
        e2jMUSfk e2jMUSfm 
        e2jATKfk e2jATKfm e2joszfk e2joszfm e2jGYEfk e2jGYEfm
        e2jGYSfk e2jGYSfm e2jCSPfk e2jCSPfm e2jNYUfk e2jNYUfm
        e2jRNYfk e2jRNYfm e2jENYfk e2jENYfm e2jSEGfk e2jSEGfm
        e2jNEGfk e2jNEGfm e2jTARfk e2jTARfm e2jEJDfk e2jEJDfm
        e2jKMUSU e2jASMSU e2jAMGSU e2jASZSU
        e2jAERSU e2jATASU e2jAFUSU e2jKERSU e2jJUTSU e2jBORSU
        e2jTAMSU e2jELLSU e2jBIZSU (SYSMIS, MISSING, 0 = 0) 
        (else=copy).



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

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

Compute h2jIELAD = SUM (h2VINGA1 + h2VFOLA1 + h2VTELA1 + h2VNYAA1 +
                        h2VAUTA1 + h2VJARA1).
Variable Label h2jIELAD 'Ingatlan eladsi jvedelem'.

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

Compute h2jIVESZ = SUM (h2VINGL1 + h2VFOLL1 + h2VTELL1 + h2VNYAL1 +
                        h2VAUTL1 + h2VJARL1).
Variable Label h2jIVESZ 'Ingatlan vsrlsi kiads'.
* Income from Renting & Leasing propety: Flat, Room, cottage, 
* Machine, Agricultural property.

Compute h2jKIAD = SUM (h2jLAKK1 + h2jALBK1 + h2jNYAK1 + h2jGEPK1 +
                       h2jFOLK1).
Variable Label h2jKIAD 'Ingatlan brbeadsnak jvedelme'.

* Shared income of household from capital.

Compute h2jTOKE = h2jIELAD + h2jKIAD.
Variable Label h2jTOKE 'Hztarts kzs tkejvedelme'.

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

* Market income from agricultural production.

Compute h2jMGELA = SUM (h2GAELAP + h2GAELFP + h2GNELAP + h2GNELFP).
Variable Label h2jMGELA 'Hztarts MG. rtkests jv.'.

* Incomes from self-consumption.

Compute h2jMGTAK = SUM (h2GAELFT + h2GAFOGP + h2GNELFT + h2GNFOGP).
Variable Label h2jMGTAK 'Hztarts MG. fogyaszts megtakarts'.

* Total Agricultural incomes of household.

Compute h2jMGOSZ = SUM (h2jMGELA + h2jMGTAK).
Variable Label h2jMGOSZ 'Hztarts MG. sszjvedelme'.


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

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

Compute h2jOVOSZ = h2jKIAD + h2jSEG1 + h2jTAMO1 + h2jMGOSZ + h2jNYER1 +
                   h2jKARP1.
Variable Label h2jOVOSZ 'Hztarts kzs sszjvedelme 93'.
Formats h2HTSZ93 (F2.0).
Formats h2jIELAD TO h2jOVOSZ (F9.0).
Execute.



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


Recode e2jFOMAP e2jFOMMA e2jFOMJU e2jFOMJL e2jFOMAU e2jFOMSZ
       e2jFOMOK e2jFOMNO e2jFOMDE e2jFOMJA e2jFOMFE e2jFOMMR
       e2jTAPAP e2jTAPMA e2jTAPJU e2jTAPJL e2jTAPAU e2jTAPSZ
       e2jTAPOK e2jTAPNO e2jTAPDE e2jTAPJA e2jTAPFE e2jTAPMR
       e2jTULAP e2jTULMA e2jTULJU e2jTULJL e2jTULAU e2jTULSZ
       e2jTULOK e2jTULNO e2jTULDE e2jTULJA e2jTULFE e2jTULMR
       e2jETKAP e2jETKMA e2jETKJU e2jETKJL e2jETKAU e2jETKSZ
       e2jETKOK e2jETKNO e2jETKDE e2jETKJA e2jETKFE e2jETKMR
       e2jGKHAP e2jGKHMA e2jGKHJU e2jGKHJL e2jGKHAU e2jGKHSZ
       e2jGKHOK e2jGKHNO e2jGKHDE e2jGKHJA e2jGKHFE e2jGKHMR
       e2jUTHAP e2jUTHMA e2jUTHJU e2jUTHJL e2jUTHAU e2jUTHSZ
       e2jUTHOK e2jUTHNO e2jUTHDE e2jUTHJA e2jUTHFE e2jUTHMR
       e2jLAHAP e2jLAHMA e2jLAHJU e2jLAHJL e2jLAHAU e2jLAHSZ
       e2jLAHOK e2jLAHNO e2jLAHDE e2jLAHJA e2jLAHFE e2jLAHMR
       e2jEGHAP e2jEGHMA e2jEGHJU e2jEGHJL e2jEGHAU e2jEGHSZ
       e2jEGHOK e2jEGHNO e2jEGHDE e2jEGHJA e2jEGHFE e2jEGHMR
       e2jMUNAP e2jMUNMA e2jMUNJU e2jMUNJL e2jMUNAU e2jMUNSZ
       e2jMUNOK e2jMUNNO e2jMUNDE e2jMUNJA e2jMUNFE e2jMUNMR
       e2jMUSAP e2jMUSMA e2jMUSJU e2jMUSJL e2jMUSAU e2jMUSSZ
       e2jMUSOK e2jMUSNO e2jMUSDE e2jMUSJA e2jMUSFE e2jMUSMR
       e2jATKAP e2jATKMA e2jATKJU e2jATKJL e2jATKAU e2jATKSZ
       e2jATKOK e2jATKNO e2jATKDE e2jATKJA e2jATKFE e2jATKMR
       e2joszAP e2joszMA e2joszJU e2joszJL e2joszAU e2joszSZ
       e2joszOK e2joszNO e2joszDE e2joszJA e2joszFE e2joszMR
       e2jGYEAP e2jGYEMA e2jGYEJU e2jGYEJL e2jGYEAU e2jGYESZ
       e2jGYEOK e2jGYENO e2jGYEDE e2jGYEJA e2jGYEFE e2jGYEMR
       e2jGYSAP e2jGYSMA e2jGYSJU e2jGYSJL e2jGYSAU e2jGYSSZ
       e2jGYSOK e2jGYSNO e2jGYSDE e2jGYSJA e2jGYSFE e2jGYSMR
       e2jCSPAP e2jCSPMA e2jCSPJU e2jCSPJL e2jCSPAU e2jCSPSZ
       e2jCSPOK e2jCSPNO e2jCSPDE e2jCSPJA e2jCSPFE e2jCSPMR
       e2jNYUAP e2jNYUMA e2jNYUJU e2jNYUJL e2jNYUAU e2jNYUSZ
       e2jNYUOK e2jNYUNO e2jNYUDE e2jNYUJA e2jNYUFE e2jNYUMR
       e2jRNYAP e2jRNYMA e2jRNYJU e2jRNYJL e2jRNYAU e2jRNYSZ
       e2jRNYOK e2jRNYNO e2jRNYDE e2jRNYJA e2jRNYFE e2jRNYMR
       e2jENYAP e2jENYMA e2jENYJU e2jENYJL e2jENYAU e2jENYSZ
       e2jENYOK e2jENYNO e2jENYDE e2jENYJA e2jENYFE e2jENYMR
       e2jSEGAP e2jSEGMA e2jSEGJU e2jSEGJL e2jSEGAU e2jSEGSZ
       e2jSEGOK e2jSEGNO e2jSEGDE e2jSEGJA e2jSEGFE e2jSEGMR
       e2jNEGAP e2jNEGMA e2jNEGJU e2jNEGJL e2jNEGAU e2jNEGSZ
       e2jNEGOK e2jNEGNO e2jNEGDE e2jNEGJA e2jNEGFE e2jNEGMR
       e2jTARAP e2jTARMA e2jTARJU e2jTARJL e2jTARAU e2jTARSZ
       e2jTAROK e2jTARNO e2jTARDE e2jTARJA e2jTARFE e2jTARMR
       e2jEJDAP e2jEJDMA e2jEJDJU e2jEJDJL e2jEJDAU e2jEJDSZ
       e2jEJDOK e2jEJDNO e2jEJDDE e2jEJDJA e2jEJDFE e2jEJDMR
       (sysmis, missing, .00, 0 = 0) (else=copy).

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

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

Count e2jFOMGK = e2jFOMAP e2jFOMMA e2jFOMJU e2jFOMJL e2jFOMAU e2jFOMSZ 
                 e2jFOMOK e2jFOMNO e2jFOMDE e2jFOMJA e2jFOMFE e2jFOMMR (1).
Variable Label e2jfomgk '76.k. flls gyakorisga 92. pr. - 93. mrc.'.

Count e2jTAPGK = e2jTAPAP e2jTAPMA e2jTAPJU e2jTAPJL e2jTAPAU e2jTAPSZ
                 e2jTAPOK e2jTAPNO e2jTAPDE e2jTAPJA e2jTAPFE e2jTAPMR (1).
Variable Label e2jtapgk '76.k. tppnz gyakorisga 92. pr. - 93. mrc.'.

Count e2jTULGK = e2jTULAP e2jTULMA e2jTULJU e2jTULJL e2jTULAU e2jTULSZ
                 e2jTULOK e2jTULNO e2jTULDE e2jTULJA e2jTULFE e2jTULMR (1).
Variable Label e2jtulgk '76.k. tlra gyakorisga 92. pr. - 93. mrc.'.

Count e2jETKGK = e2jETKAP e2jETKMA e2jETKJU e2jETKJL e2jETKAU e2jETKSZ
                 e2jETKOK e2jETKNO e2jETKDE e2jETKJA e2jETKFE e2jETKMR (1).
Variable Label e2jetkgk '76.k. tk. hoz. gyakorisga 92. pr. - 93. mrc.'.

Count e2jGKHGK = e2jGKHAP e2jGKHMA e2jGKHJU e2jGKHJL e2jGKHAU e2jGKHSZ
                 e2jGKHOK e2jGKHNO e2jGKHDE e2jGKHJA e2jGKHFE e2jGKHMR (1).
Variable Label e2jgkhgk '76.k. gpk. hoz. gyakorisga 92. pr. - 93. mrc.'.

Count e2jUTHGK = e2jUTHAP e2jUTHMA e2jUTHJU e2jUTHJL e2jUTHAU e2jUTHSZ
                 e2jUTHOK e2jUTHNO e2jUTHDE e2jUTHJA e2jUTHFE e2jUTHMR (1).
Variable Label e2juthgk '76.k. utaz. hoz. gyakorisga 92. pr. - 93. mrc.'.

Count e2jLAHGK = e2jLAHAP e2jLAHMA e2jLAHJU e2jLAHJL e2jLAHAU e2jLAHSZ
                 e2jLAHOK e2jLAHNO e2jLAHDE e2jLAHJA e2jLAHFE e2jLAHMR (1).
Variable Label e2jlahgk '76.k. laks hoz. gyakorisga 92. pr. - 93. mrc.'.

Count e2jEGHGK = e2jEGHAP e2jEGHMA e2jEGHJU e2jEGHJL e2jEGHAU e2jEGHSZ
                 e2jEGHOK e2jEGHNO e2jEGHDE e2jEGHJA e2jEGHFE e2jEGHMR (1).
Variable Label e2jeghgk '76.k. egyb hoz. gyakorisga 92. pr. - 93. mrc.'.

Count e2jMUNGK = e2jMUNAP e2jMUNMA e2jMUNJU e2jMUNJL e2jMUNAU e2jMUNSZ
                 e2jMUNOK e2jMUNNO e2jMUNDE e2jMUNJA e2jMUNFE e2jMUNMR (1).
Variable Label e2jmungk '76.k. munkn. jr. gyakoris. 92. pr. - 93. mrc.'.

Count e2jMUSGK = e2jMUSAP e2jMUSMA e2jMUSJU e2jMUSJL e2jMUSAU e2jMUSSZ
                 e2jMUSOK e2jMUSNO e2jMUSDE e2jMUSJA e2jMUSFE e2jMUSMR (1).
Variable Label e2jmusgk '76.k. munkn. jr. lej. gy. 92. pr. - 93. mrc.'.

Count e2jATKGK = e2jATKAP e2jATKMA e2jATKJU e2jATKJL e2jATKAU e2jATKSZ
                 e2jATKOK e2jATKNO e2jATKDE e2jATKJA e2jATKFE e2jATKMR (1).
Variable Label e2jatkgk '76.k. tkp. tm. gyakoris. 92. pr. - 93. mrc.'.

Count e2jostGK = e2joszAP e2joszMA e2joszJU e2joszJL e2joszAU e2joszSZ
                 e2joszOK e2joszNO e2joszDE e2joszJA e2joszFE e2joszMR (1).
Variable Label e2jostgk '76.k. sztnd. gyakorisga 92. pr. - 93. mrc.'.

Count e2jGYEGK = e2jGYEAP e2jGYEMA e2jGYEJU e2jGYEJL e2jGYEAU e2jGYESZ
                 e2jGYEOK e2jGYENO e2jGYEDE e2jGYEJA e2jGYEFE e2jGYEMR (1).
Variable Label e2jgyegk '76.k. GYED gyakorisga 92. pr. - 93. mrc.'.

Count e2jGYSGK = e2jGYSAP e2jGYSMA e2jGYSJU e2jGYSJL e2jGYSAU e2jGYSSZ
                 e2jGYSOK e2jGYSNO e2jGYSDE e2jGYSJA e2jGYSFE e2jGYSMR (1).
Variable Label e2jgysgk '76.k. GYES gyakorisga 92. pr. - 93. mrc.'.

Count e2jCSPGK = e2jCSPAP e2jCSPMA e2jCSPJU e2jCSPJL e2jCSPAU e2jCSPSZ
                 e2jCSPOK e2jCSPNO e2jCSPDE e2jCSPJA e2jCSPFE e2jCSPMR (1).
Variable Label e2jcspgk '76.k. csaldip. gyakorisga 92. pr. - 93. mrc.'.

Count e2jNYUGK = e2jNYUAP e2jNYUMA e2jNYUJU e2jNYUJL e2jNYUAU e2jNYUSZ
                 e2jNYUOK e2jNYUNO e2jNYUDE e2jNYUJA e2jNYUFE e2jNYUMR (1).
Variable Label e2jnyugk '76.k. r. nyugd. gyakorisga 92. pr. - 93. mrc.'.

Count e2jRNYGK = e2jRNYAP e2jRNYMA e2jRNYJU e2jRNYJL e2jRNYAU e2jRNYSZ
                 e2jRNYOK e2jRNYNO e2jRNYDE e2jRNYJA e2jRNYFE e2jRNYMR (1).
Variable Label e2jrnygk '76.k. rok. nyugd. gyakoris. 92. pr. - 93. mrc.'.

Count e2jENYGK = e2jENYAP e2jENYMA e2jENYJU e2jENYJL e2jENYAU e2jENYSZ
                 e2jENYOK e2jENYNO e2jENYDE e2jENYJA e2jENYFE e2jENYMR (1).
Variable Label e2jenygk '76.k. egy. nyugd. gyakoris. 92. pr. - 93. mrc.'.

Count e2jSEGGK = e2jSEGAP e2jSEGMA e2jSEGJU e2jSEGJL e2jSEGAU e2jSEGSZ
                 e2jSEGOK e2jSEGNO e2jSEGDE e2jSEGJA e2jSEGFE e2jSEGMR (1).
Variable Label e2jseggk '76.k. szoc. seg. gyakorisga 92. pr. - 93. mrc.'.

Count e2jNEGGK = e2jNEGAP e2jNEGMA e2jNEGJU e2jNEGJL e2jNEGAU e2jNEGSZ
                 e2jNEGOK e2jNEGNO e2jNEGDE e2jNEGJA e2jNEGFE e2jNEGMR (1).
Variable Label e2jneggk '76.k. rendk. seg. gyakoris. 92. pr. - 93. mrc.'.

Count e2jTARGK = e2jTARAP e2jTARMA e2jTARJU e2jTARJL e2jTARAU e2jTARSZ
                 e2jTAROK e2jTARNO e2jTARDE e2jTARJA e2jTARFE e2jTARMR (1).
Variable Label e2jtargk '76.k. tartsd. gyakorisga 92. pr. - 93. mrc.'.

Count e2jEJDGK = e2jEJDAP e2jEJDMA e2jEJDJU e2jEJDJL e2jEJDAU e2jEJDSZ
                 e2jEJDOK e2jEJDNO e2jEJDDE e2jEJDJA e2jEJDFE e2jEJDMR (1).
Variable Label e2jejdgk '76.k. letjr. eltart. gyak. 92. pr. - 93. mrc.'.


fre e2jfomgk to e2jejdgk.


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

Recode e2jFOMfk e2jFOMfm e2jTAPfk e2jTAPfm e2jTULfk e2jTULfm
       e2jETKfk e2jETKfm e2jGKHfk e2jGKHfm e2jUTHfk e2jUTHfm
       e2jLAHfk e2jLAHfm e2jEGHfk e2jEGHfm e2jMUNfk e2jMUNfm
       e2jMUSfk e2jMUSfm 
       e2jATKfk e2jATKfm e2joszfk e2joszfm e2jGYEfk e2jGYEfm
       e2jGYSfk e2jGYSfm e2jCSPfk e2jCSPfm e2jNYUfk e2jNYUfm
       e2jRNYfk e2jRNYfm e2jENYfk e2jENYfm e2jSEGfk e2jSEGfm
       e2jNEGfk e2jNEGfm e2jTARfk e2jTARfm e2jEJDfk e2jEJDfm
       (SYSMIS, MISSING, .00, 0, = 0) (else=copy).


**********************************************************************.
* 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 (e2jfomfk=0 and e2jfomgk gt 0 and e2jfomfm gt 0).
* list eazon93 e2jfomfk e2jfomgk e2jfomfm.

* 2 tppnz.
* temporary.
* select if (e2jtapfk=0 and e2jtapgk gt 0 and e2jtapfm gt 0).
* list eazon93 e2jtapfk e2jtapgk e2jtapfm.

* 3 tlra.
* temporary.
* select if (e2jtulfk=0 and e2jtulgk gt 0 and e2jtulfm gt 0).
* list eazon93 e2jtulfk e2jtulgk e2jtulfm.

* 4 tkezsi hozzjruls.
* temporary.
* select if (e2jetkfk=0 and e2jetkgk gt 0 and e2jetkfm gt 0).
* list eazon93 e2jetkfk e2jetkgk e2jetkfm.

* 5 gpkocsi hozzjruls.
* temporary.
* select if (e2jgkhfk=0 and e2jgkhgk gt 0 and e2jgkhfm gt 0).
* list eazon93 e2jgkhfk e2jgkhgk e2jgkhfm.

* 6 utazs hozzjruls.
* temporary.
* select if (e2juthfk=0 and e2juthgk gt 0 and e2juthfm gt 0).
* list eazon93 e2juthfk e2juthgk e2juthfm.

* 7 laksbrlet hozzjruls.
* temporary.
* select if (e2jlahfk=0 and e2jlahgk gt 0 and e2jlahfm gt 0).
* list eazon93 e2jlahfk e2jlahgk e2jlahfm.

* 8 egyb hozzjruls.
* temporary.
* select if (e2jeghfk=0 and e2jeghgk gt 0 and e2jeghfm gt 0).
* list eazon93 e2jeghfk e2jeghgk e2jeghfm.

* 9 munkanlkli jradk.
* temporary.
* select if (e2jmunfk=0 and e2jmungk gt 0 and e2jmunfm gt 0).
* list eazon93 e2jmunfk e2jmungk e2jmunfm.

* 10 munk jvedelempotl.
* temporary.
* select if (e2jmusfk=0 and e2jmusgk gt 0 and e2jmusfm gt 0).
* list eazon93 e2jmusfk e2jmusgk e2jmusfm.

* 11 tkpzsi.
* temporary.
* select if (e2jatkfk=0 and e2jatkgk gt 0 and e2jatkfm gt 0).
* list eazon93 e2jatkfk e2jatkgk e2jatkfm.

* 12 sztndij.
* temporary.
* select if (e2joszfk=0 and e2jostgk gt 0 and e2joszfm gt 0).
* list eazon93 e2joszfk e2jostgk e2joszfm.


* 13 GYED.
* temporary.
* select if (e2jgyefk=0 and e2jgyegk gt 0 and e2jgyefm gt 0).
* list eazon93 e2jgyefk e2jgyegk e2jgyefm.

* 14 GYES.
* temporary.
* select if (e2jgysfk=0 and e2jgysgk gt 0 and e2jgysfm gt 0).
* list eazon93 e2jgysfk e2jgysgk e2jgysfm.

* 15 csaldi ptlk.
* temporary.
* select if (e2jcspfk=0 and e2jcspgk gt 0 and e2jcspfm gt 0).
* list eazon93 e2jcspfk e2jcspgk e2jcspfm.

* 16 regsgi nyugdij.
* temporary.
* select if (e2jnyufk=0 and e2jnyugk gt 0 and e2jnyufm gt 0).
* list eazon93 e2jnyufk e2jnyugk e2jnyufm.

* 17 rokkantsgi nyugdij.
* temporary.
* select if (e2jrnyfk=0 and e2jrnygk gt 0 and e2jrnyfm gt 0).
* list eazon93 e2jrnyfk e2jrnygk e2jrnyfm.

* 18 egyb nyugdij.
* temporary.
* select if (e2jenyfk=0 and e2jenygk gt 0 and e2jenyfm gt 0).
* list eazon93 e2jenyfk e2jenygk e2jenyfm.

* 19 rendszeres szocilis segly.
* temporary.
* select if (e2jsegfk=0 and e2jseggk gt 0 and e2jsegfm gt 0).
* list eazon93 e2jsegfk e2jseggk e2jsegfm.

* 20 rendkivli segly.
* temporary.
* select if (e2jnegfk=0 and e2jneggk gt 0 and e2jnegfm gt 0).
* list eazon93 e2jnegfk e2jneggk e2jnegfm.

* 21 tartsdij.
* temporary.
* select if (e2jtarfk=0 and e2jtargk gt 0 and e2jtarfm gt 0).
* list eazon93 e2jtarfk e2jtargk e2jtarfm.

* 22 letjradk eltarts.
* temporary.
* select if (e2jejdfk=0 and e2jejdgk gt 0 and e2jejdfm gt 0).
* list eazon93 e2jejdfk e2jejdgk e2jejdfm.


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


* 1 flls.
* temporary.
* select if (e2jfomfk gt 0 and e2jfomgk gt 0 and e2jfomfm=0).
* list eazon93 e2jfomfk e2jfomgk e2jfomfm.

* 2 tppnz.
* temporary.
* select if (e2jtapfk gt 0 and e2jtapgk gt 0 and e2jtapfm=0).
* list eazon93 e2jtapfk e2jtapgk e2jtapfm.

* 3 tlra.
* temporary.
* select if (e2jtulfk gt 0 and e2jtulgk gt 0 and e2jtulfm=0).
* list eazon93 e2jtulfk e2jtulgk e2jtulfm.

* 4 tkezsi hozzjruls.
* temporary.
* select if (e2jetkfk gt 0 and e2jetkgk gt 0 and e2jetkfm=0).
* list eazon93 e2jetkfk e2jetkgk e2jetkfm.

* 5 gpkocsi hozzjruls.
* temporary.
* select if (e2jgkhfk gt 0 and e2jgkhgk gt 0 and e2jgkhfm=0).
* list eazon93 e2jgkhfk e2jgkhgk e2jgkhfm.

* 6 utazs hozzjruls.
* temporary.
* select if (e2juthfk gt 0 and e2juthgk gt 0 and e2juthfm=0).
* list eazon93 e2juthfk e2juthgk e2juthfm.

* 7 laksbrlet hozzjruls.
* temporary.
* select if (e2jlahfk gt 0 and e2jlahgk gt 0 and e2jlahfm=0).
* list eazon93 e2jlahfk e2jlahgk e2jlahfm.

* 8 egyb hozzjruls.
* temporary.
* select if (e2jeghfk gt 0 and e2jeghgk gt 0 and e2jeghfm=0).
* list eazon93 e2jeghfk e2jeghgk e2jeghfm.

* 9 munkanlkli jradk.
* temporary.
* select if (e2jmunfk gt 0 and e2jmungk gt 0 and e2jmunfm=0).
* list eazon93 e2jmunfk e2jmungk e2jmunfm.

* 10 munk jvedelempotl.
* temporary.
* select if (e2jmusfk gt 0 and e2jmusgk gt 0 and e2jmusfm=0).
* list eazon93 e2jmusfk e2jmusgk e2jmusfm.

* 11. tkpzsi tmogats.
* temporary.
* select if (e2jatkfk gt 0 and e2jatkgk gt 0 and e2jatkfm=0).
* list eazon93 e2jatkfk e2jatkgk e2jatkfm.

* 12 sztndij.
* temporary.
* select if (e2joszfk gt 0 and e2jostgk gt 0 and e2joszfm=0).
* list eazon93 e2joszfk e2jostgk e2joszfm.

* 13 GYED.
* temporary.
* select if (e2jgyefk gt 0 and e2jgyegk gt 0 and e2jgyefm=0).
* list eazon93 e2jgyefk e2jgyegk e2jgyefm.

* 14 GYES.
* temporary.
* select if (e2jgysfk gt 0 and e2jgysgk gt 0 and e2jgysfm=0).
* list eazon93 e2jgysfk e2jgysgk e2jgysfm.

* 15 csaldi ptlk.
* temporary.
* select if (e2jcspfk gt 0 and e2jcspgk gt 0 and e2jcspfm=0).
* list eazon93 e2jcspfk e2jcspgk e2jcspfm.

* 16 regsgi nyugdij.
* temporary.
* select if (e2jnyufk gt 0 and e2jnyugk gt 0 and e2jnyufm=0).
* list eazon93 e2jnyufk e2jnyugk e2jnyufm.

* 17 rokkantsgi nyugdij.
* temporary.
* select if (e2jrnyfk gt 0 and e2jrnygk gt 0 and e2jrnyfm=0).
* list eazon93 e2jrnyfk e2jrnygk e2jrnyfm.

* 18 egyb nyugdij.
* temporary.
* select if (e2jenyfk gt 0 and e2jenygk gt 0 and e2jenyfm=0).
* list eazon93 e2jenyfk e2jenygk e2jenyfm.

* 19 rendszeres szocilis segly.
* temporary.
* select if (e2jsegfk gt 0 and e2jseggk gt 0 and e2jsegfm=0).
* list eazon93 e2jsegfk e2jseggk e2jsegfm.

* 20 rendkivli segly.
* temporary.
* select if (e2jnegfk gt 0 and e2jneggk gt 0 and e2jnegfm=0).
* list eazon93 e2jnegfk e2jneggk e2jnegfm.

* 21 tartsdij.
* temporary.
* select if (e2jtarfk gt 0 and e2jtargk gt 0 and e2jtarfm=0).
* list eazon93 e2jtarfk e2jtargk e2jtarfm.

* 22 letjradk eltarts.
* temporary.
* select if (e2jejdfk gt 0 and e2jejdgk gt 0 and e2jejdfm=0).
* list eazon93 e2jejdfk e2jejdgk e2jejdfm.


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

if (e2jfomfk eq 0 and e2jfomgk gt 1 and e2jfomfm gt 0) e2jfomfk = (e2jfomfm * 0.9).
if (e2jfomfk eq 0 and e2jfomgk eq 1 and e2jfomfm gt 0) e2jfomfk = e2jfomfm.

if (e2jfomfk gt 0 and e2jfomgk gt 1 and e2jfomfm eq 0) e2jfomfm = (e2jfomfk * 1.1).
if (e2jfomfk gt 0 and e2jfomgk eq 1 and e2jfomfm eq 0) e2jfomfm = e2jfomfk.


if (e2jtapfk eq 0 and e2jtapgk gt 1 and e2jtapfm gt 0) e2jtapfk = (e2jtapfm * 0.9).
if (e2jtapfk eq 0 and e2jtapgk eq 1 and e2jtapfm gt 0) e2jtapfk = e2jtapfm.

if (e2jtapfk gt 0 and e2jtapgk gt 1 and e2jtapfm eq 0) e2jtapfm = (e2jtapfk * 1.1).
if (e2jtapfk gt 0 and e2jtapgk eq 1 and e2jtapfm eq 0) e2jtapfm = e2jtapfk.


if (e2jtulfk eq 0 and e2jtulgk gt 1 and e2jtulfm gt 0) e2jtulfk = (e2jtulfm * 0.9).
if (e2jtulfk eq 0 and e2jtulgk eq 1 and e2jtulfm gt 0) e2jtulfk = e2jtulfm.

if (e2jtulfk gt 0 and e2jtulgk gt 1 and e2jtulfm eq 0) e2jtulfm = (e2jtulfk * 1.1).
if (e2jtulfk gt 0 and e2jtulgk eq 1 and e2jtulfm eq 0) e2jtulfm = e2jtulfk.


if (e2jetkfk eq 0 and e2jetkgk gt 1 and e2jetkfm gt 0) e2jetkfk = (e2jetkfm * 0.9).
if (e2jetkfk eq 0 and e2jetkgk eq 1 and e2jetkfm gt 0) e2jetkfk = e2jetkfm.

if (e2jetkfk gt 0 and e2jetkgk gt 1 and e2jetkfm eq 0) e2jetkfm = (e2jetkfk * 1.1).
if (e2jetkfk gt 0 and e2jetkgk eq 1 and e2jetkfm eq 0) e2jetkfm = e2jetkfk.


if (e2jgkhfk eq 0 and e2jgkhgk gt 1 and e2jgkhfm gt 0) e2jgkhfk = (e2jgkhfm * 0.9).
if (e2jgkhfk eq 0 and e2jgkhgk eq 1 and e2jgkhfm gt 0) e2jgkhfk = e2jgkhfm.

if (e2jgkhfk gt 0 and e2jgkhgk gt 1 and e2jgkhfm eq 0) e2jgkhfm = (e2jgkhfk * 1.1).
if (e2jgkhfk gt 0 and e2jgkhgk eq 1 and e2jgkhfm eq 0) e2jgkhfm = e2jgkhfk.


if (e2juthfk eq 0 and e2juthgk gt 1 and e2juthfm gt 0) e2juthfk = (e2juthfm * 0.9).
if (e2juthfk eq 0 and e2juthgk eq 1 and e2juthfm gt 0) e2juthfk = e2juthfm.

if (e2juthfk gt 0 and e2juthgk gt 1 and e2juthfm eq 0) e2juthfm = (e2juthfk * 1.1).
if (e2juthfk gt 0 and e2juthgk eq 1 and e2juthfm eq 0) e2juthfm = e2juthfk.


if (e2jlahfk eq 0 and e2jlahgk gt 1 and e2jlahfm gt 0) e2jlahfk = (e2jlahfm * 0.9).
if (e2jlahfk eq 0 and e2jlahgk eq 1 and e2jlahfm gt 0) e2jlahfk = e2jlahfm.

if (e2jlahfk gt 0 and e2jlahgk gt 1 and e2jlahfm eq 0) e2jlahfm = (e2jlahfk * 1.1).
if (e2jlahfk gt 0 and e2jlahgk eq 1 and e2jlahfm eq 0) e2jlahfm = e2jlahfk.


if (e2jeghfk eq 0 and e2jeghgk gt 1 and e2jeghfm gt 0) e2jeghfk = (e2jeghfm * 0.9).
if (e2jeghfk eq 0 and e2jeghgk eq 1 and e2jeghfm gt 0) e2jeghfk = e2jeghfm.

if (e2jeghfk gt 0 and e2jeghgk gt 1 and e2jeghfm eq 0) e2jeghfm = (e2jeghfk * 1.1).
if (e2jeghfk gt 0 and e2jeghgk eq 1 and e2jeghfm eq 0) e2jeghfm = e2jeghfk.


if (e2jmunfk eq 0 and e2jmungk gt 1 and e2jmunfm gt 0) e2jmunfk = (e2jmunfm * 0.9).
if (e2jmunfk eq 0 and e2jmungk eq 1 and e2jmunfm gt 0) e2jmunfk = e2jmunfm.

if (e2jmunfk gt 0 and e2jmungk gt 1 and e2jmunfm eq 0) e2jmunfm = (e2jmunfk * 1.1).
if (e2jmunfk gt 0 and e2jmungk eq 1 and e2jmunfm eq 0) e2jmunfm = e2jmunfk.


if (e2jmusfk eq 0 and e2jmusgk gt 1 and e2jmusfm gt 0) e2jmusfk = (e2jmusfm * 0.9).
if (e2jmusfk eq 0 and e2jmusgk eq 1 and e2jmusfm gt 0) e2jmusfk = e2jmusfm.

if (e2jmusfk gt 0 and e2jmusgk gt 1 and e2jmusfm eq 0) e2jmusfm = (e2jmusfk * 1.1).
if (e2jmusfk gt 0 and e2jmusgk eq 1 and e2jmusfm eq 0) e2jmusfm = e2jmusfk.


if (e2jatkfk eq 0 and e2jatkgk gt 1 and e2jatkfm gt 0) e2jatkfk = (e2jatkfm * 0.9).
if (e2jatkfk eq 0 and e2jatkgk eq 1 and e2jatkfm gt 0) e2jatkfk = e2jatkfm.

if (e2jatkfk gt 0 and e2jatkgk gt 1 and e2jatkfm eq 0) e2jatkfm = (e2jatkfk * 1.1).
if (e2jatkfk gt 0 and e2jatkgk eq 1 and e2jatkfm eq 0) e2jatkfm = e2jatkfk.


if (e2joszfk eq 0 and e2jostgk gt 1 and e2joszfm gt 0) e2joszfk = (e2joszfm * 0.9).
if (e2joszfk eq 0 and e2jostgk eq 1 and e2joszfm gt 0) e2joszfk = e2joszfm.

if (e2joszfk gt 0 and e2jostgk gt 1 and e2joszfm eq 0) e2joszfm = (e2joszfk * 1.1).
if (e2joszfk gt 0 and e2jostgk eq 1 and e2joszfm eq 0) e2joszfm = e2joszfk.


if (e2jgyefk eq 0 and e2jgyegk gt 1 and e2jgyefm gt 0) e2jgyefk = (e2jgyefm * 0.9).
if (e2jgyefk eq 0 and e2jgyegk eq 1 and e2jgyefm gt 0) e2jgyefk = e2jgyefm.

if (e2jgyefk gt 0 and e2jgyegk gt 1 and e2jgyefm eq 0) e2jgyefm = (e2jgyefk * 1.1).
if (e2jgyefk gt 0 and e2jgyegk eq 1 and e2jgyefm eq 0) e2jgyefm = e2jgyefk.


if (e2jgysfk eq 0 and e2jgysgk gt 1 and e2jgysfm gt 0) e2jgysfk = (e2jgysfm * 0.9).
if (e2jgysfk eq 0 and e2jgysgk eq 1 and e2jgysfm gt 0) e2jgysfk = e2jgysfm.

if (e2jgysfk gt 0 and e2jgysgk gt 1 and e2jgysfm eq 0) e2jgysfm = (e2jgysfk * 1.1).
if (e2jgysfk gt 0 and e2jgysgk eq 1 and e2jgysfm eq 0) e2jgysfm = e2jgysfk.


if (e2jgysfk eq 0 and e2jgysgk gt 1 and e2jgysfm gt 0) e2jgysfk = (e2jgysfm * 0.9).
if (e2jgysfk eq 0 and e2jgysgk eq 1 and e2jgysfm gt 0) e2jgysfk = e2jgysfm.

if (e2jgysfk gt 0 and e2jgysgk gt 1 and e2jgysfm eq 0) e2jgysfm = (e2jgysfk * 1.1).
if (e2jgysfk gt 0 and e2jgysgk eq 1 and e2jgysfm eq 0) e2jgysfm = e2jgysfk.


if (e2jcspfk eq 0 and e2jcspgk gt 1 and e2jcspfm gt 0) e2jcspfk = (e2jcspfm * 0.9).
if (e2jcspfk eq 0 and e2jcspgk eq 1 and e2jcspfm gt 0) e2jcspfk = e2jcspfm.

if (e2jcspfk gt 0 and e2jcspgk gt 1 and e2jcspfm eq 0) e2jcspfm = (e2jcspfk * 1.1).
if (e2jcspfk gt 0 and e2jcspgk eq 1 and e2jcspfm eq 0) e2jcspfm = e2jcspfk.


if (e2jnyufk eq 0 and e2jnyugk gt 1 and e2jnyufm gt 0) e2jnyufk = (e2jnyufm * 0.9).
if (e2jnyufk eq 0 and e2jnyugk eq 1 and e2jnyufm gt 0) e2jnyufk = e2jnyufm.

if (e2jnyufk gt 0 and e2jnyugk gt 1 and e2jnyufm eq 0) e2jnyufm = (e2jnyufk * 1.1).
if (e2jnyufk gt 0 and e2jnyugk eq 1 and e2jnyufm eq 0) e2jnyufm = e2jnyufk.


if (e2jrnyfk eq 0 and e2jrnygk gt 1 and e2jrnyfm gt 0) e2jrnyfk = (e2jrnyfm * 0.9).
if (e2jrnyfk eq 0 and e2jrnygk eq 1 and e2jrnyfm gt 0) e2jrnyfk = e2jrnyfm.

if (e2jrnyfk gt 0 and e2jrnygk gt 1 and e2jrnyfm eq 0) e2jrnyfm = (e2jrnyfk * 1.1).
if (e2jrnyfk gt 0 and e2jrnygk eq 1 and e2jrnyfm eq 0) e2jrnyfm = e2jrnyfk.


if (e2jenyfk eq 0 and e2jenygk gt 1 and e2jenyfm gt 0) e2jenyfk = (e2jenyfm * 0.9).
if (e2jenyfk eq 0 and e2jenygk eq 1 and e2jenyfm gt 0) e2jenyfk = e2jenyfm.

if (e2jenyfk gt 0 and e2jenygk gt 1 and e2jenyfm eq 0) e2jenyfm = (e2jenyfk * 1.1).
if (e2jenyfk gt 0 and e2jenygk eq 1 and e2jenyfm eq 0) e2jenyfm = e2jenyfk.



if (e2jsegfk eq 0 and e2jseggk gt 1 and e2jsegfm gt 0) e2jsegfk = (e2jsegfm * 0.9).
if (e2jsegfk eq 0 and e2jseggk eq 1 and e2jsegfm gt 0) e2jsegfk = e2jsegfm.

if (e2jsegfk gt 0 and e2jseggk gt 1 and e2jsegfm eq 0) e2jsegfm = (e2jsegfk * 1.1).
if (e2jsegfk gt 0 and e2jseggk eq 1 and e2jsegfm eq 0) e2jsegfm = e2jsegfk.



if (e2jnegfk eq 0 and e2jneggk gt 1 and e2jnegfm gt 0) e2jnegfk = (e2jnegfm * 0.9).
if (e2jnegfk eq 0 and e2jneggk eq 1 and e2jnegfm gt 0) e2jnegfk = e2jnegfm.

if (e2jnegfk gt 0 and e2jneggk gt 1 and e2jnegfm eq 0) e2jnegfm = (e2jnegfk * 1.1).
if (e2jnegfk gt 0 and e2jneggk eq 1 and e2jnegfm eq 0) e2jnegfm = e2jnegfk.


if (e2jtarfk eq 0 and e2jtargk gt 1 and e2jtarfm gt 0) e2jtarfk = (e2jtarfm * 0.9).
if (e2jtarfk eq 0 and e2jtargk eq 1 and e2jtarfm gt 0) e2jtarfk = e2jtarfm.

if (e2jtarfk gt 0 and e2jtargk gt 1 and e2jtarfm eq 0) e2jtarfm = (e2jtarfk * 1.1).
if (e2jtarfk gt 0 and e2jtargk eq 1 and e2jtarfm eq 0) e2jtarfm = e2jtarfk.


if (e2jejdfk eq 0 and e2jejdgk gt 1 and e2jejdfm gt 0) e2jejdfk = (e2jejdfm * 0.9).
if (e2jejdfk eq 0 and e2jejdgk eq 1 and e2jejdfm gt 0) e2jejdfk = e2jejdfm.

if (e2jejdfk gt 0 and e2jejdgk gt 1 and e2jejdfm eq 0) e2jejdfm = (e2jejdfk * 1.1).
if (e2jejdfk gt 0 and e2jejdgk eq 1 and e2jejdfm eq 0) e2jejdfm = e2jejdfk.





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

* 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 e2jFOMEV = MEAN (e2jFOMfk, e2jFOMfm) * e2jFOMGK.
Variable label e2jfomev '76.k. flls ves jvedelem'.

Compute e2jTAPEV = MEAN (e2jTAPfk, e2jTAPfm) * e2jTAPGK.
Variable label e2jtapev '76.k. tppnz ves jvedelem'.

Compute e2jTULEV = MEAN (e2jTULfk, e2jTULfm) * e2jTULGK.
Variable label e2jtulev '76.k. tlra ves jvedelem'.

Compute e2jETKEV = MEAN (e2jETKfk, e2jETKfm) * e2jETKGK.
Variable label e2jetkev '76.k. tk. hoz. ves jvedelem'.

Compute e2jGKHEV = MEAN (e2jGKHfk, e2jGKHfm) * e2jGKHGK.
Variable label e2jgkhev '76.k. gpk. hoz. ves jvedelem'.

Compute e2jUTHEV = MEAN (e2jUTHfk, e2jUTHfm) * e2jUTHGK.
Variable label e2juthev '76.k. utaz. hoz. ves jvedelem'.

Compute e2jLAHEV = MEAN (e2jLAHfk, e2jLAHfm) * e2jLAHGK.
Variable label e2jlahev '76.k. laks. hoz. ves jvedelem'.

Compute e2jEGHEV = MEAN (e2jEGHfk, e2jEGHfm) * e2jEGHGK.
Variable label e2jeghev '76.k. egyb hoz. ves jvedelem'.

Compute e2jMUNEV = MEAN (e2jMUNfk, e2jMUNfm) * e2jMUNGK.
Variable label e2jmunev '76.k. munkn. jr. ves jvedelem'.

Compute e2jMUSEV = MEAN (e2jMUSfk, e2jMUSfm) * e2jMUSGK.
Variable label e2jmusev '76.k. munkn. seg. ves jvedelem'.

Compute e2jATKEV = MEAN (e2jATKfk, e2jATKfm) * e2jATKGK.
Variable label e2jatkev '76.k. tkp. tm. ves jvedelem'.

Compute e2jostEV = MEAN (e2joszfk, e2joszfm) * e2jostGK.
Variable label e2jostev '76.k. sztndj ves jvedelem'.

Compute e2jGYEEV = MEAN (e2jGYEfk, e2jGYEfm) * e2jGYEGK.
Variable label e2jgyeev '76.k. GYED ves jvedelem'.

Compute e2jGYSEV = MEAN (e2jGYSfk, e2jGYSfm) * e2jGYSGK.
Variable label e2jgysev '76.k. GYES ves jvedelem'.

Compute e2jCSPEV = MEAN (e2jCSPfk, e2jCSPfm) * e2jCSPGK.
Variable label e2jcspev '76.k. csaldip. ves jvedelem'.

Compute e2jNYUEV = MEAN (e2jNYUfk, e2jNYUfm) * e2jNYUGK.
Variable label e2jnyuev '76.k. r. nyugd. ves jvedelem'.

Compute e2jRNYEV = MEAN (e2jRNYfk, e2jRNYfm) * e2jRNYGK.
Variable label e2jrnyev '76.k. rok. nyugd. ves jvedelem'.

Compute e2jENYEV = MEAN (e2jENYfk, e2jENYfm) * e2jENYGK.
Variable label e2jenyev '76.k. egy. nyugd. ves jvedelem'.

Compute e2jSEGEV = MEAN (e2jSEGfk, e2jSEGfm) * e2jSEGGK.
Variable label e2jsegev '76.k. szoc. seg. ves jvedelem'.

Compute e2jNEGEV = MEAN (e2jNEGfk, e2jNEGfm) * e2jNEGGK.
Variable label e2jnegev '76.k. rengk. seg. ves jvedelem'.

Compute e2jTAREV = MEAN (e2jTARfk, e2jTARfm) * e2jTARGK.
Variable label e2jtarev '76.k. tartsdj ves jvedelem'.

Compute e2jEJDEV = MEAN (e2jEJDfk, e2jEJDfm) * e2jEJDGK.
Variable label e2jejdev '76.k. letjradk ves jvedelem'.

fre e2jfomev to e2jejdev.


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

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

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

Compute e2jFOM92 = 0.
Compute e2jTAP92 = 0.
Compute e2jTUL92 = 0.
Compute e2jETK92 = 0.
Compute e2jGKH92 = 0.
Compute e2jUTH92 = 0.
Compute e2jLAH92 = 0.
Compute e2jEGH92 = 0.
Compute e2jMUN92 = 0.
Compute e2jMUS92 = 0.
Compute e2jATK92 = 0.
Compute e2jost92 = 0.
Compute e2jGYE92 = 0.
Compute e2jGYS92 = 0.
Compute e2jCSP92 = 0.
Compute e2jNYU92 = 0.
Compute e2jRNY92 = 0.
Compute e2jENY92 = 0.
Compute e2jSEG92 = 0.
Compute e2jNEG92 = 0.
Compute e2jTAR92 = 0.
Compute e2jEJD92 = 0.

If (e2jFOMAP = 1) e2jFOM92 = e2jFOMfk.
If (e2jTAPAP = 1) e2jTAP92 = e2jTAPfk.
If (e2jTULAP = 1) e2jTUL92 = e2jTULfk.
If (e2jETKAP = 1) e2jETK92 = e2jETKfk.
If (e2jGKHAP = 1) e2jGKH92 = e2jGKHfk.
If (e2jUTHAP = 1) e2jUTH92 = e2jUTHfk.
If (e2jLAHAP = 1) e2jLAH92 = e2jLAHfk.
If (e2jEGHAP = 1) e2jEGH92 = e2jEGHfk.
If (e2jMUNAP = 1) e2jMUN92 = e2jMUNfk.
If (e2jMUSAP = 1) e2jMUS92 = e2jMUSfk.

If (e2jATKAP = 1) e2jATK92 = e2jATKfk.
If (e2joszAP = 1) e2jost92 = e2joszfk.
If (e2jGYEAP = 1) e2jGYE92 = e2jGYEfk.
If (e2jGYSAP = 1) e2jGYS92 = e2jGYSfk.
If (e2jCSPAP = 1) e2jCSP92 = e2jCSPfk.
If (e2jNYUAP = 1) e2jNYU92 = e2jNYUfk.
If (e2jRNYAP = 1) e2jRNY92 = e2jRNYfk.
If (e2jENYAP = 1) e2jENY92 = e2jENYfk.
If (e2jSEGAP = 1) e2jSEG92 = e2jSEGfk.
If (e2jNEGAP = 1) e2jNEG92 = e2jNEGfk.
If (e2jTARAP = 1) e2jTAR92 = e2jTARfk.
If (e2jEJDAP = 1) e2jEJD92 = e2jEJDfk.



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

Compute e2jFOM93 = 0.
Compute e2jTAP93 = 0.
Compute e2jTUL93 = 0.
Compute e2jETK93 = 0.
Compute e2jGKH93 = 0.
Compute e2jUTH93 = 0.
Compute e2jLAH93 = 0.
Compute e2jEGH93 = 0.
Compute e2jMUN93 = 0.
Compute e2jMUS93 = 0.

Compute e2jATK93 = 0.
Compute e2jost93 = 0.
Compute e2jGYE93 = 0.
Compute e2jGYS93 = 0.
Compute e2jCSP93 = 0.
Compute e2jNYU93 = 0.
Compute e2jRNY93 = 0.
Compute e2jENY93 = 0.
Compute e2jSEG93 = 0.
Compute e2jNEG93 = 0.
Compute e2jTAR93 = 0.
Compute e2jEJD93 = 0.


If (e2jFOMMR = 1) e2jFOM93 = e2jFOMfm.
If (e2jTAPMR = 1) e2jTAP93 = e2jTAPfm.
If (e2jTULMR = 1) e2jTUL93 = e2jTULfm.
If (e2jETKMR = 1) e2jETK93 = e2jETKfm.
If (e2jGKHMR = 1) e2jGKH93 = e2jGKHfm.
If (e2jUTHMR = 1) e2jUTH93 = e2jUTHfm.
If (e2jLAHMR = 1) e2jLAH93 = e2jLAHfm.
If (e2jEGHMR = 1) e2jEGH93 = e2jEGHfm.
If (e2jMUNMR = 1) e2jMUN93 = e2jMUNfm.
If (e2jMUSMR = 1) e2jMUS93 = e2jMUSfm.

If (e2jATKMR = 1) e2jATK93 = e2jATKfm.
If (e2joszMR = 1) e2jost93 = e2joszfm.
If (e2jGYEMR = 1) e2jGYE93 = e2jGYEfm.
If (e2jGYSMR = 1) e2jGYS93 = e2jGYSfm.
If (e2jCSPMR = 1) e2jCSP93 = e2jCSPfm.
If (e2jNYUMR = 1) e2jNYU93 = e2jNYUfm.
If (e2jRNYMR = 1) e2jRNY93 = e2jRNYfm.
If (e2jENYMR = 1) e2jENY93 = e2jENYfm.
If (e2jSEGMR = 1) e2jSEG93 = e2jSEGfm.
If (e2jNEGMR = 1) e2jNEG93 = e2jNEGfm.
If (e2jTARMR = 1) e2jTAR93 = e2jTARfm.
If (e2jEJDMR = 1) e2jEJD93 = e2jEJDfm.

*END OF QUESTION 76.
**********************************************************************.
*                        VARIABLE RECODE                             *.
*                    77 krds - Question 77                         *.
**********************************************************************.


Recode e2jKMUAP e2jKMUMA e2jKMUJU e2jKMUJL e2jKMUAU e2jKMUSZ
       e2jKMUOK e2jKMUNO e2jKMUDE e2jKMUJA e2jKMUFE e2jKMUMR
       e2jASMAP e2jASMMA e2jASMJU e2jASMJL e2jASMAU e2jASMSZ
       e2jASMOK e2jASMNO e2jASMDE e2jASMJA e2jASMFE e2jASMMR
       e2jAMGAP e2jAMGMA e2jAMGJU e2jAMGJL e2jAMGAU e2jAMGSZ
       e2jAMGOK e2jAMGNO e2jAMGDE e2jAMGJA e2jAMGFE e2jAMGMR
       e2jASZOK e2jASZNO e2jASZDE e2jASZJA e2jASZFE e2jASZMR
       e2jASZAP e2jASZMA e2jASZJU e2jASZJL e2jASZAU e2jASZSZ
       e2jAERAP e2jAERMA e2jAERJU e2jAERJL e2jAERAU e2jAERSZ
       e2jAEROK e2jAERNO e2jAERDE e2jAERJA e2jAERFE e2jAERMR
       e2jATAAP e2jATAMA e2jATAJU e2jATAJL e2jATAAU e2jATASZ
       e2jATAOK e2jATANO e2jATADE e2jATAJA e2jATAFE e2jATAMR
       e2jAFUAP e2jAFUMA e2jAFUJU e2jAFUJL e2jAFUAU e2jAFUSZ
       e2jAFUOK e2jAFUNO e2jAFUDE e2jAFUJA e2jAFUFE e2jAFUMR
       e2jKERAP e2jKERMA e2jKERJU e2jKERJL e2jKERAU e2jKERSZ
       e2jKEROK e2jKERNO e2jKERDE e2jKERJA e2jKERFE e2jKERMR
       e2jJUTAP e2jJUTMA e2jJUTJU e2jJUTJL e2jJUTAU e2jJUTSZ
       e2jJUTOK e2jJUTNO e2jJUTDE e2jJUTJA e2jJUTFE e2jJUTMR
       e2jBORAP e2jBORMA e2jBORJU e2jBORJL e2jBORAU e2jBORSZ
       e2jBOROK e2jBORNO e2jBORDE e2jBORJA e2jBORFE e2jBORMR
       e2jTAMAP e2jTAMMA e2jTAMJU e2jTAMJL e2jTAMAU e2jTAMSZ
       e2jTAMOK e2jTAMNO e2jTAMDE e2jTAMJA e2jTAMFE e2jTAMMR
       e2jELLAP e2jELLMA e2jELLJU e2jELLJL e2jELLAU e2jELLSZ
       e2jELLOK e2jELLNO e2jELLDE e2jELLJA e2jELLFE e2jELLMR
       e2jBIZAP e2jBIZMA e2jBIZJU e2jBIZJL e2jBIZAU e2jBIZSZ
       e2jBIZOK e2jBIZNO e2jBIZDE e2jBIZJA e2jBIZFE e2jBIZMR
       (SYSMIS, MISSING, .00, 0 = 0) (else=copy).

Recode e2jKMUSU e2jASMSU e2jAMGSU e2jASZSU e2jAERSU e2jATASU e2jAFUSU
       e2jKERSU e2jJUTSU e2jBORSU e2jTAMSU e2jELLSU e2jBIZSU
       (SYSMIS, MISSING, .00, 0 = 0) (else=copy).

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

Count e2jKMUGK = e2jKMUAP e2jKMUMA e2jKMUJU e2jKMUJL e2jKMUAU e2jKMUSZ
                 e2jKMUOK e2jKMUNO e2jKMUDE e2jKMUJA e2jKMUFE e2jKMUMR (1).
Variable Label e2jkmugk '77.k. rend. kmun. gyakorisga 92. pr. - 93. mrc.'.

Count e2jASMGK = e2jASMAP e2jASMMA e2jASMJU e2jASMJL e2jASMAU e2jASMSZ
                 e2jASMOK e2jASMNO e2jASMDE e2jASMJA e2jASMFE e2jASMMR (1).
Variable Label e2jasmgk '77.k. alk. kmun. gyakorisga 92. pr. - 93. mrc.'.

Count e2jAMGGK = e2jAMGAP e2jAMGMA e2jAMGJU e2jAMGJL e2jAMGAU e2jAMGSZ
                 e2jAMGOK e2jAMGNO e2jAMGDE e2jAMGJA e2jAMGFE e2jAMGMR (1).
Variable Label e2jamggk '77.k. alk. mezm. gyakorisga 92. pr. - 93. mrc.'.

Count e2jASZGK = e2jASZOK e2jASZNO e2jASZDE e2jASZJA e2jASZFE e2jASZMR
                 e2jASZAP e2jASZMA e2jASZJU e2jASZJL e2jASZAU e2jASZSZ (1).
Variable Label e2jaszgk '77.k. alk. szakm. gyakorisga 92. pr. - 93. mrc.'.

Count e2jAERGK = e2jAERAP e2jAERMA e2jAERJU e2jAERJL e2jAERAU e2jAERSZ
                 e2jAEROK e2jAERNO e2jAERDE e2jAERJA e2jAERFE e2jAERMR (1).
Variable Label e2jaergk '77.k. alk. szell. gyakorisga 92. pr. - 93. mrc.'.

Count e2jATAGK = e2jATAAP e2jATAMA e2jATAJU e2jATAJL e2jATAAU e2jATASZ
                 e2jATAOK e2jATANO e2jATADE e2jATAJA e2jATAFE e2jATAMR (1).
Variable Label e2jatagk '77.k. alk. takar. gyakorisga 92. pr. - 93. mrc.'.

Count e2jAFUGK = e2jAFUAP e2jAFUMA e2jAFUJU e2jAFUJL e2jAFUAU e2jAFUSZ
                 e2jAFUOK e2jAFUNO e2jAFUDE e2jAFUJA e2jAFUFE e2jAFUMR (1).
Variable Label e2jafugk '77.k. alk. szll. gyakorisga 92. pr. - 93. mrc.'.

Count e2jKERGK = e2jKERAP e2jKERMA e2jKERJU e2jKERJL e2jKERAU e2jKERSZ
                 e2jKEROK e2jKERNO e2jKERDE e2jKERJA e2jKERFE e2jKERMR (1).
Variable Label e2jkergk '77.k. keresked. gyakorisga 92. pr. - 93. mrc.'.

Count e2jJUTGK = e2jJUTAP e2jJUTMA e2jJUTJU e2jJUTJL e2jJUTAU e2jJUTSZ
                 e2jJUTOK e2jJUTNO e2jJUTDE e2jJUTJA e2jJUTFE e2jJUTMR (1).
Variable Label e2jjutgk '77.k. jutalk gyakorisga 92. pr. - 93. mrc.'.

Count e2jBORGK = e2jBORAP e2jBORMA e2jBORJU e2jBORJL e2jBORAU e2jBORSZ
                 e2jBOROK e2jBORNO e2jBORDE e2jBORJA e2jBORFE e2jBORMR (1).
Variable Label e2jborgk '77.k. borraval gyakorisga 92. pr. - 93. mrc.'.

Count e2jTAMGK = e2jTAMAP e2jTAMMA e2jTAMJU e2jTAMJL e2jTAMAU e2jTAMSZ
                 e2jTAMOK e2jTAMNO e2jTAMDE e2jTAMJA e2jTAMFE e2jTAMMR (1).
Variable Label e2jtamgk '77.k. pnz. tm. gyakorisga 92. pr. - 93. mrc.'.

Count e2jELLGK = e2jELLAP e2jELLMA e2jELLJU e2jELLJL e2jELLAU e2jELLSZ
                 e2jELLOK e2jELLNO e2jELLDE e2jELLJA e2jELLFE e2jELLMR (1).
Variable Label e2jellgk '77.k. ellts gyakorisga 92. pr. - 93. mrc.'.

Count e2jBIZGK = e2jBIZAP e2jBIZMA e2jBIZJU e2jBIZJL e2jBIZAU e2jBIZSZ
                 e2jBIZOK e2jBIZNO e2jBIZDE e2jBIZJA e2jBIZFE e2jBIZMR (1).
Variable Label e2jbizgk '77.k. biztost. gyakorisga 92. pr. - 93. mrc.'.



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

Compute e2jKULEV = e2jKMUSU.
Variable Label e2jkulev '66.1.k. rend. kmun. ves jvedelem'.

Compute e2jASMEV = e2jASMSU.
Variable Label e2jasmev '66.2.k. alk. kmun. ves jvedelem'.

Compute e2jAMGEV = e2jAMGSU.
Variable Label e2jamgev '66.3.k. alk. mezm. ves jvedelem'.

Compute e2jASZEV = e2jASZSU.
Variable Label e2jaszev '66.4.k. alk. szakm. ves jvedelem'.

Compute e2jAEREV = e2jAERSU.
Variable Label e2jaerev '66.5.k. alk. szell. ves jvedelem'.

Compute e2jATAEV = e2jATASU.
Variable Label e2jataev '66.6.k. alk. takar. ves jvedelem'.

Compute e2jAFUEV = e2jAFUSU.
Variable Label e2jafuev '66.7.k. alk. szll. ves jvedelem'.

Compute e2jKEREV = e2jKERSU.
Variable Label e2jkerev '66.8.k. keresked. ves jvedelem'.

Compute e2jJUTEV = e2jJUTSU.
Variable Label e2jjutev '66.9.k. jutalk ves jvedelem'.

Compute e2jBOREV = e2jBORSU.
Variable Label e2jborev '66.10.k. borraval ves jvedelem'.

Compute e2jTAMEV = e2jTAMSU.
Variable Label e2jtamev '66.11.k. pnz. tm. ves jvedelem'.

Compute e2jELLEV = e2jELLSU.
Variable Label e2jellev '66.12.k. egyb ellts ves jvedelem'.

Compute e2jBIZEV = e2jBIZSU.
Variable Label e2jbizev '66.13.k. biztostsbl ves jvedelem'.

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

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

Compute e2jkul92 = 0.
Compute e2jASM92 = 0.
Compute e2jAMG92 = 0.
Compute e2jASZ92 = 0.
Compute e2jAER92 = 0.
Compute e2jATA92 = 0.
Compute e2jAFU92 = 0.
Compute e2jKER92 = 0.
Compute e2jJUT92 = 0.
Compute e2jBOR92 = 0.
Compute e2jTAM92 = 0.
Compute e2jELL92 = 0.
Compute e2jBIZ92 = 0.

Compute e2jkul93 = 0.
Compute e2jASM93 = 0.
Compute e2jAMG93 = 0.
Compute e2jASZ93 = 0.
Compute e2jAER93 = 0.
Compute e2jATA93 = 0.
Compute e2jAFU93 = 0.
Compute e2jKER93 = 0.
Compute e2jJUT93 = 0.
Compute e2jBOR93 = 0.
Compute e2jTAM93 = 0.
Compute e2jELL93 = 0.
Compute e2jBIZ93 = 0.

If (e2jKMUAP = 1) e2jkul92 = e2jKULEV / e2jKMUGK.
If (e2jASMAP = 1) e2jASM92 = e2jASMEV / e2jASMGK.
If (e2jAMGAP = 1) e2jAMG92 = e2jAMGEV / e2jAMGGK.
If (e2jASZAP = 1) e2jASZ92 = e2jASZEV / e2jASZGK.
If (e2jAERAP = 1) e2jAER92 = e2jAEREV / e2jAERGK.
If (e2jATAAP = 1) e2jATA92 = e2jATAEV / e2jATAGK.
If (e2jAFUAP = 1) e2jAFU92 = e2jAFUEV / e2jAFUGK.
If (e2jKERAP = 1) e2jKER92 = e2jKEREV / e2jKERGK.
If (e2jJUTAP = 1) e2jJUT92 = e2jJUTEV / e2jJUTGK.
If (e2jBORAP = 1) e2jBOR92 = e2jBOREV / e2jBORGK.
If (e2jTAMAP = 1) e2jTAM92 = e2jTAMEV / e2jTAMGK.
If (e2jELLAP = 1) e2jELL92 = e2jELLEV / e2jELLGK.
If (e2jBIZAP = 1) e2jBIZ92 = e2jBIZEV / e2jBIZGK.

If (e2jKMUMR = 1) e2jkul93 = e2jKULEV / e2jKMUGK.
If (e2jASMMR = 1) e2jASM93 = e2jASMEV / e2jASMGK.
If (e2jAMGMR = 1) e2jAMG93 = e2jAMGEV / e2jAMGGK.
If (e2jASZMR = 1) e2jASZ93 = e2jASZEV / e2jASZGK.
If (e2jAERMR = 1) e2jAER93 = e2jAEREV / e2jAERGK.
If (e2jATAMR = 1) e2jATA93 = e2jATAEV / e2jATAGK.
If (e2jAFUMR = 1) e2jAFU93 = e2jAFUEV / e2jAFUGK.
If (e2jKERMR = 1) e2jKER93 = e2jKEREV / e2jKERGK.
If (e2jJUTMR = 1) e2jJUT93 = e2jJUTEV / e2jJUTGK.
If (e2jBORMR = 1) e2jBOR93 = e2jBOREV / e2jBORGK.
If (e2jTAMMR = 1) e2jTAM93 = e2jTAMEV / e2jTAMGK.
If (e2jELLMR = 1) e2jELL93 = e2jELLEV / e2jELLGK.
If (e2jBIZMR = 1) e2jBIZ93 = e2jBIZEV / e2jBIZGK.

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

* sszevont vltozk kpzse.
* Computation of Summary variables.

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


Compute e2jritev = e2jpremp + e2jnapip + e2jujitp + e2jegyp + e2fevegp.
Variable Label e2jritev 'ves ritka jvedelem'.

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

Compute e2jRIT92 = ((e2jRITEV / 12)*0.9).
Variable Label e2jrit92 'Ritka jvedelem 92 pr.'.

Compute e2jRIT93 = ((e2jRITEV / 12)*1.1).
Variable Label e2jrit93 'Ritka jvedelem 93 mrc.'.


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


Compute e2jnyeev = e2jvpenz + e2jvsump.
Variable Label e2jnyeev 'ves nyeresg s osztalk'.


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

Compute e2jnye92 = ((e2jnyeev / 12)*0.9).
Variable Label e2jnye92 'Nyeresg, osztalk 92 pr.'.

Compute e2jnye93 = ((e2jnyeev / 12)*1.1).
Variable Label e2jnye93 'Nyeresg, osztalk 93 mrc.'.

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

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

* Incomes from main job.

Compute e2jfmhev = e2jfomev + e2jtulev + e2jetkev + e2jgkhev + e2juthev +
                   e2jlahev + e2jeghev.
Variable Label e2jfmhev 'Fmunkahelyi ves jvedelem'.

* Incomes social insurance benefits.

Compute e2jtbev  = e2jtapev + e2jmunev + e2jgyeev + e2jgysev + e2jnyuev +
                   e2jrnyev + e2jenyev + e2jellev.
Variable Label e2jtbev 'Trsadalombizt. ves jvedelem'.

* Social incomes. 

Compute e2jszcev = e2jmusev + e2jatkev + e2jostev + e2jcspev + e2jsegev +
                   e2jnegev .
Variable Label e2jszcev 'Szocilis ves jvedelem'.

* Other transfers.

Compute e2jtraev = e2jtarev + e2jejdev + e2jtamev + e2jbizev.
Variable Label e2jtraev 'ves transzfer jvedelem'.

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

Compute e2jkmuev = e2jkulev + e2jasmev + e2jamgev + e2jaszev + e2jaerev +
                   e2jataev + e2jafuev + e2jkerev + e2jjutev + e2jborev.
Variable Label e2jkmuev 'ves kln jvedelem'.

* Total netto yearly personal income.

Compute e2joszev = e2jfmhev + e2jtbev  + e2jszcev + e2jtraev + e2jkmuev +
                   e2jnyeev + e2jritev.
Variable Label e2joszev 'VES SSZES SZEMLYES JVEDELEM (netto)'.


* Summary variables for april of 1992.
* Main job.
Compute e2jfmh92 = e2jfom92 + e2jtul92 + e2jetk92 + e2jgkh92 + e2juth92 + 
                   e2jlah92 + e2jegh92.
Variable Label e2jfmh92 'Fmunkahelyi jvedelem 92 pr.'.

* Social insurance.
Compute e2jtb92  = e2jtap92 + e2jmun92 + e2jgye92 + e2jgys92 + e2jnyu92 +
                   e2jrny92 + e2jeny92 + e2jell92.
Variable Label e2jtb92 'Trsadalombizt. jvedelem 92 pr.'.

* Social incomes.
Compute e2jszc92 = e2jmus92 + e2jatk92 + e2jost92 + e2jcsp92 + e2jseg92 + e2jneg92.

Variable Label e2jszc92 'Szocilis jvedelem 92 pr.'.

* Other transfers.
Compute e2jtra92 = e2jtar92 + e2jejd92 + e2jtam92 + e2jbiz92.
Variable Label e2jtra92 'Transzfer jvedelem 92 pr.'.

* Non-regular market incomes.
Compute e2jkmu92 = e2jkul92 + e2jasm92 + e2jamg92 + e2jasz92 + e2jaer92 + e2jata92 +
                   e2jafu92 + e2jker92 + e2jjut92 + e2jbor92.
Variable Label e2jkmu92 'Kln jvedelem 92 pr.'.

* Total netto personal income in april of 1992.
Compute e2josz92 = e2jfmh92 + e2jtb92 + e2jszc92 + e2jtra92 + e2jkmu92 +
                   e2jnye92 + e2jrit92.
Variable Label e2josz92 '92 pr. sszes szemlyes jvedelem (netto)'.


* Incomes in March of 1993.

Compute e2jfmh93 = e2jfom93 + e2jtul93 + e2jetk93 + e2jgkh93 + e2juth93 + 
                   e2jlah93 + e2jegh93.
Variable Label e2jfmh93 'Fmunkahelyi jvedelem 93 mrc.'.

Compute e2jtb93  = e2jtap93 + e2jmun93 + e2jgye93 + e2jgys93 + e2jnyu93 +
                   e2jrny93 + e2jeny93 + e2jell93.
Variable Label e2jtb93 'Trsadalombizt. jvedelem 93 mrc.'.

Compute e2jszc93 = e2jmus93 + e2jatk93 + e2jost93 + e2jcsp93 + 
                   e2jseg93 + e2jneg93.

Variable Label e2jszc93 'Szocilis jvedelem 93 mrc.'.

Compute e2jtra93 = e2jtar93 + e2jejd93 + e2jtam93 + e2jbiz93.
Variable Label e2jtra93 'Transzfer jvedelem 93 mrc.'.

Compute e2jkmu93 = e2jkul93 + e2jasm93 + e2jamg93 + e2jasz93 + e2jaer93 + e2jata93 +
                   e2jafu93 + e2jker93 + e2jjut93 + e2jbor93.
Variable Label e2jkmu93 'Kln jvedelem 93 mrc.'.

* Total netto personal income in March of 1993.

Compute e2josz93 = e2jfmh93 + e2jtb93 + e2jszc93 + e2jtra93 + e2jkmu93 +
                   e2jnye93 + e2jrit93.
Variable Label e2josz93 '93 mr. sszes szemlyes jvedelem (netto)'.

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

compute  jobecs93 = e2jobecs.
variable labels jobecs93 'Havi netto jvedelme (amit hazahoz)'.
execute.


compute xx=jobecs93-e2josz93.

formats xx (F9.0).
formats jobecs93 (F9.0).
formats e2JOSZ93 (F9.0).
formats eazon93 (F9.0).

temporary.
select IF (abs(xx) ge 50000 and e2kerdiv eq 1 and e2josz93 gt 0).
list eazon93 jobecs93 e2josz93 e2kerdiv xx.

compute jcheck1=0.
if (jobecs93 > e2josz93 and jobecs93 gt 0) jcheck1=1.
Variable label JCHECK1 'Szmitott vagy behelyettesitett jvedelem, 93 mrcius'.
VALUE LABEL JCHECK1 0 'SZMTOTT NAGYOBB' 1 'MONDOTT NAGYOBB'.
fre jcheck1.

Compute JCHECK2=0.
If (jobecs93 gt 0 and (e2josz92 eq 0 and e2joszev eq 0)) jcheck2=1.
Variable label JCHECK2 'Szmitott vagy behelyettesitett jvedelem, 92 prilis'.
fre jcheck2.

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

compute JCHECK4=0.
If (jobecs93=e2josz93) jcheck4=1.
var label jcheck4 'becsult havi jov. egyenlo-e szamitottal?'.
val label jcheck4 0 'nem egyenlo' 1 'egyenlo'.
fre jcheck4.

desc e2joszev e2josz92 e2josz93.

If (jobecs93 > e2josz93 and jobecs93 gt 0) e2josz93 = jobecs93.
If (jobecs93 gt 0 and (e2josz92 eq 0 and e2joszev eq 0)) e2josz92 = (jobecs93 * 0.9).
If (jobecs93 gt 0 and e2joszev eq 0) e2joszev= (Mean (e2josz92, e2josz93))*12.
desc e2joszev e2josz92 e2josz93.
 
*********************************************************************
* Income from employment.
Compute e2jovmv  = e2jfmhev + e2jritev.
Variable Label e2jovmv 'ves munkavllali jvedelem'.

* Incomes from enterprises.
Compute e2jval = e2jnyeev + e2jkmuev.
Variable Label e2jval 'ves vllalkozi jvedelem'.

* Social and private transfers (non-market incomes).
Compute e2jjar = e2jtbev + e2jszcev + e2jtraev.
Variable Label e2jjar '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 e2fmagan = e2ffogvi.
Formats e2fmagan (F1.0).
Variable Label e2fmagan 'Magnszektor vagy sem'.
Value Label e2fmagan 1 'magn'
                     0 'nem magn'.
Recode e2fmagan (2, 4, 5 = 1) (else = 0).
If (e2ffogvi = 3 and e2fgform = 7) e2fmagan = 1.
If (e2fmagan = 1) e2jval = e2jval + e2jfomev + e2jritev.
If (e2fmagan = 1) e2jovmv = 0.

Formats e2jfomgk to e2jejdgk, e2jkmugk to e2jbizgk (F2.0).
Formats e2jfomev to e2jejdev, e2jkulev to e2jbizev
        e2jritev to e2jjar (F9.0).

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

sort cases by hazon93.
save outfile = 'C:\mhp jovedelemjavitas\adatok\93-as2.sav'
    /compressed.

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

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

sort cases by hazon93.

aggregate /outfile = 'C:\mhp jovedelemjavitas\adatok\hjov93.sav'
          /presorted
          /break = hazon93
          /h2jfomev = sum (e2jfomev)
          /h2jtapev = sum (e2jtapev)
          /h2jtulev = sum (e2jtulev)
          /h2jetkev = sum (e2jetkev)
          /h2jgkhev = sum (e2jgkhev)
          /h2juthev = sum (e2juthev)
          /h2jlahev = sum (e2jlahev)
          /h2jeghev = sum (e2jeghev)
          /h2jmunev = sum (e2jmunev)
          /h2jmusev = sum (e2jmusev)
          /h2jatkev = sum (e2jatkev)
          /h2jostev = sum (e2jostev)
          /h2jgyeev = sum (e2jgyeev)
          /h2jgysev = sum (e2jgysev)
          /h2jcspev = sum (e2jcspev)
          /h2jnyuev = sum (e2jnyuev)
          /h2jrnyev = sum (e2jrnyev)
          /h2jenyev = sum (e2jenyev)
          /h2jsegev = sum (e2jsegev)
          /h2jnegev = sum (e2jnegev)
          /h2jtarev = sum (e2jtarev)
          /h2jejdev = sum (e2jejdev)
          /h2jkulev = sum (e2jkulev)
          /h2jasmev = sum (e2jasmev)
          /h2jamgev = sum (e2jamgev)
          /h2jaszev = sum (e2jaszev)
          /h2jaerev = sum (e2jaerev)
          /h2jataev = sum (e2jataev)
          /h2jafuev = sum (e2jafuev)
          /h2jkerev = sum (e2jkerev)
          /h2jjutev = sum (e2jjutev)
          /h2jborev = sum (e2jborev)
          /h2jtamev = sum (e2jtamev)
          /h2jellev = sum (e2jellev)
          /h2jbizev = sum (e2jbizev)
          /h2jfmhev = sum (e2jfmhev)
          /h2jtbev  = sum (e2jtbev )
          /h2jszcev = sum (e2jszcev)
          /h2jtraev = sum (e2jtraev)
          /h2jkmuev = sum (e2jkmuev)
          /h2jritev = sum (e2jritev)
          /h2jnyeev = sum (e2jnyeev)
          /h2joszev = sum (e2joszev)
          /h2jfom92 = sum (e2jfom92)
          /h2jtap92 = sum (e2jtap92)
          /h2jtul92 = sum (e2jtul92)
          /h2jetk92 = sum (e2jetk92)
          /h2jgkh92 = sum (e2jgkh92)
          /h2juth92 = sum (e2juth92)
          /h2jlah92 = sum (e2jlah92)
          /h2jegh92 = sum (e2jegh92)
          /h2jmun92 = sum (e2jmun92)
          /h2jmus92 = sum (e2jmus92)
          /h2jatk92 = sum (e2jatk92)
          /h2jost92 = sum (e2jost92)
          /h2jgye92 = sum (e2jgye92)
          /h2jgys92 = sum (e2jgys92)
          /h2jcsp92 = sum (e2jcsp92)
          /h2jnyu92 = sum (e2jnyu92)
          /h2jrny92 = sum (e2jrny92)
          /h2jeny92 = sum (e2jeny92)
          /h2jseg92 = sum (e2jseg92)
          /h2jneg92 = sum (e2jneg92)
          /h2jtar92 = sum (e2jtar92)
          /h2jejd92 = sum (e2jejd92)
          /h2jkul92 = sum (e2jkul92)
          /h2jasm92 = sum (e2jasm92)
          /h2jamg92 = sum (e2jamg92)
          /h2jasz92 = sum (e2jasz92)
          /h2jaer92 = sum (e2jaer92)
          /h2jata92 = sum (e2jata92)
          /h2jafu92 = sum (e2jafu92)
          /h2jker92 = sum (e2jker92)
          /h2jjut92 = sum (e2jjut92)
          /h2jbor92 = sum (e2jbor92)
          /h2jtam92 = sum (e2jtam92)
          /h2jell92 = sum (e2jell92)
          /h2jbiz92 = sum (e2jbiz92)
          /h2jrit92 = sum (e2jrit92)
          /h2jnye92 = sum (e2jnye92)
          /h2jfmh92 = sum (e2jfmh92)
          /h2jtb92  = sum (e2jtb92 )
          /h2jszc92 = sum (e2jszc92)
          /h2jtra92 = sum (e2jtra92)
          /h2jkmu92 = sum (e2jkmu92)
          /h2josz92 = sum (e2josz92)
          /h2jfom93 = sum (e2jfom93)
          /h2jtap93 = sum (e2jtap93)
          /h2jtul93 = sum (e2jtul93)
          /h2jetk93 = sum (e2jetk93)
          /h2jgkh93 = sum (e2jgkh93)
          /h2juth93 = sum (e2juth93)
          /h2jlah93 = sum (e2jlah93)
          /h2jegh93 = sum (e2jegh93)
          /h2jmun93 = sum (e2jmun93)
          /h2jmus93 = sum (e2jmus93)
          /h2jatk93 = sum (e2jatk93)
          /h2jost93 = sum (e2jost93)
          /h2jgye93 = sum (e2jgye93)
          /h2jgys93 = sum (e2jgys93)
          /h2jcsp93 = sum (e2jcsp93)
          /h2jnyu93 = sum (e2jnyu93)
          /h2jrny93 = sum (e2jrny93)
          /h2jeny93 = sum (e2jeny93)
          /h2jseg93 = sum (e2jseg93)
          /h2jneg93 = sum (e2jneg93)
          /h2jtar93 = sum (e2jtar93)
          /h2jejd93 = sum (e2jejd93)
          /h2jkul93 = sum (e2jkul93)
          /h2jasm93 = sum (e2jasm93)
          /h2jamg93 = sum (e2jamg93)
          /h2jasz93 = sum (e2jasz93)
          /h2jaer93 = sum (e2jaer93)
          /h2jata93 = sum (e2jata93)
          /h2jafu93 = sum (e2jafu93)
          /h2jker93 = sum (e2jker93)
          /h2jjut93 = sum (e2jjut93)
          /h2jbor93 = sum (e2jbor93)
          /h2jtam93 = sum (e2jtam93)
          /h2jell93 = sum (e2jell93)
          /h2jbiz93 = sum (e2jbiz93)
          /h2jrit93 = sum (e2jrit93)
          /h2jnye93 = sum (e2jnye93)
          /h2jfmh93 = sum (e2jfmh93)
          /h2jtb93  = sum (e2jtb93 )
          /h2jszc93 = sum (e2jszc93)
          /h2jtra93 = sum (e2jtra93)
          /h2jkmu93 = sum (e2jkmu93)
          /h2josz93 = sum (e2josz93)
          /h2jovmv  = sum (e2jovmv)
          /h2jval   = sum (e2jval)
          /h2jjar   = sum (e2jjar)
          /h2n      = 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\93-as2.sav'
            /table = 'C:\mhp jovedelemjavitas\adatok\hjov93.sav'
            /by hazon93.
Execute.

variable labels  h2jfomev '76.k. flls, ves jvedelem'
                /h2jtapev '76.k. tppnz, ves jvedelem'
                /h2jtulev '76.k. tlra, ves jvedelem'
                /h2jetkev '76.k. tkezsi hj, ves jvedelem'
                /h2jgkhev '76.k. gpkocsi hj, ves jvedelem'
                /h2juthev '76.k. utazsi hj, ves jvedelem'
                /h2jlahev '76.k. laks hj, ves jvedelem'
                /h2jeghev '76.k. egyb hj, ves jvedelem'
                /h2jmunev '76.k. munkanlkli j, ves jvedelem'
                /h2jmusev '76.k. munk jv.potl tmogats, ves jvedelem'
                /h2jatkev '76.k. tkpzsi tmogats, ves jvedelem'
                /h2jostev '76.k. sztndj, ves jvedelem'
                /h2jgyeev '76.k. GYED, ves jvedelem'
                /h2jgysev '76.k. GYES, ves jvedelem'
                /h2jcspev '76.k. csaldi ptlk, ves jvedelem'
                /h2jnyuev '76.k. regsgi nyugdj, ves jvedelem'
                /h2jrnyev '76.k. rokkant nyugdj, ves jvedelem'
                /h2jenyev '76.k. egyb nyugdj, ves jvedelem'
                /h2jsegev '76.k. rendszeres szocilis seg, ves jvedelem'
                /h2jnegev '76.k. rendkvli szocilis seg, ves jvedelem'
                /h2jtarev '76.k. tartsdj, ves jvedelem'
                /h2jejdev '76.k. ltejradk, ves jvedelem'
                /h2jkulev '76.k. rendszeres klnmunka, ves jvedelem'
                /h2jasmev '76.k. alkalmi segdmunka, ves jvedelem'
                /h2jamgev '76.k. alkalmi mezgazdi munka, ves jvedelem'
                /h2jaszev '76.k. alkalmi szakmunka, ves jvedelem'
                /h2jaerev '76.k. alkalmi szellemi munka, ves jvedelem'
                /h2jataev '76.k. takarts, gyermekrzs, ves jvedelem'
                /h2jafuev '76.k. fuvarozs, ves jvedelem'
                /h2jkerev '76.k. kereskedelem, ves jvedelem'
                /h2jjutev '76.k. jutalk, ves jvedelem'
                /h2jborev '76.k. borraval, ves jvedelem'
                /h2jtamev '76.k. pnzbeni tmogats, ves jvedelem'
                /h2jellev '76.k. egyb ellts, ves jvedelem'
                /h2jbizev '76.k. egyb biztosts, ves jvedelem'
                /h2jfmhev 'sszes fmunkahelyhez kapcs. ves jvedelem'
                /h2jtbev  'sszes trsadalombiztostsi ves jvedelem'
                /h2jszcev 'sszes szocilis, ves jvedelem'
                /h2jtraev 'sszes transzfer, ves jvedelem'
                /h2jkmuev 'sszes klnmunka, ves jvedelem '
                /h2jritev 'sszes ritka jvedelem, ves'
                /h2jnyeev 'sszes vllalkozi jvedelem, ves'
                /h2joszev 'sszes szemlyes jvedelem, ves'
                /h2jfom92 'flls jved., 92 prilis'
                /h2jtap92 'tppnz jved., 92 prilis'
                /h2jtul92 'tlra jved., 92 prilis'
                /h2jetk92 'tkezsi hozzjruls jved., 92 prilis'
                /h2jgkh92 'gpkocsi hozzjruls jved., 92 prilis'
                /h2juth92 'utazsi hozzjruls jved., 92 prilis'
                /h2jlah92 'laks hozzjruls jved., 92 prilis'
                /h2jegh92 'egyb hozzjruls jved., 92 prilis'
                /h2jmun92 'munkanlkli jradk jved., 92 prilis'
                /h2jmus92 'munk jv.potl tmogats jved., 92 prilis'
                /h2jatk92 'tkpzsi tmogats jved., 92 prilis'
                /h2jost92 'sztndj jved., 92 prilis'
                /h2jgye92 'GYED jved., 92 prilis'
                /h2jgys92 'GYES jved., 92 prilis'
                /h2jcsp92 'csaldi ptlk jved., 92 prilis'
                /h2jnyu92 'regsgi nyugdj jved., 92 prilis'
                /h2jrny92 'rokkant nyugdj jved., 92 prilis'
                /h2jeny92 'egyb nyugdj jved., 92 prilis'
                /h2jseg92 'rendszeres szocilis seg jved., 92 prilis'
                /h2jneg92 'rendkvli szocilis seg jved., 92 prilis'
                /h2jtar92 'tartsdj jved., 92 prilis'
                /h2jejd92 'ltejradk jved., 92 prilis'
                /h2jkul92 '76.k. rendszeres klnmunka, 92 prilis'
                /h2jasm92 '76.k. alkalmi segdmunka, 92 prilis'
                /h2jamg92 '76.k. alkalmi mezgazdi munka, 92 prilis'
                /h2jasz92 '76.k. alkalmi szakmunka, 92 prilis'
                /h2jaer92 '76.k. alkalmi szellemi munka, 92 prilis'
                /h2jata92 '76.k. takarts, gyermekrzs, 92 prilis'
                /h2jafu92 '76.k. fuvarozs, 92 prilis'
                /h2jker92 '76.k. kereskedelem, 92 prilis'
                /h2jjut92 '76.k. jutalk, 92 prilis'
                /h2jbor92 '76.k. borraval, 92 prilis'
                /h2jtam92 '76.k. pnzbeni tmogats, 92 prilis'
                /h2jell92 '76.k. egyb ellts, 92 prilis'
                /h2jbiz92 '76.k. egyb biztosts, 92 prilis'
                /h2jrit92 'sszes ritka jvedelem, 92 prilis'
                /h2jnye92 'sszes vllalkozi jvedelem, 92 prilis'
                /h2jfmh92 'sszes fmunkhelyhez kapcs. jved., 92 prilis'
                /h2jtb92  'sszes trsadalombizt. jved., 92 prilis'
                /h2jszc92 'sszes szocilis jved., 92 prilis'
                /h2jtra92 'sszes transzfer jved., 92 prilis'
                /h2jkmu92 'sszes klnmunka jved., 92 prilis'
                /h2josz92 'sszes szemlyes jvedelem, 92 prilis'
                /h2jfom93 'flls jved., 93 mrcius'
                /h2jtap93 'tppnz jved., 93 mrcius'
                /h2jtul93 'tlra jved., 93 mrcius'
                /h2jetk93 'tkezsi hozzjruls jved., 93 mrcius'
                /h2jgkh93 'gpkocsi hozzjruls jved., 93 mrcius'
                /h2juth93 'utazsi hozzjruls jved., 93 mrcius'
                /h2jlah93 'laks hozzjruls jved., 93 mrcius'
                /h2jegh93 'egyb hozzjruls jved., 93 mrcius'
                /h2jmun93 'munkanlkli jradk jved., 93 mrcius'
                /h2jmus93 'munk jv.potl tmogats jved., 93 mrcius'
                /h2jatk93 'tkpzsi tmogats jved., 93 mrcius'
                /h2jost93 'sztndj jved., 93 mrcius'
                /h2jgye93 'GYED jved., 93 mrcius'
                /h2jgys93 'GYES jved., 93 mrcius'
                /h2jcsp93 'csaldi ptlk jved., 93 mrcius'
                /h2jnyu93 'regsgi nyugdj jved., 93 mrcius'
                /h2jrny93 'rokkant nyugdj jved., 93 mrcius'
                /h2jeny93 'egyb nyugdj jved., 93 mrcius'
                /h2jseg93 'rendszeres szocilis seg jved., 93 mrcius'
                /h2jneg93 'rendkvli szocilis seg jved., 93 mrcius'
                /h2jtar93 'tartsdj jved., 93 mrcius'
                /h2jejd93 'ltejradk jved., 93 mrcius'
                /h2jkul93 '76.k. rendszeres klnmunka, 93 mrcius'
                /h2jasm93 '76.k. alkalmi segdmunka, 93 mrcius'
                /h2jamg93 '76.k. alkalmi mezgazdi munka, 93 mrcius'
                /h2jasz93 '76.k. alkalmi szakmunka, 93 mrcius'
                /h2jaer93 '76.k. alkalmi szellemi munka, 93 mrcius'
                /h2jata93 '76.k. takarts, gyermekrzs, 93 mrcius'
                /h2jafu93 '76.k. fuvarozs, 93 mrcius'
                /h2jker93 '76.k. kereskedelem, 93 mrcius'
                /h2jjut93 '76.k. jutalk, 93 mrcius'
                /h2jbor93 '76.k. borraval, 93 mrcius'
                /h2jtam93 '76.k. pnzbeni tmogats, 93 mrcius'
                /h2jell93 '76.k. egyb ellts, 93 mrcius'
                /h2jbiz93 '76.k. egyb biztosts, 93 mrcius'
                /h2jrit93 'sszes ritka jvedelem, 93 mrcius'
                /h2jnye93 'sszes vllalkozi jvedelem, 93 mrcius'
                /h2jfmh93 'sszes fmunkhelyhez kapcs. jved., 93 mrcius'
                /h2jtb93  'sszes trsadalombizt jved., 93 mrcius'
                /h2jszc93 'sszes szocilis jved., 93 mrcius'
                /h2jtra93 'sszes transzfer jved., 93 mrcius'
                /h2jkmu93 'sszes klnmunka jved., 93 mrcius'
                /h2josz93 'sszes szemlyes jvedelem, 93 mrcius'
                /h2jovmv  'sszes munkavllali jvedelem, ves'
                /h2jval   'sszes vllalkozi s kln jvedelem, ves'
                /h2jjar   'sszes transzfer jvedelem, ves'
                /h2n      'Hztartstagok szma'.

variable labels  e2jfomev '76.k. flls, ves jvedelem'
                /e2jtapev '76.k. tppnz, ves jvedelem'
                /e2jtulev '76.k. tlra, ves jvedelem'
                /e2jetkev '76.k. tkezsi hj, ves jvedelem'
                /e2jgkhev '76.k. gpkocsi hj, ves jvedelem'
                /e2juthev '76.k. utazsi hj, ves jvedelem'
                /e2jlahev '76.k. laks hj, ves jvedelem'
                /e2jeghev '76.k. egyb hj, ves jvedelem'
                /e2jmunev '76.k. munkanlkli j, ves jvedelem'
                /e2jmusev '76.k. munk jv.potl tmogats, ves jvedelem'
                /e2jatkev '76.k. tkpzsi tmogats, ves jvedelem'
                /e2jostev '76.k. sztndj, ves jvedelem'
                /e2jgyeev '76.k. GYED, ves jvedelem'
                /e2jgysev '76.k. GYES, ves jvedelem'
                /e2jcspev '76.k. csaldi ptlk, ves jvedelem'
                /e2jnyuev '76.k. regsgi nyugdj, ves jvedelem'
                /e2jrnyev '76.k. rokkant nyugdj, ves jvedelem'
                /e2jenyev '76.k. egyb nyugdj, ves jvedelem'
                /e2jsegev '76.k. rendszeres szocilis seg, ves jvedelem'
                /e2jnegev '76.k. rendkvli szocilis seg, ves jvedelem'
                /e2jtarev '76.k. tartsdj, ves jvedelem'
                /e2jejdev '76.k. ltejradk, ves jvedelem'
                /e2jkulev '76.k. rendszeres klnmunka, ves jvedelem'
                /e2jasmev '76.k. alkalmi segdmunka, ves jvedelem'
                /e2jamgev '76.k. alkalmi mezgazdi munka, ves jvedelem'
                /e2jaszev '76.k. alkalmi szakmunka, ves jvedelem'
                /e2jaerev '76.k. alkalmi szellemi munka, ves jvedelem'
                /e2jataev '76.k. takarts, gyermekrzs, ves jvedelem'
                /e2jafuev '76.k. fuvarozs, ves jvedelem'
                /e2jkerev '76.k. kereskedelem, ves jvedelem'
                /e2jjutev '76.k. jutalk, ves jvedelem'
                /e2jborev '76.k. borraval, ves jvedelem'
                /e2jtamev '76.k. pnzbeni tmogats, ves jvedelem'
                /e2jellev '76.k. egyb ellts, ves jvedelem'
                /e2jbizev '76.k. egyb biztosts, ves jvedelem'
                /e2jfmhev 'sszes fmunkahelyhez kapcs. ves jvedelem'
                /e2jtbev  'sszes trsadalombiztostsi ves jvedelem'
                /e2jszcev 'sszes szocilis, ves jvedelem'
                /e2jtraev 'sszes transzfer, ves jvedelem'
                /e2jkmuev 'sszes klnmunka, ves jvedelem '
                /e2jritev 'sszes ritka jvedelem, ves'
                /e2jnyeev 'sszes vllalkozi jvedelem, ves'
                /e2joszev 'sszes szemlyes jvedelem, ves'
                /e2jfom92 'flls jved., 92 prilis'
                /e2jtap92 'tppnz jved., 92 prilis'
                /e2jtul92 'tlra jved., 92 prilis'
                /e2jetk92 'tkezsi hozzjruls jved., 92 prilis'
                /e2jgkh92 'gpkocsi hozzjruls jved., 92 prilis'
                /e2juth92 'utazsi hozzjruls jved., 92 prilis'
                /e2jlah92 'laks hozzjruls jved., 92 prilis'
                /e2jegh92 'egyb hozzjruls jved., 92 prilis'
                /e2jmun92 'munkanlkli jradk jved., 92 prilis'
                /e2jmus92 'munk jv.potl tmogats jved., 92 prilis'
                /e2jatk92 'tkpzsi tmogats jved., 92 prilis'
                /e2jost92 'sztndj jved., 92 prilis'
                /e2jgye92 'GYED jved., 92 prilis'
                /e2jgys92 'GYES jved., 92 prilis'
                /e2jcsp92 'csaldi ptlk jved., 92 prilis'
                /e2jnyu92 'regsgi nyugdj jved., 92 prilis'
                /e2jrny92 'rokkant nyugdj jved., 92 prilis'
                /e2jeny92 'egyb nyugdj jved., 92 prilis'
                /e2jseg92 'rendszeres szocilis seg jved., 92 prilis'
                /e2jneg92 'rendkvli szocilis seg jved., 92 prilis'
                /e2jtar92 'tartsdj jved., 92 prilis'
                /e2jejd92 'ltejradk jved., 92 prilis'
                /e2jkul92 '77.k. rendszeres klnmunka, 92 prilis'
                /e2jasm92 '77.k. alkalmi segdmunka, 92 prilis'
                /e2jamg92 '77.k. alkalmi mezgazdi munka, 92 prilis'
                /e2jasz92 '77.k. alkalmi szakmunka, 92 prilis'
                /e2jaer92 '77.k. alkalmi szellemi munka, 92 prilis'
                /e2jata92 '77.k. takarts, gyermekrzs, 92 prilis'
                /e2jafu92 '77.k. fuvarozs, 92 prilis'
                /e2jker92 '77.k. kereskedelem, 92 prilis'
                /e2jjut92 '77.k. jutalk, 92 prilis'
                /e2jbor92 '77.k. borraval, 92 prilis'
                /e2jtam92 '77.k. pnzbeni tmogats, 92 prilis'
                /e2jell92 '77.k. egyb ellts, 92 prilis'
                /e2jbiz92 '77.k. egyb biztosts, 92 prilis'
                /e2jrit92 'sszes ritka jvedelem, 92 prilis'
                /e2jnye92 'sszes vllalkozi jvedelem, 92 prilis'
                /e2jfmh92 'sszes fmunkhelyhez kapcs. jved., 92 prilis'
                /e2jtb92  'sszes trsadalombizt. jved., 92 prilis'
                /e2jszc92 'sszes szocilis jved., 92 prilis'
                /e2jtra92 'sszes transzfer jved., 92 prilis'
                /e2jkmu92 'sszes klnmunka jved., 92 prilis'
                /e2josz92 'sszes szemlyes jvedelem, 92 prilis'
                /e2jfom93 'flls jved., 93 mrcius'
                /e2jtap93 'tppnz jved., 93 mrcius'
                /e2jtul93 'tlra jved., 93 mrcius'
                /e2jetk93 'tkezsi hozzjruls jved., 93 mrcius'
                /e2jgkh93 'gpkocsi hozzjruls jved., 93 mrcius'
                /e2juth93 'utazsi hozzjruls jved., 93 mrcius'
                /e2jlah93 'laks hozzjruls jved., 93 mrcius'
                /e2jegh93 'egyb hozzjruls jved., 93 mrcius'
                /e2jmun93 'munkanlkli jradk jved., 93 mrcius'
                /e2jmus93 'munk jv.potl tmogats jved., 93 mrcius'
                /e2jost93 'sztndj jved., 93 mrcius'
                /e2jgye93 'GYED jved., 93 mrcius'
                /e2jgys93 'GYES jved., 93 mrcius'
                /e2jcsp93 'csaldi ptlk jved., 93 mrcius'
                /e2jnyu93 'regsgi nyugdj jved., 93 mrcius'
                /e2jrny93 'rokkant nyugdj jved., 93 mrcius'
                /e2jeny93 'egyb nyugdj jved., 93 mrcius'
                /e2jseg93 'rendszeres szocilis seg jved., 93 mrcius'
                /e2jneg93 'rendkvli szocilis seg jved., 93 mrcius'
                /e2jtar93 'tartsdj jved., 93 mrcius'
                /e2jejd93 'ltejradk jved., 93 mrcius'
                /e2jkul93 '76.k. rendszeres klnmunka, 93 mrcius'
                /e2jasm93 '76.k. alkalmi segdmunka, 93 mrcius'
                /e2jamg93 '76.k. alkalmi mezgazdi munka, 93 mrcius'
                /e2jasz93 '76.k. alkalmi szakmunka, 93 mrcius'
                /e2jaer93 '76.k. alkalmi szellemi munka, 93 mrcius'
                /e2jata93 '76.k. takarts, gyermekrzs, 93 mrcius'
                /e2jafu93 '76.k. fuvarozs, 93 mrcius'
                /e2jker93 '76.k. kereskedelem, 93 mrcius'
                /e2jjut93 '76.k. jutalk, 93 mrcius'
                /e2jbor93 '76.k. borraval, 93 mrcius'
                /e2jtam93 '76.k. pnzbeni tmogats, 93 mrcius'
                /e2jell93 '76.k. egyb ellts, 93 mrcius'
                /e2jbiz93 '76.k. egyb biztosts, 93 mrcius'
                /e2jrit93 'sszes ritka jvedelem, 93 mrcius'
                /e2jnye93 'sszes vllalkozi jvedelem, 93 mrcius'
                /e2jfmh93 'sszes fmunkhelyhez kapcs. jved., 93 mrcius'
                /e2jtb93  'sszes trsadalombizt jved., 93 mrcius'
                /e2jszc93 'sszes szocilis jved., 93 mrcius'
                /e2jtra93 'sszes transzfer jved., 93 mrcius'
                /e2jkmu93 'sszes klnmunka jved., 93 mrcius'
                /e2josz93 'sszes szemlyes jvedelem, 93 mrcius'
                /e2jval   'sszes vllalkozi s kln jvedelem, ves'
                /e2jjar   'sszes transzfer jvedelem, ves'.
 
execute.   
  
temporary.
select if (h2htsz93 = 1 and h2joszev ne e2joszev).
list eazon93 e2joszev h2joszev e2jfmhev h2jfmhev e2jtbev h2jtbev.

compute yy=h2n-h2htsz93.
temporary.
select if (yy ne 0).
list eazon93 h2n h2htsz93.

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

* Total household incomes BETWEEN APRIL OF 92 AND MARCH OF 93.
Compute h2jhztev = h2joszev + h2jovosz.
Variable Label h2jhztev 'HZTARTS VES SSZJVEDELME 92-93'.

* 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 92.

Compute h2jhzt92 = h2josz92 + ((h2jovosz /12)*0.9).
Variable Label h2jhzt92 'HZTARTS SSZJVEDELME 92 PRILISBAN'.

* Total household incomes IN mARCH OF 93.
Compute h2jhzt93 = h2josz93 + ((h2jovosz /12)*1.1).
Variable Label h2jhzt93 'HZTARTS SSZJVEDELME 93 MRCIUSBAN'.

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

COMPUTE h2jHPCEV = h2jHZTEV / h2htsz93.
VARIABLE LABEL h2jHPCEV 'egy fre jut ves hztarts jvedelem'.


* PER CAPITA HOUSEHOLD INCOMES IN APRIL OF 1992.

COMPUTE h2jHPC92 = h2jHZT92 / h2htsz93.
VARIABLE LABEL h2jHPC92 'egy fre jut hztarts jv. 92 prilis'.


* PER CAPITA HOUSEHOLD INCOMES IN MARCH OF 1993.

COMPUTE h2jHPC93 = h2jHZT93 / h2htsz93.
VARIABLE LABEL h2jHPC93 'egy fre jut hztarts jv. 93 mrcius'.

************************************************************************.
Formats h2jhztev to h2jhpc93 (F9.0).
Formats h2jfomev to h2jjar (f9.0).

temporary.
select if (e2htfovi=1).
desc h2jielad to h2jovosz.

temporary.
select if (e2kerdiv=1).
desc e2jfomev to e2fmagan.

temporary.
select if (e2htfovi=1).
desc h2jhztev to h2jhpc93.

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



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

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


Recode e2jFOMfk e2jFOMfm e2jTAPfk e2jTAPfm e2jTULfk e2jTULfm
       e2jETKfk e2jETKfm e2jGKHfk e2jGKHfm e2jUTHfk e2jUTHfm
       e2jLAHfk e2jLAHfm e2jEGHfk e2jEGHfm e2jMUNfk e2jMUNfm
       e2jMUSfk e2jMUSfm  
       e2jATKfk e2jATKfm e2joszfk e2joszfm e2jGYEfk e2jGYEfm
       e2jGYSfk e2jGYSfm e2jCSPfk e2jCSPfm e2jNYUfk e2jNYUfm
       e2jRNYfk e2jRNYfm e2jENYfk e2jENYfm e2jSEGfk e2jSEGfm
       e2jNEGfk e2jNEGfm e2jTARfk e2jTARfm e2jEJDfk e2jEJDfm
       jobecs93 e2jKMUSU e2jASMSU e2jAMGSU
       e2jASZSU e2jAERSU e2jATASU e2jAFUSU e2jKERSU e2jJUTSU 
       e2jBORSU e2jTAMSU e2jELLSU e2jBIZSU
       (SYSMIS, MISSING = -1) (.00, 0 = 0) (else=copy).

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

do if (e2kerdiv=2).
if (e2makbel lt 13 and e2jobecs le 0) e2jmiss = 1.
end if. 

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

if (h2jhztev=0 and e2jtamgk gt 0 and e2jtamsu le 0) e2jmiss=1. 

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

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

if (e2kerdiv = 2 and jobecs93 = -1) e2jmiss = 1.

* 1B, Nincs helyettest krdv.

if (rsel93=4 and jobecs93 = -1) e2jmiss = 1.


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

* alkalmazott.
if (e2makbel =  1 and e2jfomgk = 0 and jobecs93 < 1 
     and e2jtapmr ne 1) e2jmiss = 1.
if (e2makbel = 5 and e2joszev = 0 and e2jobecs < 1)
    e2jmiss = 1.

* nyugdijas.
if (e2makbel =  7 and e2jnyugk = 0 and jobecs93 < 1) 
    e2jmiss = 1.

* rokkant nyugdijas.
if (e2makbel =  8 and e2jrnygk = 0 and jobecs93 < 1)
    e2jmiss = 1.

* zvegyi nyugdijas.
if (e2makbel =  9 and e2jenygk = 0 and jobecs93 < 1)
    e2jmiss = 1.


* alkalmi munkbl l.

if (e2makbel =  6 and (e2jkmugk = 0  and
                       e2jasmgk = 0  and
                       e2jamggk = 0  and
                       e2jaszgk = 0  and
                       e2jaergk = 0  and
                       e2jatagk = 0  and
                       e2jafugk = 0  and
                       e2jkergk = 0  and
                       e2jjutgk = 0  and
                       e2jborgk = 0) and jobecs93 < 1) e2jmiss = 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 (e2jFOMgk gt 0 and (jobecs93 <  1 and e2jFOMfk = -1 and e2jFOMfm = -1))
     e2jmiss = 1.
* 2 sztndij.
 if (e2jostgk gt 0 and (jobecs93 <  1 and e2joszfk = -1 and e2joszfm = -1))
     e2jmiss = 1.
* 3 GYED.
 if (e2jGYEgk gt 0 and (jobecs93 <  1 and e2jGYEfk = -1 and e2jGYEfm = -1))
     e2jmiss = 1.
* 4 Nyugdij.
 if (e2jNYUgk gt 0 and (jobecs93 <  1 and e2jNYUfk = -1 and e2jNYUfm = -1))
     e2jmiss = 1.
* 5 Rokkant nyugdij.
 if (e2jRNYgk gt 0 and (jobecs93 <  1 and e2jRNYfk = -1 and e2jRNYfm = -1))
     e2jmiss = 1.
* 6 Egyb nyugdij.
 if (e2jENYgk gt 0 and (jobecs93 <  1 and e2jENYfk = -1 and e2jENYfm = -1))
     e2jmiss = 1.

* Zero incomes.

 if (e2jFOMgk gt 0 and (jobecs93 <  1 and e2jFOMfk = 0  and e2jFOMfm = 0 ))
     e2jmiss = 1.
 if (e2jostgk gt 0 and (jobecs93 <  1 and e2joszfk = 0  and e2joszfm = 0 ))
     e2jmiss = 1.
 if (e2jGYEgk gt 0 and (jobecs93 <  1 and e2jGYEfk = 0  and e2jGYEfm = 0 ))
     e2jmiss = 1.
 if (e2jNYUgk gt 0 and (jobecs93 <  1 and e2jNYUfk = 0  and e2jNYUfm = 0 ))
     e2jmiss = 1.
 if (e2jRNYgk gt 0 and (jobecs93 <  1 and e2jRNYfk = 0  and e2jRNYfm = 0 ))
     e2jmiss = 1.
 if (e2jENYgk gt 0 and (jobecs93 <  1 and e2jENYfk = 0  and e2jENYfm = 0 ))
     e2jmiss = 1.




 if (e2jkmugk gt 0 and (jobecs93 <  1 and e2jkmusu = -1)) e2jmiss = 1.
 if (e2jaszgk gt 0 and (jobecs93 <  1 and e2jaszsu = -1)) e2jmiss = 1.
 if (e2jaergk gt 0 and (jobecs93 <  1 and e2jaersu = -1)) e2jmiss = 1.
 if (e2jkergk gt 0 and (jobecs93 <  1 and e2jkersu = -1)) e2jmiss = 1.
 if (e2jjutgk gt 0 and (jobecs93 <  1 and e2jjutsu = -1)) e2jmiss = 1.
 if (e2jborgk gt 0 and (jobecs93 <  1 and e2jborsu = -1)) e2jmiss = 1.
 
 if (e2jkmugk gt 0 and (jobecs93 <  1 and e2jkmusu =  0)) e2jmiss = 1.
 if (e2jaszgk gt 0 and (jobecs93 <  1 and e2jaszsu =  0)) e2jmiss = 1.
 if (e2jaergk gt 0 and (jobecs93 <  1 and e2jaersu =  0)) e2jmiss = 1.
 if (e2jkergk gt 0 and (jobecs93 <  1 and e2jkersu =  0)) e2jmiss = 1.
 if (e2jjutgk gt 0 and (jobecs93 <  1 and e2jjutsu =  0)) e2jmiss = 1.
 if (e2jborgk gt 0 and (jobecs93 <  1 and e2jborsu =  0)) e2jmiss = 1.

 if (e2jvpenz = -1 and (jobecs93 <  1 and e2jvnyer gt 0
     and e2jvnyer ne 9)) e2jmiss = 1.
 if (e2jvsump = -1 and (jobecs93 <  1 and e2jvszam gt 0)) e2jmiss = 1.


***************************************************************.
sort cases by hazon93.
aggregate /outfile = 'C:\mhp jovedelemjavitas\adatok\hjmiss93.sav'
          /presorted
          /break = hazon93
          /h2jmiss=sum(e2jmiss).

Match files  file  = *
            /table = 'C:\mhp jovedelemjavitas\adatok\hjmiss93.sav'
            /by hazon93.
execute.
variable label h2jmiss 'hny f nem vlaszolt jvedelem krdsre'.

temporary.
select if (e2htfovi=1).
fre h2jmiss.

if (h2jmiss gt 0) h2jhztev = -1.
if (h2jmiss gt 0) h2joszev = -1.

if (h2jmiss gt 0) h2jhzt92 = -1.
if (h2jmiss gt 0) h2josz92 = -1.

if (h2jmiss gt 0) h2jhzt93 = -1.
if (h2jmiss gt 0) h2josz93 = -1.

if (h2jmiss gt 0) h2jhpcev = -1.
if (h2jmiss gt 0) h2jhpc92 = -1.
if (h2jmiss gt 0) h2jhpc93 = -1.

missing value h2jhztev h2jhzt92 h2jhzt93 h2jhpcev h2jhpc92 h2jhpc93
              h2joszev h2josz92 h2josz93 (-1).
value labels  h2jhztev h2jhzt92 h2jhzt93 h2jhpcev h2jhpc92 h2jhpc93
              h2joszev h2josz92 h2josz93 -1 'Vlaszmegtagad'.
execute.

if (e2jmiss gt 0) e2joszev = -1.
if (e2jmiss gt 0) e2josz92 = -1.
if (e2jmiss gt 0) e2josz93 = -1.

missing value e2joszev e2josz92 e2josz93 (-1).
value labels  e2joszev e2josz92 e2josz93  -1 'Vlaszmegtagad'.

execute.
sort cases by case.
save outfile = 'C:\mhp jovedelemjavitas\adatok\jovedelem93.sav'
    /compressed
    /drop=jcheck1 jcheck2 jcheck3 jcheck4
          xx yy h2n
    /keep=case h2jielad to h2jhpc93
          e2jmiss h2jmiss.

get file = 'c:\mhp jovedelemjavitas\adatok\93-as1.sav'
             /drop = h2jielad to h2jmiss.

sort cases by case. 
execute.

match file /file = * /in alpha
           /file = 'C:\mhp jovedelemjavitas\adatok\jovedelem93.sav'  /in beta
           /file = 'c:\mhp jovedelemjavitas\adatok\93-as1.sav' /in gamma
           /by case.
fre alpha beta gamma akttag93.

save outfile = 'c:\mhp jovedelemjavitas\adatok\PANEL93_010709.sav'
          /drop=alpha beta gamma /compressed.
execute.

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

temporary.
select if (e2htfovi=1).
desc h2jielad to h2jovosz.

temporary.
select if (e2kerdiv=1).
desc e2jfomev to e2jjar.

temporary.
select if (e2htfovi=1).
desc h2jfomev to h2jhpc93.

temporary.
select if (h2jhztev lt 60000).
list eazon93 h2jhztev e2jobecs e2jkerev h2joszev h2jseg1.





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.