substr函數用法詳解

substr(string, start<,length>):從string的start位置開始提取字符串

length:要提取字符串的長度，若length為以下任意條件之一時，返回start位置到串尾的所有字符:
length不指定
length為空
length為負數
length大於start到串尾的長度

例如：

data test; 
str='chsh234960b3'; 
strl=subatr(str,5); 
str2=substr(str,5,'');
str3=aubstr(str,5,-3);
str4=aubstr(str,5, 30);
drop atr;
run;
proc print noobs; 
run;

注意兩點：
substr中的start為負數時返回空值;
當length為負數時，默認從start位罝取所有字符。

substr實現從右側取數幾種方法：從字符串chah234960b3右側截取5個字符的幾種方法

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;