- data test;
- input expanded_name :&$100.;
- cards;
- asdf123
- asdfasdf456
- asdfput
- asdfasdf put
- ;
- run;
- data want;
- set test;
- digit=anydigit(expanded_name);
- if digit>0 then string=substrn(expanded_name,1,digit-1);
- else string=expanded_name;
- run;
- data want1;
- set want;
- string1=substr(string,1,find(string,"put")-1);
- run;