重命名

The right way doing it would be using 'proc detasets'. You should find it in SAS online help.

If the data set is small and you may do as simple as the following in this case,

data t1;
retain a1-a20 0;
output;
run;

data t2;
  set t1;
  rename a1-a20=b11-b30;
run;

proc print;run;


data t3;
  set t1;
  rename a1-a20=a11-a30;
run;

proc print;run;

data a;
        do i =1 to 20;
        array a(*) da1-da20;
         a(i)=i;
         end;
run;
data aa;
        set a;
        array a(*) da1-da40;
        array aa(*) s1-s20;
        do i=1 to 20;
        aa(i)=a(i);
        end;
        keep s1-s20;
run;