struct;read=0;reclen=36

/* Variable definition

int  Resort 99
data Resort_tother_1 40s
int  Tourco 9
data Tourco_tother_1 20s
data Reason 0s
int  Extras 9
int  Items 9
int  qCosttot 1
int  Skill 9
int  Ratings_t1 9
int  Ratings_t2 9
int  Ratings_t3 9
int  Ratings_t4 9
int  Ratings_t5 9
int  Ratings_t6 9
int  Ratings_other 9
data Ratings_tother_1 20s
int  Sex 9
int  Age 9

ed

/* Holecount and lists
*include hctlst.inc

/* Mapping data into variables

field Resort=c16:2
field Tourco=c18:1
field Extras=c19:1
field Items=c20,c23:1
qCosttot=c(24,26)
field Skill=c27:1
field Ratings_t1=c28:1
field Ratings_t2=c29:1
field Ratings_t3=c30:1
field Ratings_t4=c31:1
field Ratings_t5=c32:1
field Ratings_t6=c33:1
field Ratings_other=c34:1
field Sex=c35:1
field Age=c36:1

/* Data constructions (recoding)

end

*include cartea.inc

ttl#s150 

*include tabs.inc

l tot
*include base.inc

l Resort
ttlCan you tell me which resort you went to on your 1991/1992 ski holidays
*include base.inc
bit Resort
+Igls=1
+Soll=10
+Zellam Am See=11
+Val D'Isere=12
+Les Deux Alpes=13
+Tignes=14
+Cervinia=15
+Courmayeur=16
+Sauze D'Oulx=17
+Other=18
+Mayrhofen=2
+Ischgl=3
+Kirchberg=4
+Kitzbuhel=5
+Lermoos=6
+Niederau=7
+Obergurl=8
+Saalbach=9
*include fin.inc

l Resort_tother_1
ttlCan you tell me which resort you went to on your 1991/1992 ski holidays
*include base.inc

l Tourco
ttlWhich Tour company did you book with ? 
*include base.inc
bit Tourco
+Thomsons=1
+Horizon=2
+Enterprise=3
+Intasun=4
+Bladon Lines=5
+Global=6
+Other=7
*include fin.inc

l Tourco_tother_1
ttlWhich Tour company did you book with ? 
*include base.inc

l Reason
ttlWhy did you choose that particular company ? 
*include base.inc

l Extras
ttlDid you rent any extras (such as skis/poles, boot, lift pass etc) before you left on holiday ? 
*include base.inc
bit Extras
+Yes=1
+No=2
*include fin.inc

l Items
ttlWhich of these did you rent at home before leaving on your holiday ? 
*include base.inc
bit Items
+Skis/Poles=1
+Boots=2
+Ski school=3
+Lift pass=4
*include fin.inc

l qCosttot
ttlWhat was the total cost of your holiday ? Including flights, any prepaid accomodation, transfers and all extras whether rented at
ttlresort or at home plus all your expenditure while at the resort. Please make your best estimate
*include base.inc
n00;c=qCosttot.in.(1:999)
n01N.;op=1
n25;inc=qCosttot
n12Mean;dec=2
n17Std;dec=2

l Skill
ttlTell me which of these best describes your level of skiing
*include base.inc
bit Skill
+Beginner=1
+Intermediate=2
+Advanced=3
+Expert=4
*include fin.inc

*include Ratings.inc;name=Ratings_t1;atitle=;btitle=Thomsons

*include Ratings.inc;name=Ratings_t2;atitle=;btitle=Horizon

*include Ratings.inc;name=Ratings_t3;atitle=;btitle=Enterprise

*include Ratings.inc;name=Ratings_t4;atitle=;btitle=Intasun

*include Ratings.inc;name=Ratings_t5;atitle=;btitle=Bladon Lines

*include Ratings.inc;name=Ratings_t6;atitle=;btitle=Global

*include Ratings.inc;name=Ratings_other;atitle=;btitle=Other

l Ratings_tother_1
ttlTell us how good or bas you think each of these tour companies are at pre-holiday bookings ? 
*include base.inc

l Sex
ttlWhat is your sex ? 
*include base.inc
bit Sex
+Female=1
+Male=2
*include fin.inc

l Age
ttlWhat is your age ? 
*include base.inc
bit Age
+18-20=1
+21-24=2
+25-34=3
+35-44=4
+45-54=5
+55-64=6
+65+=7
*include fin.inc