I made an small update ... %macro chk_dir(dir=) ; /* options noxwait; */ %sysexec %str(pwd; ls –l); %local rc fileref ; %let rc = %sysfunc(filename(fileref,&dir)) ; %if %sysfunc(fexist(&fileref)) %then %put NOTE: The directory "&dir" exists ; %else %do ; %sysexec %str(mkdir &dir); %put %sysfunc(sysmsg()) The directory has been created. ; %end ; %let rc=%sysfunc(filename(fileref)) ; %mend chk_dir ; %chk_dir(dir=/data/test) ;
... View more