data a ;
        input name$;
        cards;
        (yt)
        (ty)
        ;
run;
data b (drop=name1) ;
        set a;
        if substr(name,1,1)='(' then substr(name,1,1)='_';
        name1=left(reverse(name));
        if substr(name1,1,1)=')' then substr(name1,1,1)='*' ;
        name=reverse(name1);
put  name  ;
run;

先谢谢啦！
但结果不对呀

把'_'和'*'换成'（'和'）'即可  
但前提是你的SAS支持中文字符:）

恩，明白了，哎，我的SAS不支持呀！多谢啦

Try this

name = tranwrd(name, '(','（');