- data list;
- input name $20.;
- cards;
- stk_000001
- stk_600010
- ;
- /*计算list中共有几条观测*/
- proc sql noprint;
- select count(*) into: n from list;
- quit;
- %macro try(last);
- %do i=1 %to &last;
- data _null_;
- set list;
- if _n_=&i then do;
- call symput('var',trim(name));
- end;
- run;
- data &var._2;
- set &var;
- /*其它程序*/
- run;
- /*其它程序*/
- %end;
- %mend;
- %try(&n);/*如果不用sql计算观测条数,也可以直接将宏变量last赋值为2*/


雷达卡


京公网安备 11010802022788号







