%macro C(num);
%do n=1 %to #
DATA T200901I&n T200902I&n T200903I&n T200902I&n T200904I&n T200905I&n T200906I&n T200907I&n T200908I&n T200909I&n T200910I&n T200911I&n T200912I&n ;
SET plants.N3Industry&n;
IF YYYYMM=200901 THEN OUTPUT T200901I&n;
ELSE IF YYYYMM=200902 THEN OUTPUT T200902I&n;
ELSE IF YYYYMM=200903 THEN OUTPUT T200903I&n;
ELSE IF YYYYMM=200904 THEN OUTPUT T200904I&n;
ELSE IF YYYYMM=200905 THEN OUTPUT T200905I&n;
ELSE IF YYYYMM=200906 THEN OUTPUT T200906I&n;
ELSE IF YYYYMM=200907 THEN OUTPUT T200907I&n;
ELSE IF YYYYMM=200908 THEN OUTPUT T200908I&n;
ELSE IF YYYYMM=200909 THEN OUTPUT T200909I&n;
ELSE IF YYYYMM=200910 THEN OUTPUT T200910I&n;
ELSE IF YYYYMM=200911 THEN OUTPUT T200911I&n;
ELSE IF YYYYMM=200912 THEN OUTPUT T200912I&n;
RUN;
data name;
input time;
cards;
200901
200902
200903
200904
200905
200906
200907
200908
200909
200910
200911
200912
;
run;
data _null_;
set name end=last;
call symput(compress("N_name"||(_N_)),compress(time));
if last then call symput("sum",compress(_n_));
run;
%put &N_name1. &sum.;
%MACRO FREQ();
%DO I=1 %TO &SUM.;
DATA T&&N_NAME&I.I&I.;
SET plants.N3Industry&I.;
IF YYYYMM=&&N_NAME&I. THEN OUTPUT T&&N_NAME&I.I&I.;
RUN;
%END;
%MEND;
%FREQ();
扫码加好友，拉您进群
全部版块
我的主页
收藏
