macro中判断有无观测或变量（open）

%macro cla; 
data class;
	set sashelp.class;
/*	if name ne ""	then delete;*/
run;
%let class_=class;
%let dsid=%sysfunc(open(&class_.));
/*dsid为打开的class数据集*/

%let nobs=%sysfunc(attrn(&dsid,nobs));
/*nobs为观测数*/
%let nvars=%sysfunc(attrn(&dsid,nvars));
/*nvars为变量数*/
%let rc=%sysfunc(close(&dsid)):
/*关闭数据集*/

/*%put &nobs.&nvars.;*/
%if &nobs ne 0 %then %do; 
	data class_;
		set class; 
	run;
	%put there have &nobs. columns in class_;
%end;
%else %if &nobs=0 %then %do;
	%put dataset class has &nobs. column.;
%end;
%mend;
%cla;