* -----------------------------------------------------------
*.
*
*.
* Anpassung an relative Pfade von Dr. Kajetan Hinner, 6/9/2003 *.
* *.
* Sie müssen hier nur die Pfade Ihres Systems eintragen
*.
define !pathin() "o:\soep\lehre\" !enddefine.
define !pathout() "u:\temp\" !enddefine.
* ----------------[ automatically pull HPFAD ]----------------- *.
get file = !pathin + 'hpfad.sav'.
* --------------[ balanced / unbalanced design ]--------------- *.
select if ( (ahnetto ge 1) or (bhnetto ge 1) or (chnetto ge 1) or
(dhnetto ge 1) or (ehnetto ge 1) or (fhnetto ge 1) or
(ghnetto ge 1) or (hhnetto ge 1) or (ihnetto ge 1) or
(jhnetto ge 1) or (khnetto ge 1) or (lhnetto ge 1) or
(mhnetto ge 1) or (nhnetto ge 1) or (ohnetto ge 1) or
(phnetto ge 1) or (qhnetto ge 1) or (rhnetto ge 1) ).
* ----------------------[ define sample ]---------------------- *.
select if ( (hsample eq 1) or (hsample eq 2) or (hsample eq 3) or
(hsample eq 4) or (hsample eq 5) or (hsample eq 6) ).
sort cases by hhnr hhnrakt.
save outfile = !pathout + 'hpfad.sav'.
* -----------------[ automatically pull hhrf ]----------------- *.
get file = !pathin + 'hhrf.sav'
/keep = hhnr hhnrakt hrgroup
ahhrf bhhrf chhrf dhhrf ehhrf fhhrf ghhrf hhhrf
ihhrf jhhrf khhrf lhhrf mhhrf nhhrf ohhrf phhrf
qhhrf rhhrf.
sort cases by hhnr hhnrakt.
save outfile = !pathout + 'hhrf.sav'.
* --------------[ automatically create hmaster ]--------------- *.
match files file = !pathout + 'hpfad.sav'
/table = !pathout + 'hhrf.sav'
/by hhnr hhnrakt.
sort cases by hhnr ahhnr.
save output = !pathout + 'hmaster.sav'.
* -------------------------( pull AH )------------------------- *.
get file = !pathin + 'ah.sav'
/keep = hhnr ahhnr
ah46.
sort cases by hhnr ahhnr.
save outfile = !pathout + 'ah.sav'.
* -----------------------( pull AHGEN )------------------------ *.
get file = !pathin + 'ahgen.sav'
/keep = hhnr ahhnr
atyphh1.
sort cases by hhnr ahhnr.
save outfile = !pathout + 'ahgen.sav'.
* -------------------------( pull BH )------------------------- *.
get file = !pathin + 'bh.sav'
/keep = hhnr bhhnr
bh39.
sort cases by hhnr bhhnr.
save outfile = !pathout + 'bh.sav'.
* -----------------------( pull BHGEN )------------------------ *.
get file = !pathin + 'bhgen.sav'
/keep = hhnr bhhnr
btyphh1.
sort cases by hhnr bhhnr.
save outfile = !pathout + 'bhgen.sav'.
* -------------------------( pull CH )------------------------- *.
get file = !pathin + 'ch.sav'
/keep = hhnr chhnr
ch51.
sort cases by hhnr chhnr.
save outfile = !pathout + 'ch.sav'.
* -----------------------( pull CHGEN )------------------------ *.
get file = !pathin + 'chgen.sav'
/keep = hhnr chhnr
ctyphh1.
sort cases by hhnr chhnr.
save outfile = !pathout + 'chgen.sav'.
* -------------------------( pull DH )------------------------- *.
get file = !pathin + 'dh.sav'
/keep = hhnr dhhnr
dh51.
sort cases by hhnr dhhnr.
save outfile = !pathout + 'dh.sav'.
* -----------------------( pull DHGEN )------------------------ *.
get file = !pathin + 'dhgen.sav'
/keep = hhnr dhhnr
dtyphh1.
sort cases by hhnr dhhnr.
save outfile = !pathout + 'dhgen.sav'.
* -------------------------( pull EH )------------------------- *.
get file = !pathin + 'eh.sav'
/keep = hhnr ehhnr
eh42.
sort cases by hhnr ehhnr.
save outfile = !pathout + 'eh.sav'.
* -----------------------( pull EHGEN )------------------------ *.
get file = !pathin + 'ehgen.sav'
/keep = hhnr ehhnr
etyphh1.
sort cases by hhnr ehhnr.
save outfile = !pathout + 'ehgen.sav'.
* -------------------------( pull FH )------------------------- *.
get file = !pathin + 'fh.sav'
/keep = hhnr fhhnr
fh42.
sort cases by hhnr fhhnr.
save outfile = !pathout + 'fh.sav'.
* -----------------------( pull FHGEN )------------------------ *.
get file = !pathin + 'fhgen.sav'
/keep = hhnr fhhnr
ftyphh1.
sort cases by hhnr fhhnr.
save outfile = !pathout + 'fhgen.sav'.
* -------------------------( pull GH )------------------------- *.
get file = !pathin + 'gh.sav'
/keep = hhnr ghhnr
gh42.
sort cases by hhnr ghhnr.
save outfile = !pathout + 'gh.sav'.
* -----------------------( pull GHGEN )------------------------ *.
get file = !pathin + 'ghgen.sav'
/keep = hhnr ghhnr
gtyphh1.
sort cases by hhnr ghhnr.
save outfile = !pathout + 'ghgen.sav'.
* -----------------------( pull GHOST )------------------------ *.
get file = !pathin + 'ghost.sav'
/keep = hhnr ghhnr
zh36.
sort cases by hhnr ghhnr.
save outfile = !pathout + 'ghost.sav'.
* -------------------------( pull HH )------------------------- *.
get file = !pathin + 'hh.sav'
/keep = hhnr hhhnr
hh48.
sort cases by hhnr hhhnr.
save outfile = !pathout + 'hh.sav'.
* -----------------------( pull HHGEN )------------------------ *.
get file = !pathin + 'hhgen.sav'
/keep = hhnr hhhnr
htyphh1.
sort cases by hhnr hhhnr.
save outfile = !pathout + 'hhgen.sav'.
* -------------------------( pull IH )------------------------- *.
get file = !pathin + 'ih.sav'
/keep = hhnr ihhnr
ih49.
sort cases by hhnr ihhnr.
save outfile = !pathout + 'ih.sav'.
* -----------------------( pull IHGEN )------------------------ *.
get file = !pathin + 'ihgen.sav'
/keep = hhnr ihhnr
ityphh1.
sort cases by hhnr ihhnr.
save outfile = !pathout + 'ihgen.sav'.
* -------------------------( pull JH )------------------------- *.
get file = !pathin + 'jh.sav'
/keep = hhnr jhhnr
jh49.
sort cases by hhnr jhhnr.
save outfile = !pathout + 'jh.sav'.
* -----------------------( pull JHGEN )------------------------ *.
get file = !pathin + 'jhgen.sav'
/keep = hhnr jhhnr
jtyphh1.
sort cases by hhnr jhhnr.
save outfile = !pathout + 'jhgen.sav'.
* -------------------------( pull KH )------------------------- *.
get file = !pathin + 'kh.sav'
/keep = hhnr khhnr
kh49.
sort cases by hhnr khhnr.
save outfile = !pathout + 'kh.sav'.
* -----------------------( pull KHGEN )------------------------ *.
get file = !pathin + 'khgen.sav'
/keep = hhnr khhnr
ktyphh1.
sort cases by hhnr khhnr.
save outfile = !pathout + 'khgen.sav'.
* -------------------------( pull LH )------------------------- *.
get file = !pathin + 'lh.sav'
/keep = hhnr lhhnr
lh50.
sort cases by hhnr lhhnr.
save outfile = !pathout + 'lh.sav'.
* -----------------------( pull LHGEN )------------------------ *.
get file = !pathin + 'lhgen.sav'
/keep = hhnr lhhnr
ltyphh1.
sort cases by hhnr lhhnr.
save outfile = !pathout + 'lhgen.sav'.
* -------------------------( pull MH )------------------------- *.
get file = !pathin + 'mh.sav'
/keep = hhnr mhhnr
mh50.
sort cases by hhnr mhhnr.
save outfile = !pathout + 'mh.sav'.
* -----------------------( pull MHGEN )------------------------ *.
get file = !pathin + 'mhgen.sav'
/keep = hhnr mhhnr
mtyphh1.
sort cases by hhnr mhhnr.
save outfile = !pathout + 'mhgen.sav'.
* -------------------------( pull NH )------------------------- *.
get file = !pathin + 'nh.sav'
/keep = hhnr nhhnr
nh50.
sort cases by hhnr nhhnr.
save outfile = !pathout + 'nh.sav'.
* -----------------------( pull NHGEN )------------------------ *.
get file = !pathin + 'nhgen.sav'
/keep = hhnr nhhnr
ntyphh1.
sort cases by hhnr nhhnr.
save outfile = !pathout + 'nhgen.sav'.
* -------------------------( pull OH )------------------------- *.
get file = !pathin + 'oh.sav'
/keep = hhnr ohhnr
oh50.
sort cases by hhnr ohhnr.
save outfile = !pathout + 'oh.sav'.
* -----------------------( pull OHGEN )------------------------ *.
get file = !pathin + 'ohgen.sav'
/keep = hhnr ohhnr
otyphh1.
sort cases by hhnr ohhnr.
save outfile = !pathout + 'ohgen.sav'.
* -------------------------( pull PH )------------------------- *.
get file = !pathin + 'ph.sav'
/keep = hhnr phhnr
ph50.
sort cases by hhnr phhnr.
save outfile = !pathout + 'ph.sav'.
* -----------------------( pull PHGEN )------------------------ *.
get file = !pathin + 'phgen.sav'
/keep = hhnr phhnr
ptyphh1.
sort cases by hhnr phhnr.
save outfile = !pathout + 'phgen.sav'.
* -------------------------( pull QH )------------------------- *.
get file = !pathin + 'qh.sav'
/keep = hhnr qhhnr
qh54.
sort cases by hhnr qhhnr.
save outfile = !pathout + 'qh.sav'.
* -----------------------( pull QHGEN )------------------------ *.
get file = !pathin + 'qhgen.sav'
/keep = hhnr qhhnr
qtyphh1.
sort cases by hhnr qhhnr.
save outfile = !pathout + 'qhgen.sav'.
* -------------------------( pull RH )------------------------- *.
get file = !pathin + 'rh.sav'
/keep = hhnr rhhnr
rh49.
sort cases by hhnr rhhnr.
save outfile = !pathout + 'rh.sav'.
* -----------------------( pull RHGEN )------------------------ *.
get file = !pathin + 'rhgen.sav'
/keep = hhnr rhhnr
rtyphh1.
sort cases by hhnr rhhnr.
save outfile = !pathout + 'rhgen.sav'.
************** Dr. K. Hinner
get file = !pathout + 'hpfad.sav'.
************** Dr. K. Hinner
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr ahhnr.
match files file = !pathout + 'hmaster.sav'
/table = !pathout + 'ah.sav'
/by hhnr ahhnr.
match files file = *
/table = !pathout + 'ahgen.sav'
/by hhnr ahhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr bhhnr.
match files file = *
/table = !pathout + 'bhgen.sav'
/by hhnr bhhnr.
match files file = *
/table = !pathout + 'bh.sav'
/by hhnr bhhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr chhnr.
match files file = *
/table = !pathout + 'ch.sav'
/by hhnr chhnr.
match files file = *
/table = !pathout + 'chgen.sav'
/by hhnr chhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr dhhnr.
match files file = *
/table = !pathout + 'dh.sav'
/by hhnr dhhnr.
match files file = *
/table = !pathout + 'dhgen.sav'
/by hhnr dhhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr ehhnr.
match files file = *
/table = !pathout + 'eh.sav'
/by hhnr ehhnr.
match files file = *
/table = !pathout + 'ehgen.sav'
/by hhnr ehhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr fhhnr.
match files file = *
/table = !pathout + 'fhgen.sav'
/by hhnr fhhnr.
match files file = *
/table = !pathout + 'fh.sav'
/by hhnr fhhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr ghhnr.
match files file = *
/table = !pathout + 'gh.sav'
/by hhnr ghhnr.
match files file = *
/table = !pathout + 'ghgen.sav'
/by hhnr ghhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr ghhnr.
match files file = *
/table = !pathout + 'ghost.sav'
/by hhnr ghhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr hhhnr.
match files file = *
/table = !pathout + 'hh.sav'
/by hhnr hhhnr.
match files file = *
/table = !pathout + 'hhgen.sav'
/by hhnr hhhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr ihhnr.
match files file = *
/table = !pathout + 'ih.sav'
/by hhnr ihhnr.
match files file = *
/table = !pathout + 'ihgen.sav'
/by hhnr ihhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr jhhnr.
match files file = *
/table = !pathout + 'jhgen.sav'
/by hhnr jhhnr.
match files file = *
/table = !pathout + 'jh.sav'
/by hhnr jhhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr khhnr.
match files file = *
/table = !pathout + 'kh.sav'
/by hhnr khhnr.
match files file = *
/table = !pathout + 'khgen.sav'
/by hhnr khhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr lhhnr.
match files file = *
/table = !pathout + 'lh.sav'
/by hhnr lhhnr.
match files file = *
/table = !pathout + 'lhgen.sav'
/by hhnr lhhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr mhhnr.
match files file = *
/table = !pathout + 'mh.sav'
/by hhnr mhhnr.
match files file = *
/table = !pathout + 'mhgen.sav'
/by hhnr mhhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr nhhnr.
match files file = *
/table = !pathout + 'nhgen.sav'
/by hhnr nhhnr.
match files file = *
/table = !pathout + 'nh.sav'
/by hhnr nhhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr ohhnr.
match files file = *
/table = !pathout + 'oh.sav'
/by hhnr ohhnr.
match files file = *
/table = !pathout + 'ohgen.sav'
/by hhnr ohhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr phhnr.
match files file = *
/table = !pathout + 'ph.sav'
/by hhnr phhnr.
match files file = *
/table = !pathout + 'phgen.sav'
/by hhnr phhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr qhhnr.
match files file = *
/table = !pathout + 'qh.sav'
/by hhnr qhhnr.
match files file = *
/table = !pathout + 'qhgen.sav'
/by hhnr qhhnr.
* ------------( merge together by household: Wave ------------- *.
sort cases by hhnr rhhnr.
match files file = *
/table = !pathout + 'rhgen.sav'
/by hhnr rhhnr.
match files file = *
/table = !pathout + 'rh.sav'
/by hhnr rhhnr.
* --------------------( save output file )--------------------- *.
file label "SOEPINFO: Magic at Work! http://www.diw.de/soep/ </jump.htm?goto=http://www.diw.de/soep/>".
save outfile = !pathout + 'new.sav'.
desc all.
* -----------------( discard temporary files )----------------- *.
erase file = !pathout + 'hpfad.sav'.
erase file = !pathout + 'hhrf.sav'.
erase file = !pathout + 'hmaster.sav'.
erase file = !pathout + 'ah.sav'.
erase file = !pathout + 'ahgen.sav'.
erase file = !pathout + 'bh.sav'.
erase file = !pathout + 'bhgen.sav'.
erase file = !pathout + 'ch.sav'.
erase file = !pathout + 'chgen.sav'.
erase file = !pathout + 'dh.sav'.
erase file = !pathout + 'dhgen.sav'.
erase file = !pathout + 'eh.sav'.
erase file = !pathout + 'ehgen.sav'.
erase file = !pathout + 'fh.sav'.
erase file = !pathout + 'fhgen.sav'.
erase file = !pathout + 'gh.sav'.
erase file = !pathout + 'ghgen.sav'.
erase file = !pathout + 'ghost.sav'.
erase file = !pathout + 'hh.sav'.
erase file = !pathout + 'hhgen.sav'.
erase file = !pathout + 'ih.sav'.
erase file = !pathout + 'ihgen.sav'.
erase file = !pathout + 'jh.sav'.
erase file = !pathout + 'jhgen.sav'.
erase file = !pathout + 'kh.sav'.
erase file = !pathout + 'khgen.sav'.
erase file = !pathout + 'lh.sav'.
erase file = !pathout + 'lhgen.sav'.
erase file = !pathout + 'mh.sav'.
erase file = !pathout + 'mhgen.sav'.
erase file = !pathout + 'nh.sav'.
erase file = !pathout + 'nhgen.sav'.
erase file = !pathout + 'oh.sav'.
erase file = !pathout + 'ohgen.sav'.
erase file = !pathout + 'ph.sav'.
erase file = !pathout + 'phgen.sav'.
erase file = !pathout + 'qh.sav'.
erase file = !pathout + 'qhgen.sav'.
erase file = !pathout + 'rh.sav'.
erase file = !pathout + 'rhgen.sav'.
finish.