Macro XSET (from Fraktal SAS Programming): Unterschied zwischen den Versionen

Aus phenixxenia.org
Zur Navigation springen Zur Suche springen
← Zum vorherigen VersionsunterschiedZum nächsten Versionsunterschied →
Wolf-Dieter Batz (Diskussion | Beiträge)
autoreview, Bürokraten, editor, reviewer, Administratoren
12.497 Bearbeitungen
KKeine Bearbeitungszusammenfassung
Wolf-Dieter Batz (Diskussion | Beiträge)
autoreview, Bürokraten, editor, reviewer, Administratoren
12.497 Bearbeitungen
KKeine Bearbeitungszusammenfassung
Zeile 16: Zeile 16:
  input xvar $ xval $;
  input xvar $ xval $;
  xvar = upcase(translate(xvar,'_','(-)'));
  xvar = upcase(translate(xvar,'_','(-)'));
  %IF &XVAR. ne %THEN if trim(xvar) = "%UPCASE(&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

Zurück

Übersicht

Vorwärts 

%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;

Zurück

Übersicht

Vorwärts

Abgerufen von „https://phenixxenia.org/w/index.php?title=Macro_XSET_(from_Fraktal_SAS_Programming)&oldid=3975“