@echo off


rem     Richard A. DeVenezia
rem     SUGI 29 - "Greetings from the Edge"
rem     www.devenezia.com/papers


if not exist class mkdir class

javac -d class\ java\ListFiles.java

if errorlevel 1 goto done

set SAS9="c:\opt\sas\v91\sas.exe"
set CLASSPATH=class
%SAS9% -sysin "sas\ListFiles.sas" -jreoptions (-Djava.class.path=%CLASSPATH%) -noovp -nocenter -pagesize 1500

notepad ListFiles.log
notepad ListFiles.lst

:done