SASUnit Examples: nobs.sas Source File

00001  
00021 %MACRO nobs(
00022    data
00023 );
00024 %local dsid nobs;
00025 %let nobs=;
00026 %let dsid=%sysfunc(open(&data));
00027 %if &dsid>0 %then %do;
00028    %let nobs=%sysfunc(attrn(&dsid,nlobs));
00029    %let dsid=%sysfunc(close(&dsid));
00030 %end;
00031 &nobs
00032 %MEND nobs;