| Code executed
|
Function performed
|
- %MACRO xedit(xentry,xpath);
|
Start macro definition with name and positional parameters xentry and xpath.
|
- %LOCAL xpath;
|
Declare scope for xpath to be local.
|
- %IF %LENGTH(&XPATH.) = 0 %THEN %DO;
|
Start branch for condition "xpath not specified".
|
- %XSET(homeshare);
|
Call macro XSET to obtain user's home directory.
|
- %LET xpath = &HOMESHARE.;
|
Populate xpath with content from homeshare.
|
- %END;
|
End branch for condition "xpath not specified".
|
- filename path "&XPATH";
|
Create file reference using xpath.
|
- %IF %LENGTH(&XENTRY.) != 0 %THEN %DO;
|
Start branch for condition "xentry is not empty".
|
- DM "PGM";
|
Open Program Editor window in SAS display manager.
|
- DM "inc path(&XENTRY.)";
|
Load text file specified by xentry from directory specified by xpath.
|
- %END;
|
End branch for condition "xentry is not empty".
|
- %ELSE %DO;
|
Start branch for condition "xentry is empty".
|
- %XDIR(&HOMESHARE.);
|
Call macro XDIR to show content in user's home directory.
|
- %END;
|
End branch for condition "xentry is empty".
|
- filename path clear;
|
Clear fileref pointing to xpath.
|
- %MEND xedit;
|
Finalize macro definition with name.
|
