Macro XSET (from Fraktal SAS Programming): Unterschied zwischen den Versionen
Zur Navigation springen
Zur Suche springen
K |
K |
||
Zeile 19: | Zeile 19: | ||
call symput(compress(xvar),compress(xval)); | call symput(compress(xvar),compress(xval)); | ||
run; | run; | ||
+ | filename path clear; | ||
%MEND xset; | %MEND xset; | ||
Version vom 29. Juli 2014, 11:34 Uhr
%MACRO xset(xvar); filename path pipe "set" lrecl = 2048; data _NULL_; length xvar $256 xval $1024; infile path dlm = '='; input xvar $ xval $; xvar = upcase(translate(xvar,'_','(-)')); %IF &XVAR. ne %THEN if trim(xvar) = "%UPCASE(&XVAR.)";; call symput(compress(xvar),compress(xval)); run; filename path clear; %MEND xset;