Macro XEDIT (from Fraktal SAS Programming): Unterschied zwischen den Versionen
Zur Navigation springen
Zur Suche springen
KKeine Bearbeitungszusammenfassung |
KKeine Bearbeitungszusammenfassung |
||
| Zeile 10: | Zeile 10: | ||
%MACRO xedit(xentry,xpath); | %MACRO xedit(xentry,xpath); | ||
%IF &XPATH. eq %THEN %LET xpath = | %IF &XPATH. eq %THEN %DO; | ||
%XSET(homeshare); | |||
%LET xpath = &HOMESHARE.; | |||
%END; | |||
%IF &XENTRY. ne %THEN %DO; | |||
filename path "&XPATH"; | filename path "&XPATH"; | ||
DM "PGM"; | DM "PGM"; | ||
DM "inc path(&XENTRY.)"; | DM "inc path(&XENTRY.)"; | ||
%END; | |||
%ELSE %DO; | |||
%XDIR(&HOMESHARE.); | |||
%END; | |||
%MEND xedit; | %MEND xedit; | ||
Version vom 22. Juli 2014, 11:26 Uhr
|
|
|
|
%MACRO xedit(xentry,xpath); %IF &XPATH. eq %THEN %DO; %XSET(homeshare); %LET xpath = &HOMESHARE.; %END; %IF &XENTRY. ne %THEN %DO; filename path "&XPATH"; DM "PGM"; DM "inc path(&XENTRY.)"; %END; %ELSE %DO; %XDIR(&HOMESHARE.); %END; %MEND xedit;
|
|
|
|