求助，关于sas变量连续重命名

原来有var1-var10 10个变量，我先在想把它们的名字后的数字都加一
进行如rename var10=var11; rename var9=var10;的操作。
想变一个宏%rename来实现。
现在编到这个程度了：

1. data one;
   
2. input var1-var10;
   
3. cards;
   
4. 1 2 3 4 5 6 7 8 9 10
   
5. ;
   
6. run;
   
7. ods listing close;   *不用再在输出窗口输出内容了（输出窗口不是结果查看器）;
   
8. ods output position=list;
   
9. proc contents data=one varnum;
   
10. run;
    
11. ods listing;
    
12. /*将var1命名为var2，以此类推*/
    
13. proc sql;
    
14. select put(count(*),2.) into :num from list;
    
15. select variable into :var1-:var&num from list;
    
16. select

复制代码

但不知道怎样得到所有数字加一后的变量名。
请问大家有没有会的。

最好不要新建一个数据集包含新名字，最好通过数字加一实现，因为实际数据量比这个要大。

没必要用宏, e.g.
data two;
        set one;
        rename var1-var10=var2-var11;
run;

Eternal0601 发表于 2014-11-29 19:35
没必要用宏, e.g.
data two;
        set one;

额，不错！

Eternal0601 发表于 2014-11-29 19:30
没必要用宏, e.g.
data two;
        set one;

The drawback of this approach is the data set needs re-build. It is fine for a small data set. For a large data set the correct way is using,

proc datasets,
   modeify dsn;
  rename ....;
quit;