topic Re: How can I check this in a file in SAS Programming

How can I check this in a file

sasbasls — Tue, 10 Apr 2012 14:46:37 GMT

hi,

I need to check multiple log files if they are created today and to check if no error exists in log files without manually opening log files. Can this be done using SAS statements ?

thanks,

basesas

Re: How can I check this in a file

PGStats — Tue, 10 Apr 2012 16:44:26 GMT

Are those log files from SAS?

Re: How can I check this in a file

sasbasls — Tue, 10 Apr 2012 16:57:05 GMT

Yes...SAS logs

Re: How can I check this in a file

PGStats — Tue, 10 Apr 2012 18:53:47 GMT

Assuming your log file all sit in the same directory under Windows, you could do :

%let logPath=YOUR_LOG_PATH;

filename toto PIPE "DIR ""&logPath.\*.log"" /n/o-d/t:c " console=min;

data test(keep=logFile);
retain todayStr;
length logFile $200;
infile toto;
if _n_ = 1 then todayStr = put(today(),yymmddd10.);
input;
if substrn(_infile_,1,10)=todayStr then do;
logFile = substrn(_infile_,37);
output;
end;
run;

filename toto dummy;
data _null_;
set test;
logPath = cats("&logPath.\", logFile);
do until (_eof);
infile toto filevar=logPath end=_eof;
input;
if substrn(_infile_,1,6) = "ERROR:" then do;
put "Error found in log file: " logFile " : " _infile_;
_eof = 1;
end;
end;
run;

not fully tested... Not likely to work on UNIX - PG

Re: How can I check this in a file

Ksharp — Wed, 11 Apr 2012 06:28:45 GMT

Here is the code I wrote before.

data _null_;
 infile '/spds_data6/temp/jh.txt' dlm=' ' length=len expandtabs;
 input row $varying200. len;
 if left(row) in: ('ERROR' 'WARNING') then put row;run;

Ksharp

Re: How can I check this in a file

PGStats — Wed, 11 Apr 2012 14:57:43 GMT

Thanks Ksharp for the colon modifier. I learned something. - PG