_sasunit_detectsymbols.sas

Go to the documentation of this file.

 
%MACRO _sasunit_detectSymbols(
    r_note_symbol    = note_symbol
   ,r_warning_symbol = warning_symbol
   ,r_error_symbol   = error_symbol
);

proc printto log=work.detect.note.log new;
run;

proc printto log=log;
run;

filename _detect catalog "work.detect.note.log";

data _null_;
   infile _detect truncover;
   input line $char256.;
   call symput ("&r_note_symbol", scan(line, 1, ':'));
   stop;
run;

filename _detect;

proc datasets lib=work nolist;
   delete detect / memtype=catalog;
quit;

%IF &&&r_note_symbol = HINWEIS %THEN %DO;
   %LET &r_warning_symbol = WARNUNG;
   %LET &r_error_symbol   = FEHLER;
%END;
%ELSE %DO;
   %LET &r_warning_symbol = WARNING;
   %LET &r_error_symbol   = ERROR;
%END;

%MEND _sasunit_detectSymbols;