title 'Test DO REPEAT control structure'.

set echo on.
data list file='list.data'/var00001 to var00005 1-5.
string s1 to s5(a8).
vector s=s1 to s5.
do repeat v=var1 to var5/r=region1 to region5/x=0 to 4
   /y=10 to 6/z='abcd',x'010203','alksdj'+'fklasdjfladsf','al''ksj','iouio'
   /longname=var00001 to var00005.
compute v=2**x.
compute v=x.
compute r=v.
compute longname=r.
compute s(x+1)=z.
end repeat print.
list.