substr函数用法详解
substr(string,start<,length>)从string 的start位置开始提取字符串
length:待提取的字符串的长度，若length为一下情况时，返回整个字符串的所有字符。
1、length不指定
2、length为空
3、length为负值
4、length大于字符串的长度
data dat;
str="wqerwtweafs";
str1=substr(str,5);
str2=substr(str,5,"");
str3=substr(str,5,-3);
str4=sunstr(str,5,30);
注意：
substr中的start为负数时返回空值
当length为负值时，默认从start位置截取所有字符
substr从字符串右侧截取字符的方法
1.substr(str,length(str)-n+1,n)
data _null_;
str='chah234960b3';
str1=substr(str,length(str)-5+1,5);
put str1=;
run;
2.使用reverse函数
data _null_;
str='chah234960b3';
str1=reverse(substr(reverse(str),1,5));
put str1=;
run;
substr除了有字段截取的功能外，还可以用来替换字段。
'='在左边: 截取字段
data _null_;
x='123456';
str=substr(x,1,3);
put str=;
run;
在log中输出结果为: str=123;
'='在右边: 替换字段
data _null_;
x='123456';
substr(x,1,3)='789';
put x=;
run;
在log中输出结果为: str=789456;
通常情况下，substr往往结合find一起使用。
例1: 截取每行数据中的math和english
data test;
input id :$3. exams & $30.;
math=substr(exams,find(exams,'math','i',1),4);
english=substr(exams,find(exams,'english','i',1),7);
cards;
001 math Chinese
002 english math chemistry
003 Chinese phisics
;
run;
例2: 查找每位学生的数学和英语成功
data test;
input id $ exams & $30.;
math=substr(exams,find(exams,'math','i',1)+5,3);
english=substr(exams,find(exams,'english','i',1)+7,3);
cards;
001 math 100 english 90
002 math 80 english 70
003 math 95 english 85
;
run;
data test;
input id $ exams & $30.;
math=substr(exams,index(exams,'math')+5,3);
english=substr(exams,index(exams,'english')+7,3);
cards;
001 math 100 english 90
002 math 80 english 70
003 math 95 english 85
;
run;
转载自：https://www.cnblogs.com/huangbiquan/articles/8007613.html