Type : CREATION_INTERNE
Das Makro operiert auf einer als Parameter ('pth') übergebenen Zeichenkette und liest keine Daten aus SASHELP-Tabellen oder externen Quellen. Es manipuliert Zeichenketten im Speicher, um das Ergebnis zu konstruieren.
| 1 | %macro getFileStem(pth)/des="Extract the path without the file name and extension"; |
| 2 | %local revstr cutstr gotstm; |
| 3 | %let revstr=%qleft(%qsysfunc(reverse(&pth))); |
| 4 | %let cutstr=%qsubstr(&revstr,%qsysfunc(indexc(&revstr,%str(/\)))); |
| 5 | %let gotstm=%qleft(%qsysfunc(reverse(&cutstr))); |
| 6 | %str(&gotstm) |
| 7 | %mend getFileStem; |