CORE
mf_getvarcount.sas
Go to the documentation of this file.
1 
19 %macro mf_getvarcount(libds);
20  %local dsid nvars rc ;
21  %let dsid=%sysfunc(open(&libds));
22  %let nvars=.;
23  %if &dsid %then %do;
24  %let nvars=%sysfunc(attrn(&dsid,NVARS));
25  %let rc=%sysfunc(close(&dsid));
26  %end;
27  %else %do;
28  %put unable to open &libds (rc=&dsid);
29  %let rc=%sysfunc(close(&dsid));
30  %end;
31  &nvars
32 %mend;