Log Check

As a SAS programmer in a regulated environment we all know the importance of Log checks. I have written a utility macro to do that. In the code you need to mentioned what kind of text string needs to be checked. Input name of log and path. Internal macro modification necessary.

%let pgmnane=Program1.sas;
%put &pgmnane;
%let pgmpath=/folders/myfolders/;

%macro logprint(logname=,path=);
data log;
length onevar $32767;
infile “&pgmpath&pgmnane log” dlm=”[][][][][][][][]” truncover;
input onevar $;
run;
DATA LOG2 ;
set log;
if not find (upcase(onevar),”WHERE UPCASE(ONEVAR)”) ;
if find(upcase(onevar),”ERROR”) or
find(upcase(onevar),”NOTE”) or
find(upcase(onevar),”WARNING”);
run;
proc print data =log2;
label onevar=” “;
run;
%mend;

%logprint(logname=&pgmnane,path=&pgmpath);