topic Re: how to check if a library has been created otherwise abort in SAS Enterprise Guide

how to check if a library has been created otherwise abort

alepage — Fri, 01 Oct 2021 19:31:11 GMT

Hello,

Suppose that my mainfunction call m1, m2 , m3, m4

ex:

%macro mainfunc;
%m1;
%m2;
%m3;
%m4;
%m5;

%mend mainfunc;
%mainfunc;

So imagine that in m3, for example, I need to make a libname statement and if the libname does not exist, how can I abort the %mainfunc;

Re: how to check if a library has been created otherwise abort

Reeza — Fri, 01 Oct 2021 19:34:58 GMT

Is the library a directory or can it be a file?
https://communities.sas.com/t5/SAS-Tips-from-the-Community/SAS-Tip-Check-if-a-directory-exists/td-p/475988

You may want to manually add a flag to your macro calls so they only execute if the previous step executed successfully so either create a variable at the end of the process that it completed successfully or rely on SAS automatic macro variables which can vary depending on the process. Usually easier and cleaner to manage manually.

Re: how to check if a library has been created otherwise abort

ballardw — Fri, 01 Oct 2021 20:14:23 GMT

"Does not exist" as in it was supposed to exist before the macro or program runs and doesn't?

Or it was supposed to made in the macro and fails (for some reason)?

Re: how to check if a library has been created otherwise abort

Ksharp — Sat, 02 Oct 2021 07:17:28 GMT

Check function LIBREF() .

Examples
This example verifies a libref. If an error or warning occurs, the message is written
to the log. Under some operating environments, the user can assign librefs by using
system commands outside the SAS session.
%if (%sysfunc(libref(sashelp))) %then
%put %sysfunc(sysmsg());

Re: how to check if a library has been created otherwise abort

alepage — Sat, 02 Oct 2021 20:45:58 GMT

I have found a good example on the web:

%macro libexits(libref);
	%if %sysfunc(libref(&libref)) %then
	%do;
		%put "&libref. does not exist";		
		%abort ;
	%end; 
	%else 
	%do;
		
		%put "the path of &libref. is : %sysfunc(pathname(&libref.))";
		
	%end;
	%mend libexits;
	%libexits(test);