id=id*100+1

data a;
   input id a $;
   id+100;
cards;
1 a
2 a
3 a
4 a
;

不好意思，看错题了，下面这个是对的。
data a;
   input id a $;
   id = id*100 +1;
cards;
1 a
2 a
3 a
4 a
;

data a;
        input id a $;
        cards;
        1 a
        2 a
        3 a
        4 a
;
run;

proc format;
        value myformat 1 = '101'
                                   2 = '201'
                                   3 = '301'
                                   4 = '401'
                                   ;
run;

data b;
        set a;
        id_new=input(put(id,myformat.),best.);
run;

一般的办法知道，有没有像类似loop一类的办法修改呢？

一个一个的手敲到1000实在是太累了。