标题: 怎么去除（）？ [打印本页] 作者: shiyiming 时间: 2012-6-23 01:26 标题: 怎么去除（）？ data a;
input x $30.;
cards;
A - T-100 (1500ML(s))
A - K -50" ML
KIT-1-T(A2 MG
1000 ML
...
;
run;
我想去除x中第一个左括号及其后面的所有的内容，如下b所示
data b;
A - T-100
A - K -50" ML
KIT-1-T
1000 ML
...
请高手帮忙.
谢谢！作者: shiyiming 时间: 2012-6-23 21:30 标题: Re: 怎么去除（）？ [code:dp1tvo7g]
data a;
input x $30.;
a=index(x,'(');
if a=0 then b=x;
else b=substr(x,1,a-1);
cards;
A - T-100 (1500ML(s))
A - K -50" ML
KIT-1-T(A2 MG
1000 ML
;
[/code:dp1tvo7g]作者: shiyiming 时间: 2012-6-25 22:43 标题: Re: 怎么去除（）？ [code:32a6tp9g]
data a;
input x $30.;
Y=SCAN(X,1,'(');
cards;
A - T-100 (1500ML(s))
A - K -50" ML
KIT-1-T(A2 MG
1000 ML
;
RUN;
[/code:32a6tp9g]作者: shiyiming 时间: 2012-6-25 23:14 标题: Re: 怎么去除（）？ Thanks a lot.