假设你说的dataset叫做large，里面的变量为common(公共变量),a1-a100 b1-b100 c1-c100
%macro combine(dset=);
%do i=1 %to 100;
data d&i;
set large(keep=common a&i b&i c&i);
rename a&i=a b&i=b c&i=c;
run;%end;
%mend combine;
%combine(dset=large)
data all;
set d1-d100;
run;

把楼上的code改了一点。 把结果的计算放到了宏里面。

%macro combine(dset=);
%do i=1 %to 100;
    data d&i;
       set &dset (keep=id date name a&i b&i t&i);
       rename a&i=a b&i=b t&i=t;
    run;
        if  &i = 1 then do;
                 data results;
                     set d&1;
                     run;
                 end;
        else do;
            data results;
            set results d&i;
            run;
        end;
%end;
%mend combine;
%combine(dset=test)

这里是模拟的数据.
data test;
array a{100};  
array b{100};
array t{100};
format date yymmdd10.;
   DO i = 1 to 5;
      Id = i;
          Date = today() +i;
          name = collate(64+i, 66+i);
           do j = 1 to dim(a);
              a(j) = i+j+1;
                  b(j) = i+j+2;
                  t(j) =  i+j+3;
                  end;
          output;
        end;
        drop i j;
run;

非常感谢楼上两位大神，我马上去试试