Z:\to_server\website\mrdcl-learning.com\mrdcl_files\EPS-205\run2.stp
start data,
ds $q1=$11/1-3,
v='Yes;No;Maybe',
h='Whether buy\Yes;No;Maybe',
xt='Q1 Do you regularly buy Zingo?',
ds $q2=$12/1,2,
x='Yes;No',
xt='Q2 Have you seen advertising for Zingo?',
ds $q3=$13/1-5,
x='Very good;
Quite good;
Neither good nor poor;
Quite poor;
Very poor',
xt='Q3 How do you rate Zingo for taste?',
ds $q4=$14/1,2,
x='Yes;No',
xt='Whether like new can for Zingo?',
dm $q5=$15-18,
x='Supermarkets;
Cafes/restaurant;
Sports grounds;
Other places',
xt='Q5 Places where expect to buy Zingo',
ds $gender=$14/1,2,
x='Gender\Male;Female',
xt='Gender',
ds $age=$15/1-3,
x='Age\16-34;35-54;55+',
xt='Age',
dm $banner1=$gender,$q1,f,
h=$gender+$q1+'Empty<s>',
dm $banner2=$gender,$age,$q1,f,
h=$gender+$age+$q1+'Empty<s>',
dm $banner3=$age,$q1,f,
h=$age+$q1+'Empty<s>',
dm $banner4=$age,f,
h=$age+'Empty<s>',
finish data,
start tables,
t#1(f=dpr1)=$q1 * $banner4,
t#2=$q2 * $banner1,
dm $vq2=$q2/1,t,$q2/n1,
x='Q2 code 1;
Everyone;
Q2 not code 1',
t#3=$vq2 * $banner1,
vt='Q2 My table',
if $q2/1,t#4(f=clw5/rth)=$q3 * $banner3,
>>  Last few chars parsed were {$vq2*$banner1,vt='Q2 My table',if$q2/1,t#4(f=clw5/}
>>W 360 Format already set to this value
bt='All have seen advert',
finish tables,
