lasug

Verificando la existencia de un archivo externo utilizando la sentencia FILEEXIST.

%macro existe(archivo);
%if %sysfunc(fileexist(&archivo))=1 %then %do;
data a;
infile “&archivo”;
input var $;
run;
%end;
%else %do;
data _null_;
put “Error:Archivo &archivo No Existe”;
run;
%end;
%mend;

/* Llamada a la macro para verificar si el archivo exite */
%existe(c:\lasug.txt);