Macro XSET (from Fraktal SAS Programming): Unterschied zwischen den Versionen
Zur Navigation springen
Zur Suche springen
K |
K |
||
Zeile 16: | Zeile 16: | ||
input xvar $ xval $; | input xvar $ xval $; | ||
xvar = upcase(translate(xvar,'_','(-)')); | xvar = upcase(translate(xvar,'_','(-)')); | ||
− | %IF &XVAR. | + | %IF %LENGTH(&XVAR.) <> 0 %THEN if trim(xvar) = "%UPCASE(&XVAR.)";; |
call symput(compress(xvar),compress(xval)); | call symput(compress(xvar),compress(xval)); | ||
run; | run; |
Version vom 29. Juli 2014, 11:42 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 %LENGTH(&XVAR.) <> 0 %THEN if trim(xvar) = "%UPCASE(&XVAR.)";; call symput(compress(xvar),compress(xval)); run; filename path clear; %MEND xset;