On Wed, 2 Feb 2011, Allin Cottrell wrote:
loop j=1973..2006
smpl $j:1 $j:12+1
list OKstocks = null
loop foreach i r_AEX_INDE..r_ZEELAND_
n = sum(ok($i))
if n == 13
OKstocks = OKstocks $i
endif
if nelem(OKstocks) > 0
store "/Documents/data/stocks_valid_$j.gdt" OKstocks
endif
endloop
endloop
Sorry, I messed that up, it should be
loop j=1973..2006
smpl $j:1 $j:12+1
list OKstocks = null
loop foreach i r_AEX_INDE..r_ZEELAND_
n = sum(ok($i))
if n == 13
OKstocks = OKstocks $i
endif
endloop
if nelem(OKstocks) > 0
store "/Documents/data/stocks_valid_$j.gdt" OKstocks
endif
endloop
Allin Cottrell