|
Ah, ehm ... let's say that in the context of the present dis-
cussion on String Theory, I simply couldn't resist? But serious-
ly, your solution works fine on NT4 here, and is more elegant
to boot. I ought to read up on those pipes :-)
Thanks,
Koen.
> Or is it another fine sample of UTMF (using too many functions) ;-)?
>
> *Tested for WIN2K only;
> filename c pipe 'dir c:\temp\*.xls /B';
> data xl;
> attrib xlfile length=$100;
> infile c truncover;
> input xlfile 1-100;
> run;
> > filename dir 'c:\temp';
> >
> > data xl_files_in_dir(keep=filename);
> > length filename $ 200;
> > did=dopen('dir');
> > do i=1 to dnum(did);
> > filename=dread(did,i);
> > if upcase(substr(left(reverse(filename)),1,4)) eq
> 'SLX.' then output;
> > end;
> > rc=dclose(did);
> > run;
> >
> > Another fine sample of using upcase(left(etc. *g*
> >
|
