Navigation
Log in


Forgot your password?
New user?
 
Document Actions

háztartástipológia syntax 1993

Click here to get the file

Size 14.3 kB - File type text/plain

File contents

* 93 hztarts sszettel .

GET FILE = 'd:\Panel99_CD_Elokeszulet\1993\1993.sav'
   /keep
 eazon93  h2htsz93 akttag93
 h2bsor1  h2bnem1  h2bszu1  h2bcsl1  h2bht1x  h2bgye1  h2btov1
 h2bsor2  h2bnem2  h2bszu2  h2bcsl2  h2bht2   h2bgye2  h2btov2
 h2bsor3  h2bnem3  h2bszu3  h2bcsl3  h2bht3   h2bgye3  h2btov3
 h2bsor4  h2bnem4  h2bszu4  h2bcsl4  h2bht4   h2bgye4  h2btov4
 h2bsor5  h2bnem5  h2bszu5  h2bcsl5  h2bht5   h2bgye5  h2btov5
 h2bsor6  h2bnem6  h2bszu6  h2bcsl6  h2bht6   h2bgye6  h2btov6
 h2bsor7  h2bnem7  h2bszu7  h2bcsl7  h2bht7   h2bgye7  h2btov7
 h2bsor8  h2bnem8  h2bszu8  h2bcsl8  h2bht8   h2bgye8  h2btov8
 h2bsor9  h2bnem9  h2bszu9  h2bcsl9  h2bht9   h2bgye9  h2btov9
 h2bsor10 h2bnem10 h2bszu10 h2bcsl10 h2bht10  h2bgye10 h2btov10
 h2bsor11 h2bnem11 h2bszu11 h2bcsl11 h2bht11  h2bgye11 h2btov11
 h2bsor12 h2bnem12 h2bszu12 h2bcsl12 h2bht12  h2bgye12 h2btov12
 h2bsor13 h2bnem13 h2bszu13 h2bcsl13 h2bht13  h2bgye13 h2btov13
 h2bsor14 h2bnem14 h2bszu14 h2bcsl14 h2bht14  h2bgye14 h2btov14 .

select if (akttag93 = 1).
execute.

compute hsize93  = 0.
compute ht93     = 0.
compute hhage93  = 0.
compute hhage93a = 0.
compute h2bbaba  = 0.
compute h2bbaba2 = 0.
compute h2bkor18 = 0.

format  hsize93 
        ht93    
        hhage93
        hhage93a
        h2bbaba
        h2bbaba2
        h2bkor18 (f2.0).

* A hztartstagok kora .

Compute h2bkor1  = 93 - h2bszu1.
Compute h2bkor2  = 93 - h2bszu2.
Compute h2bkor3  = 93 - h2bszu3.
Compute h2bkor4  = 93 - h2bszu4.
Compute h2bkor5  = 93 - h2bszu5.
Compute h2bkor6  = 93 - h2bszu6.
Compute h2bkor7  = 93 - h2bszu7.
Compute h2bkor8  = 93 - h2bszu8.
Compute h2bkor9  = 93 - h2bszu9.
Compute h2bkor10 = 93 - h2bszu10.
Compute h2bkor11 = 93 - h2bszu11.
Compute h2bkor12 = 93 - h2bszu12.
Compute h2bkor13 = 93 - h2bszu13.
Compute h2bkor14 = 93 - h2bszu14.

* Ujrakdoljuk a 18 v alatti gyermekeket .

If (h2bht1x eq 4 and h2bkor1  gt 18) h2bht1x = 9.
If (h2bht2  eq 4 and h2bkor2  gt 18) h2bht2  = 9.
If (h2bht3  eq 4 and h2bkor3  gt 18) h2bht3  = 9.
If (h2bht4  eq 4 and h2bkor4  gt 18) h2bht4  = 9.
If (h2bht5  eq 4 and h2bkor5  gt 18) h2bht5  = 9.
If (h2bht6  eq 4 and h2bkor6  gt 18) h2bht6  = 9.
If (h2bht7  eq 4 and h2bkor7  gt 18) h2bht7  = 9.
If (h2bht8  eq 4 and h2bkor8  gt 18) h2bht8  = 9.
If (h2bht9  eq 4 and h2bkor9  gt 18) h2bht9  = 9.
If (h2bht10 eq 4 and h2bkor10 gt 18) h2bht10 = 9.
If (h2bht11 eq 4 and h2bkor11 gt 18) h2bht11 = 9.
If (h2bht12 eq 4 and h2bkor12 gt 18) h2bht12 = 9.
If (h2bht13 eq 4 and h2bkor13 gt 18) h2bht13 = 9.
If (h2bht14 eq 4 and h2bkor14 gt 18) h2bht14 = 9.
If ((h2bht1x eq 7 or h2bht1x eq 8) and h2bkor1  le 18) h2bht1x = 10.
If ((h2bht2  eq 7 or h2bht2  eq 8) and h2bkor2  le 18) h2bht2  = 10.
If ((h2bht3  eq 7 or h2bht3  eq 8) and h2bkor3  le 18) h2bht3  = 10.
If ((h2bht4  eq 7 or h2bht4  eq 8) and h2bkor4  le 18) h2bht4  = 10.
If ((h2bht5  eq 7 or h2bht5  eq 8) and h2bkor5  le 18) h2bht5  = 10.
If ((h2bht6  eq 7 or h2bht6  eq 8) and h2bkor6  le 18) h2bht6  = 10.
If ((h2bht7  eq 7 or h2bht7  eq 8) and h2bkor7  le 18) h2bht7  = 10.
If ((h2bht8  eq 7 or h2bht8  eq 8) and h2bkor8  le 18) h2bht8  = 10.
If ((h2bht9  eq 7 or h2bht9  eq 8) and h2bkor9  le 18) h2bht9  = 10.
If ((h2bht10 eq 7 or h2bht10 eq 8) and h2bkor10 le 18) h2bht10 = 10.
If ((h2bht11 eq 7 or h2bht11 eq 8) and h2bkor11 le 18) h2bht11 = 10.
If ((h2bht12 eq 7 or h2bht12 eq 8) and h2bkor12 le 18) h2bht12 = 10.
If ((h2bht13 eq 7 or h2bht13 eq 8) and h2bkor13 le 18) h2bht13 = 10.
If ((h2bht14 eq 7 or h2bht14 eq 8) and h2bkor14 le 18) h2bht14 = 10.


* Megszmoljuk a hztarts tagokat .

Count c1  = H2BHT1x H2BHT2  H2BHT3  H2BHT4  H2BHT5  H2BHT6  H2BHT7
            H2BHT8  H2BHT9  H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (1).
Count c2  = H2BHT1x H2BHT2  H2BHT3  H2BHT4  H2BHT5  H2BHT6  H2BHT7
            H2BHT8  H2BHT9  H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (2).
Count c3  = H2BHT1x H2BHT2  H2BHT3  H2BHT4  H2BHT5  H2BHT6  H2BHT7
            H2BHT8  H2BHT9  H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (3).
Count c4  = H2BHT1x H2BHT2  H2BHT3  H2BHT4  H2BHT5  H2BHT6  H2BHT7
            H2BHT8  H2BHT9  H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (4).
Count c5  = H2BHT1x H2BHT2  H2BHT3  H2BHT4  H2BHT5  H2BHT6  H2BHT7
            H2BHT8  H2BHT9  H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (5).
Count c6  = H2BHT1x H2BHT2  H2BHT3  H2BHT4  H2BHT5  H2BHT6  H2BHT7
            H2BHT8  H2BHT9  H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (6).
Count c7  = H2BHT1x H2BHT2  H2BHT3  H2BHT4  H2BHT5  H2BHT6  H2BHT7
            H2BHT8  H2BHT9  H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (7).
Count c8  = H2BHT1x H2BHT2  H2BHT3  H2BHT4  H2BHT5  H2BHT6  H2BHT7
            H2BHT8  H2BHT9  H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (8).
Count c9  = H2BHT1x H2BHT2  H2BHT3  H2BHT4  H2BHT5  H2BHT6  H2BHT7
            H2BHT8  H2BHT9  H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (9).
Count c10 = H2BHT1x H2BHT2  H2BHT3  H2BHT4  H2BHT5  H2BHT6  H2BHT7
            H2BHT8  H2BHT9  H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (10).

* Hztarts nagysg .

* Count hsize93 = H2BHT1x H2BHT2  H2BHT3  H2BHT4  H2BHT5  H2BHT6  H2BHT7
                  H2BHT8  H2BHT9  H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 
                 (1 thru 10).
compute hsize93 = h2htsz93.


* Hztarts sszettel1: segdvltozk bevezetse .

Recode c1 to c10 (sysmis, missing, 0.00, 0=0).

Compute c23  = 0.
Compute c56  = 0.
Compute c49  = 0.
Compute c410 = 0.
Compute c910 = 0.
If (c2 eq 1 or c3 eq 1) c23=1.
If (c5 ge 1 or c6 ge 1) c56=1.

If (c4 gt 0 and c9 gt 0) c49=1.
If (c4 gt 0 and c10 gt 0) c410=1.
If (c9 gt 0 and c10 gt 0) c910=1.

Compute c78=c7+c8.
Compute c5678=c5+c6+c7+c8.
Compute c156=c1+c5+c6.
Compute c12356=c1+c2+c3+c5+c6.

Compute c14=c1+c4.
Compute c19=c1+c9.
Compute c110=c1+c10.
Compute c1234=c1+c2+c3+c4.
Compute c1239=c1+c2+c3+c9.
Compute c12310=c1+c2+c3+c10.
Compute c1564=c1+c5+c6+c4.
Compute c1569=c1+c5+c6+c9.
Compute c15610=c1+c5+c6+c10.
Compute c123564=c1+c2+c3+c5+c6+c4.
Compute c123569=c1+c2+c3+c5+c6+c9.
Compute c1235610=c1+c2+c3+c5+c6+c10.
Compute c156784=c1+c5+c6+c7+c8+c4.
Compute c156789=c1+c5+c6+c7+c8+c9.
Compute c1567810=c1+c5+c6+c7+c8+c10.
Compute c1_8=c1+c2+c3+c5+c6+c7+c8+c4.
Compute c1_9_4=c1+c2+c3+c5+c6+c7+c8+c9.
Compute c1_10_49=c1+c2+c3+c5+c6+c7+c8+c10.
Compute c15678=c1+c5+c6+c7+c8.
Compute c1235678=c1+c2+c3+c5+c6+c7+c8.

Compute c12349=c1+c2+c3+c4+c9.
Compute c123410=c1+c2+c3+c4+c10.
Compute c123910=c1+c2+c3+c9+c10.
Compute c149=c1+c4+c9.
Compute c1410=c1+c4+c10.
Compute c1910=c1+c9+c10.


* Hztarts sszettel2:hztartstpusok ltrehozsa .

Compute ht93=0.
If (hsize93 gt 0) ht93=33.
If (hsize93 eq 1) ht93=1.
If (c23 eq 1 and hsize93 eq 2) ht93=2.
If (c23 ne 1 and hsize93 eq 2) ht93=3.
If (c23 eq 1 and c4 gt 0 and hsize93 eq c1234) ht93=4.
If (c23 eq 1 and c9 gt 0 and hsize93 eq c1239) ht93=5.
If (c23 eq 1 and c10 gt 0 and hsize93 eq c12310) ht93=6.
If (c23 eq 1 and c56 gt 0 and c4 gt 0 and hsize93 eq c123564) ht93=7.
If (c23 eq 1 and c56 gt 0 and c9 gt 0 and hsize93 eq c123569) ht93=8.
If (c23 eq 1 and c56 gt 0 and c10 gt 0 and hsize93 eq c1235610) ht93=9.
If (c23=1 and c5678>0 and c78>0 and c4>0 and hsize93=c1_8) ht93=10.
If (c23=1 and c5678>0 and c78>0 and c9>0 and hsize93=c1_9_4) ht93=11.
If (c23=1 and c5678>0 and c78>0 and c10>0 and hsize93=c1_10_49) ht93=12.
If (c4 gt 0 and hsize93 eq c14) ht93=13.
If (c9 gt 0 and hsize93 eq c19) ht93=14.
If (c10 gt 0 and hsize93 eq c110) ht93=15.
If (c4 gt 0 and c56 gt 0 and hsize93 eq c1564) ht93=16.
If (c9 gt 0 and c56 gt 0 and hsize93 eq c1569) ht93=17.
If (c10 gt 0 and c56 gt 0 and hsize93 eq c15610) ht93=18.
If (c4 gt 0 and c5678>0 and c78>0 and hsize93 eq c156784) ht93=19.
If (c9 gt 0 and c5678>0 and c78>0 and hsize93 eq c156789) ht93=20.
If (c10 gt 0 and c5678>0 and c78>0 and hsize93 eq c1567810) ht93=21.
If (c23 gt 0 and c56 eq 1 and hsize93 eq c12356) ht93=22.
If (c23 gt 0 and c5678>0 and c78>0 and hsize93 eq c1235678) ht93=23.
If (c56 gt 0 and hsize93 eq c156) ht93=24.
If (c5678 gt 0 and c78 gt 0 and hsize93 eq c15678) ht93=25.
If (c23 eq 1 and c49 eq 1 and hsize93=c12349) ht93=26.
If (c23 eq 1 and c410 eq 1 and hsize93=c123410) ht93=27.
If (c23 eq 1 and c910 eq 1 and hsize93=c123910) ht93=28.
If (c49 eq 1 and hsize93=c149) ht93=29.
If (c410 eq 1 and hsize93=c1410) ht93=30.
If (c910 eq  1 and hsize93=c1910) ht93=31.
If (ht93 eq 33 and (c4 gt 0 or c10 gt 0))  ht93=32.

Recode ht93 (0=sysmis).


* A 18 v alatti hztartstagok szma .

Count h2bkor18 = h2bkor1 h2bkor2 h2bkor3  h2bkor4  h2bkor5  h2bkor6  h2bkor7
                 h2bkor8 h2bkor9 h2bkor10 h2bkor11 h2bkor12 h2bkor13 h2bkor14
                (0 thru 18).

If (hsize93=0) h2bkor18=999.
Recode h2bkor18 (999=sysmis).

* A hztartsf kora .

If (h2bht1x = 1) hhage93a = h2bkor1.
If (h2bht2  = 1) hhage93a = h2bkor2.
If (h2bht3  = 1) hhage93a = h2bkor3.
If (h2bht4  = 1) hhage93a = h2bkor4.
If (h2bht5  = 1) hhage93a = h2bkor5.
If (h2bht6  = 1) hhage93a = h2bkor6.
If (h2bht7  = 1) hhage93a = h2bkor7.
If (h2bht8  = 1) hhage93a = h2bkor8.
If (h2bht9  = 1) hhage93a = h2bkor9.
If (h2bht10 = 1) hhage93a = h2bkor10.
If (h2bht11 = 1) hhage93a = h2bkor11.
If (h2bht12 = 1) hhage93a = h2bkor12.
If (h2bht13 = 1) hhage93a = h2bkor13.
If (h2bht14 = 1) hhage93a = h2bkor14.

If (hsize93=0) hhage93a = 999.
Recode hhage93a (999=sysmis).
Recode hhage93a (lo thru 19 =  1) (20 thru 24 =  2) (25 thru 29 =  3)
                (30 thru 34 =  4) (35 thru 39 =  5) (40 thru 44 =  6)
                (45 thru 49 =  7) (50 thru 54 =  8) (55 thru 59 =  9)
                (60 thru 64 = 10) (65 thru 69 = 11) (70 thru 74 = 12)
                (75 thru 79 = 13) (80 thru hi = 14) 
                (else = sysmis) into hhage93.

* A legkisebb 16 v alatti hztartstag kora .

Compute h2bbaba2 = 999.
If (h2bkor1  le 16 and h2bkor1  lt h2bbaba2) h2bbaba2 = h2bkor1.
If (h2bkor2  le 16 and h2bkor2  lt h2bbaba2) h2bbaba2 = h2bkor2.
If (h2bkor3  le 16 and h2bkor3  lt h2bbaba2) h2bbaba2 = h2bkor3.
If (h2bkor4  le 16 and h2bkor4  lt h2bbaba2) h2bbaba2 = h2bkor4.
If (h2bkor5  le 16 and h2bkor5  lt h2bbaba2) h2bbaba2 = h2bkor5.
If (h2bkor6  le 16 and h2bkor6  lt h2bbaba2) h2bbaba2 = h2bkor6.
If (h2bkor7  le 16 and h2bkor7  lt h2bbaba2) h2bbaba2 = h2bkor7.
If (h2bkor8  le 16 and h2bkor8  lt h2bbaba2) h2bbaba2 = h2bkor8.
If (h2bkor9  le 16 and h2bkor9  lt h2bbaba2) h2bbaba2 = h2bkor9.
If (h2bkor10 le 16 and h2bkor10 lt h2bbaba2) h2bbaba2 = h2bkor10.
If (h2bkor11 le 16 and h2bkor11 lt h2bbaba2) h2bbaba2 = h2bkor11.
If (h2bkor12 le 16 and h2bkor12 lt h2bbaba2) h2bbaba2 = h2bkor12.
If (h2bkor13 le 16 and h2bkor13 lt h2bbaba2) h2bbaba2 = h2bkor13.
If (h2bkor14 le 16 and h2bkor14 lt h2bbaba2) h2bbaba2 = h2bkor14.

Recode h2bbaba2 (lo thru  3 = 1) ( 4 thru  6 = 2) ( 7 thru 9 = 3)
                (10 thru 12 = 4) (13 thru 16 = 5) (else = 0) into h2bbaba.

If (hsize93=0) h2bbaba2 = 999.
Recode h2bbaba2 (999 = sysmis).
Recode hsize93 (0 = sysmis).

Variable Label hsize93  'Hztarts nagysg 93'
              /ht93     'hztarts sszettel 1993'
              /hhage93  'A hztartsf kora /14 kategria/'
              /hhage93a 'A hztartsf kora /vek szma/'
              /h2bbaba  'a legkisebb 16 alatti HT tag kora /5 kategria/'
              /h2bbaba2 'a legkisebb 16 alatti HT tag kora /vek szma/'
              /h2bkor18 'a 18 v alatti hztartstagok szma'.

Value Labels  hhage93  1 '20 vesnl fiatalabb'
                       2 '20 - 24 ves'
                       3 '25 - 29 ves'
                       4 '30 - 34 ves'
                       5 '35 - 39 ves'
                       6 '40 - 44 ves'
                       7 '45 - 49 ves'
                       8 '50 - 54 ves'
                       9 '55 - 59 ves'
                      10 '60 - 64 ves'
                      11 '65 - 69 ves'
                      12 '70 - 74 ves'
                      13 '75 - 79 ves'
                      14 '80 ves vagy idsebb'
             /h2bbaba  1 '3 ves vagy fiatalabb'
                       2 '4 - 6 ves'
                       3 '7 - 9 ves'
                       4 '10 - 12 ves'
                       5 '13 - 16 ves'
                       0 'nincs 16 vnl fiatalabb'
             /ht93     1 'egyszemlyes hztarts'
                       2 'pr'
                       3 'ms ktszemlyes hztarts'
                       4 'pr+sajt gyermek<18'
                       5 'pr+sajt gyermek>18'
                       6 'pr+ms gyermek<18'
                       7 'pr+sajt gyermek<18+szl'
                       8 'pr+sajt gyermek>18+szl'
                       9 'pr+ms gyermek<18+szl'
                      10 'pr+sajt gyermek<18+ms felnttek(+szl)'
                      11 'pr+sajt gyermek>18+ms felnttek(+szl)'
                      12 'pr+ms gyermek<18+szl+ms rokonok'
                      13 'egyedlll szl+sajt gyermek<18'
                      14 'egyedlll szl+sajt gyermek>18'
                      15 'egyedlll szl+ms gyermek<18'
                      16 'egyedlll szl+sajt gyermek<18+szl'
                      17 'egyedlll szl+sajt gyermek>18+szl'
                      18 'egyedlll szl+ms gyermek<18+szl'
                      19 'egyedlll szl+sajt gyermek<18+ms felntt(+szl)'
                      20 'egyedlll szl+sajt gyermek>18+ms felntt(+szl)'
                      21 'egyedlll szl+ms gyermek<18+ms felntt(+szl)'
                      22 'pr+szls'
                      23 'pr+ms felnttek(+szls)'
                      24 'egyedlll szemly+szl'
                      25 'egyedlll szemly+ms rokonok'
                      26 'pr+sajt gyermek<18+sajt gyermek>18'
                      27 'pr+sajt gyermek<18+ms gyermek<18'
                      28 'pr+sajt gyermek>18+ms gyermek<18'
                      29 'egyedlll szl+sajt gyermek<18+sajt gyermek>18'
                      30 'egyedlll szl+sajt gyermek<18+ms gyermek<18'
                      31 'egyedlll szl+sajt gyermek>18+ms gyermek<18'
                      32 'egyb hztartsok gyermekkel<18'
                      33 'egyb hztartsok'.

Save Outfile = 'd:\Panel99_CD_Elokeszulet\1993\httip93.sav'
    /Compressed
    /Keep
     eazon93 HSIZE93  HT93     H2BKOR18 HHAGE93  HHAGE93A H2BBABA  H2BBABA2 .
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.