%macro lib(lib=);
proc sql noprint;
select memname,nvar,nobs
into : m1, : v1, : o1
from dictionary.tables
where libname="%upcase(&lib)" and memtype='DATA';
quit;
%put _user_;
%mend lib;
%lib(lib=work)
This macro will give the no;of obs and no:of vars of the 1st dataset in a library...
But I need to write a macro which gives the no:of obs and no:of vars of all the datasets in a library...Please help
How to you want the information formatted?
You could put them into those same three macro variables as delimited values.
select memname
, nvar
, nobs
into :m1 separated by ' '
, :v1 separated by ' '
, :o1 separated by ' '
Or you could generated multiple variables.
select memname
, nvar
, nobs
into :m1 - :m999999
, :v1 - :v999999
, :o1 - : o999999
...
%let n=&sqlobs;
There is one difficulty with doing this as a macro since by default to new macro variables will be local to the macro and hence not available when the macro ends. You could force them into the GLOBAL symbol table. In which case it might be easier to do using CALL SYMPUTX.
data _null_;
if eof then call symputx('n',_N_-1,'G');
set sashelp.vtable end=eof;
where libname = %upcase("&lib") ;
call symputx(cats('m',_n_),memname ,'G') ;
call symputx(cats('v',_n_),nvar ,'G') ;
call symputx(cats('o',_n_),nobs ,'G') ;
run;
How to you want the information formatted?
You could put them into those same three macro variables as delimited values.
select memname
, nvar
, nobs
into :m1 separated by ' '
, :v1 separated by ' '
, :o1 separated by ' '
Or you could generated multiple variables.
select memname
, nvar
, nobs
into :m1 - :m999999
, :v1 - :v999999
, :o1 - : o999999
...
%let n=&sqlobs;
There is one difficulty with doing this as a macro since by default to new macro variables will be local to the macro and hence not available when the macro ends. You could force them into the GLOBAL symbol table. In which case it might be easier to do using CALL SYMPUTX.
data _null_;
if eof then call symputx('n',_N_-1,'G');
set sashelp.vtable end=eof;
where libname = %upcase("&lib") ;
call symputx(cats('m',_n_),memname ,'G') ;
call symputx(cats('v',_n_),nvar ,'G') ;
call symputx(cats('o',_n_),nobs ,'G') ;
run;
Are you ready for the spotlight? We're accepting content ideas for SAS Innovate 2025 to be held May 6-9 in Orlando, FL. The call is open until September 25. Read more here about why you should contribute and what is in it for you!
Learn how use the CAT functions in SAS to join values from multiple variables into a single value.
Find more tutorials on the SAS Users YouTube channel.