háztartástipológia syntax 1994
Click here to get the file
Size
12.0 kB
-
File type
text/plain
File contents
* 94 hztarts sszettel .
GET FILE = 'd:\Panel99_CD_Elokeszulet\1994\1994.sav'
/keep
eazon94 h3htsz94 akttag94
h3bsor1 h3bnem1 h3bszu1 h3bcsl1 h3bht1x h3bgye1 h3btov1
h3bsor2 h3bnem2 h3bszu2 h3bcsl2 h3bht2 h3bgye2 h3btov2
h3bsor3 h3bnem3 h3bszu3 h3bcsl3 h3bht3 h3bgye3 h3btov3
h3bsor4 h3bnem4 h3bszu4 h3bcsl4 h3bht4 h3bgye4 h3btov4
h3bsor5 h3bnem5 h3bszu5 h3bcsl5 h3bht5 h3bgye5 h3btov5
h3bsor6 h3bnem6 h3bszu6 h3bcsl6 h3bht6 h3bgye6 h3btov6
h3bsor7 h3bnem7 h3bszu7 h3bcsl7 h3bht7 h3bgye7 h3btov7
h3bsor8 h3bnem8 h3bszu8 h3bcsl8 h3bht8 h3bgye8 h3btov8
h3bsor9 h3bnem9 h3bszu9 h3bcsl9 h3bht9 h3bgye9 h3btov9 .
select if (akttag94 = 1).
execute.
compute hsize94 = 0.
compute ht94 = 0.
compute hhage94 = 0.
compute hhage94a = 0.
compute h3bbaba = 0.
compute h3bbaba2 = 0.
compute h3bkor18 = 0.
format hsize94
ht94
hhage94
hhage94a
h3bbaba
h3bbaba2
h3bkor18 (f2.0).
* A hztartstagok kora .
Compute h3bkor1 = 94 - h3bszu1.
Compute h3bkor2 = 94 - h3bszu2.
Compute h3bkor3 = 94 - h3bszu3.
Compute h3bkor4 = 94 - h3bszu4.
Compute h3bkor5 = 94 - h3bszu5.
Compute h3bkor6 = 94 - h3bszu6.
Compute h3bkor7 = 94 - h3bszu7.
Compute h3bkor8 = 94 - h3bszu8.
Compute h3bkor9 = 94 - h3bszu9.
* Ujrakdoljuk a 18 v alatti gyermekeket .
If (h3bht1x eq 4 and h3bkor1 gt 18) h3bht1x = 9.
If (h3bht2 eq 4 and h3bkor2 gt 18) h3bht2 = 9.
If (h3bht3 eq 4 and h3bkor3 gt 18) h3bht3 = 9.
If (h3bht4 eq 4 and h3bkor4 gt 18) h3bht4 = 9.
If (h3bht5 eq 4 and h3bkor5 gt 18) h3bht5 = 9.
If (h3bht6 eq 4 and h3bkor6 gt 18) h3bht6 = 9.
If (h3bht7 eq 4 and h3bkor7 gt 18) h3bht7 = 9.
If (h3bht8 eq 4 and h3bkor8 gt 18) h3bht8 = 9.
If (h3bht9 eq 4 and h3bkor9 gt 18) h3bht9 = 9.
If ((h3bht1x eq 7 or h3bht1x eq 8) and h3bkor1 le 18) h3bht1x = 10.
If ((h3bht2 eq 7 or h3bht2 eq 8) and h3bkor2 le 18) h3bht2 = 10.
If ((h3bht3 eq 7 or h3bht3 eq 8) and h3bkor3 le 18) h3bht3 = 10.
If ((h3bht4 eq 7 or h3bht4 eq 8) and h3bkor4 le 18) h3bht4 = 10.
If ((h3bht5 eq 7 or h3bht5 eq 8) and h3bkor5 le 18) h3bht5 = 10.
If ((h3bht6 eq 7 or h3bht6 eq 8) and h3bkor6 le 18) h3bht6 = 10.
If ((h3bht7 eq 7 or h3bht7 eq 8) and h3bkor7 le 18) h3bht7 = 10.
If ((h3bht8 eq 7 or h3bht8 eq 8) and h3bkor8 le 18) h3bht8 = 10.
If ((h3bht9 eq 7 or h3bht9 eq 8) and h3bkor9 le 18) h3bht9 = 10.
* Megszmoljuk a hztarts tagokat .
Count c1 = h3bht1x h3BHT2 h3BHT3 h3BHT4 h3BHT5 h3BHT6 h3BHT7 h3BHT8 h3BHT9 (1).
Count c2 = h3bht1x h3BHT2 h3BHT3 h3BHT4 h3BHT5 h3BHT6 h3BHT7 h3BHT8 h3BHT9 (2).
Count c3 = h3bht1x h3BHT2 h3BHT3 h3BHT4 h3BHT5 h3BHT6 h3BHT7 h3BHT8 h3BHT9 (3).
Count c4 = h3bht1x h3BHT2 h3BHT3 h3BHT4 h3BHT5 h3BHT6 h3BHT7 h3BHT8 h3BHT9 (4).
Count c5 = h3bht1x h3BHT2 h3BHT3 h3BHT4 h3BHT5 h3BHT6 h3BHT7 h3BHT8 h3BHT9 (5).
Count c6 = h3bht1x h3BHT2 h3BHT3 h3BHT4 h3BHT5 h3BHT6 h3BHT7 h3BHT8 h3BHT9 (6).
Count c7 = h3bht1x h3BHT2 h3BHT3 h3BHT4 h3BHT5 h3BHT6 h3BHT7 h3BHT8 h3BHT9 (7).
Count c8 = h3bht1x h3BHT2 h3BHT3 h3BHT4 h3BHT5 h3BHT6 h3BHT7 h3BHT8 h3BHT9 (8).
Count c9 = h3bht1x h3BHT2 h3BHT3 h3BHT4 h3BHT5 h3BHT6 h3BHT7 h3BHT8 h3BHT9 (9).
Count c10 = h3bht1x h3BHT2 h3BHT3 h3BHT4 h3BHT5 h3BHT6 h3BHT7 h3BHT8 h3BHT9 (10).
* Hztarts nagysg .
* Count hsize94 = h3bht1x h3BHT2 h3BHT3 h3BHT4 h3BHT5 h3BHT6 h3BHT7 h3BHT8 h3BHT9
(1 thru 10).
compute hsize94 = h3htsz94.
* 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 ht94=0.
If (hsize94 gt 0) ht94=33.
If (hsize94 eq 1) ht94=1.
If (c23 eq 1 and hsize94 eq 2) ht94=2.
If (c23 ne 1 and hsize94 eq 2) ht94=3.
If (c23 eq 1 and c4 gt 0 and hsize94 eq c1234) ht94=4.
If (c23 eq 1 and c9 gt 0 and hsize94 eq c1239) ht94=5.
If (c23 eq 1 and c10 gt 0 and hsize94 eq c12310) ht94=6.
If (c23 eq 1 and c56 gt 0 and c4 gt 0 and hsize94 eq c123564) ht94=7.
If (c23 eq 1 and c56 gt 0 and c9 gt 0 and hsize94 eq c123569) ht94=8.
If (c23 eq 1 and c56 gt 0 and c10 gt 0 and hsize94 eq c1235610) ht94=9.
If (c23=1 and c5678>0 and c78>0 and c4>0 and hsize94=c1_8) ht94=10.
If (c23=1 and c5678>0 and c78>0 and c9>0 and hsize94=c1_9_4) ht94=11.
If (c23=1 and c5678>0 and c78>0 and c10>0 and hsize94=c1_10_49) ht94=12.
If (c4 gt 0 and hsize94 eq c14) ht94=13.
If (c9 gt 0 and hsize94 eq c19) ht94=14.
If (c10 gt 0 and hsize94 eq c110) ht94=15.
If (c4 gt 0 and c56 gt 0 and hsize94 eq c1564) ht94=16.
If (c9 gt 0 and c56 gt 0 and hsize94 eq c1569) ht94=17.
If (c10 gt 0 and c56 gt 0 and hsize94 eq c15610) ht94=18.
If (c4 gt 0 and c5678>0 and c78>0 and hsize94 eq c156784) ht94=19.
If (c9 gt 0 and c5678>0 and c78>0 and hsize94 eq c156789) ht94=20.
If (c10 gt 0 and c5678>0 and c78>0 and hsize94 eq c1567810) ht94=21.
If (c23 gt 0 and c56 eq 1 and hsize94 eq c12356) ht94=22.
If (c23 gt 0 and c5678>0 and c78>0 and hsize94 eq c1235678) ht94=23.
If (c56 gt 0 and hsize94 eq c156) ht94=24.
If (c5678 gt 0 and c78 gt 0 and hsize94 eq c15678) ht94=25.
If (c23 eq 1 and c49 eq 1 and hsize94=c12349) ht94=26.
If (c23 eq 1 and c410 eq 1 and hsize94=c123410) ht94=27.
If (c23 eq 1 and c910 eq 1 and hsize94=c123910) ht94=28.
If (c49 eq 1 and hsize94=c149) ht94=29.
If (c410 eq 1 and hsize94=c1410) ht94=30.
If (c910 eq 1 and hsize94=c1910) ht94=31.
If (ht94 eq 33 and (c4 gt 0 or c10 gt 0)) ht94=32.
Recode ht94 (0=sysmis).
* A 18 v alatti hztartstagok szma .
Count h3bkor18 = h3bkor1 h3bkor2 h3bkor3 h3bkor4 h3bkor5 h3bkor6 h3bkor7
h3bkor8 h3bkor9
(0 thru 18).
If (hsize94=0) h3bkor18=999.
Recode h3bkor18 (999=sysmis).
* A hztartsf kora .
If (h3bht1x = 1) hhage94a = h3bkor1.
If (h3bht2 = 1) hhage94a = h3bkor2.
If (h3bht3 = 1) hhage94a = h3bkor3.
If (h3bht4 = 1) hhage94a = h3bkor4.
If (h3bht5 = 1) hhage94a = h3bkor5.
If (h3bht6 = 1) hhage94a = h3bkor6.
If (h3bht7 = 1) hhage94a = h3bkor7.
If (h3bht8 = 1) hhage94a = h3bkor8.
If (h3bht9 = 1) hhage94a = h3bkor9.
If (hsize94=0) hhage94a=999.
Recode hhage94a (999=sysmis).
Recode hhage94a (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 hhage94.
* A legkisebb 16 v alatti hztartstag kora .
Compute h3bbaba2 = 999.
If (h3bkor1 le 16 and h3bkor1 lt h3bbaba2) h3bbaba2 = h3bkor1.
If (h3bkor2 le 16 and h3bkor2 lt h3bbaba2) h3bbaba2 = h3bkor2.
If (h3bkor3 le 16 and h3bkor3 lt h3bbaba2) h3bbaba2 = h3bkor3.
If (h3bkor4 le 16 and h3bkor4 lt h3bbaba2) h3bbaba2 = h3bkor4.
If (h3bkor5 le 16 and h3bkor5 lt h3bbaba2) h3bbaba2 = h3bkor5.
If (h3bkor6 le 16 and h3bkor6 lt h3bbaba2) h3bbaba2 = h3bkor6.
If (h3bkor7 le 16 and h3bkor7 lt h3bbaba2) h3bbaba2 = h3bkor7.
If (h3bkor8 le 16 and h3bkor8 lt h3bbaba2) h3bbaba2 = h3bkor8.
If (h3bkor9 le 16 and h3bkor9 lt h3bbaba2) h3bbaba2 = h3bkor9.
Recode h3bbaba2 (lo thru 3 = 1) ( 4 thru 6 = 2) (7 thru 9 = 3)
(10 thru 12 = 4) (13 thru 16 = 5) (else = 0) into H3BBABA.
If (hsize94=0) h3bbaba2 = 999.
Recode h3bbaba2 (999 = sysmis).
Recode hsize94 (0 = sysmis).
Variable Label hsize94 'Hztarts nagysg 94'
/ht94 'hztarts sszettel 1994'
/hhage94 'A hztartsf kora /14 kategria/'
/hhage94a 'A hztartsf kora /vek szma/'
/h3bbaba 'a legkisebb 16 alatti HT tag kora /5 kategria/'
/h3bbaba2 'a legkisebb 16 alatti HT tag kora /vek szma/'
/h3bkor18 'a 18 v alatti hztartstagok szma'.
Value Labels hhage94 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'
/h3bbaba 0 'nincs <16 ves gyerek'
1 '0 - 3 ves'
2 '4 - 6 ves'
3 '7 - 9 ves'
4 '10 - 12 ves'
5 '13 - 16 ves'
/ht94 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\1994\httip94.sav'
/Compressed
/Keep
eazon94 HSIZE94 HT94 H3BKOR18 HHAGE94 HHAGE94A H3BBABA H3BBABA2 .