clear
version 8.0
set more off
set mem 175m

cd p:\public\thaidata\ses90

log using readdata90.log, replace

infile using r1_90.dct if record==1
summ, sep(0)
desc
compress
sort region changwat commun block quarter hhno
save data\r1.dta, replace
clear

infile using r2_90.dct if record==2
summ, sep(0)
desc
compress
sort region changwat commun block quarter hhno b01
save data\r2.dta, replace
clear

infile using r3_90.dct if record==3
summ, sep(0)
desc
compress
sort region changwat commun block quarter hhno
save data\r3.dta, replace
clear

infile using r4_90.dct if record==4
summ, sep(0)
desc
compress
sort region changwat commun block quarter hhno
save data\r4.dta, replace
clear

infile using r5_90.dct if record==5
summ, sep(0)
desc
compress
sort region changwat commun block quarter hhno
save data\r5.dta, replace
clear

infile using r6_90.dct if record==6
summ, sep(0)
desc
compress
sort region changwat commun block quarter hhno
save data\r6.dta, replace
clear

infile using r7_90.dct if record==7
summ, sep(0)
desc
compress
sort region changwat commun block quarter hhno
save data\r7.dta, replace
clear

infile using r8_90.dct if record==8
summ, sep(0)
desc
compress
sort region changwat commun block quarter hhno
save data\r8.dta, replace
clear

infile using r9_90.dct if record==9
summ, sep(0)
desc
compress
sort region changwat commun block quarter hhno
save data\r9.dta, replace
clear

infile using r10_90.dct if record==10
summ, sep(0)
desc
compress
sort region changwat commun block quarter hhno
save data\r10.dta, replace
clear

infile using r11_90.dct if record==11
summ, sep(0)
desc
compress
sort region changwat commun block quarter hhno
save data\r11.dta, replace
clear

infile using r12_90.dct if record==12
summ, sep(0)
desc
compress
sort region changwat commun block quarter hhno
save data\r12.dta, replace
clear

log close