Is their anyway to reduce the size of this code?
Code: [Select]if EXIST data\level40.SAS (
set level=40
) else (
if EXIST data\level39.SAS (
set level=39
) else (
if EXIST data\level38.SAS (
set level=38
) else (
if EXIST data\level37.SAS (
set level=37
) else (
if EXIST data\level36.SAS (
set level=36
) else (
if EXIST data\level35.SAS (
set level=35
) else (
if EXIST data\level34.SAS (
set level=34
) else (
if EXIST data\level33.SAS (
set level=33
) else (
if EXIST data\level32.SAS (
set level=32
) else (
if EXIST data\level31.SAS (
set level=31
) else (
if EXIST data\level30.SAS (
set level=30
) else (
if EXIST data\level29.SAS (
set level=29
) else (
if EXIST data\level28.SAS (
set level=28
) else (
if EXIST data\level27.SAS (
set level=27
) else (
if EXIST data\level26.SAS (
set level=26
) else (
if EXIST data\level25.SAS (
set level=25
) else (
if EXIST data\level24.SAS (
set level=24
) else (
if EXIST data\level23.SAS (
set level=23
) else (
if EXIST data\level22.SAS (
set level=22
) else (
if EXIST data\level21.SAS (
set level=21
) else (
if EXIST data\level20.SAS (
set level=20
) else (
if EXIST data\level19.SAS (
set level=19
) else (
if EXIST data\level18.SAS (
set level=18
) else (
if EXIST data\level17.SAS (
set level=17
) else (
if EXIST data\level16.SAS (
set level=15
) else (
if EXIST data\level14.SAS (
set level=14
) else (
if EXIST data\level13.SAS (
set level=13
) else (
if EXIST data\level12.SAS (
set level=12
) else (
if EXIST data\level11.SAS (
set level=11
) else (
if EXIST data\level10.SAS (
set level=10
) else (
if EXIST data\level9.SAS (
set level=9
) else (
if EXIST data\levell8.SAS (
set level=8
) else (
if EXIST data\levell7.SAS (
set level=7
) else (
if EXIST data\level6.SAS (
set level=6
) else (
if EXIST data\leve5l.SAS (
set level=5
) else (
if EXIST data\level4.SAS (
set level=4
) else (
if EXIST data\level3.SAS (
set level=3
) else (
if EXIST data\level2.SAS (
set level=2
) else (
if EXIST data\level1.SAS (
set level=1
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
)
Code: [Select]for /L %%N in (40,-1,1) do if exist data\level%%N.sas set level=%%N
Like your code, it will set the level to the same as the lowest numbered level(NUMBER).sas in the folder \data.
Quote from: Dias DE verano on JUNE 07, 2008, 08:03:55 AM

Code: [Select]for /L %%N in (40,-1,1) do if exist data\level%%N.sas set level=%%N
Like your code, it will set the level to the same as the lowest numbered level(number).sas in the folder \data.

Sorry, you are right. I was too hasty.

This is what you need

Code: [Select]for /L %%N in (1,1,40) do if exist data\level%%N.sas set level=%%N
This starts at 1 and works up to 40, setting the level to the last (highest) numbered file found.

I read the title and thought this was about Crisco...

In English, "shortening" also means any fat or oil used in baking like butter or lard. Crisco is a US brand of cooking fat.