data temp;
input x;
cards;
1101287321
3219837132
7120938034
8219873043
1101983454
;
run;

data temp2;
set temp;
y=substr(x,3,4);
if y='1101';
run;

data a;
input x 10.;
cards;
1101128765
1234000023
;
run;

data b;
set a;
if substr(put(x,$10.),1,4)=1101 then output;
run;
举个例子。。

十分感谢！

貌似你的更厉害点！学习了！谢谢哦！

最近在学正则表达式，就用正则表达式写一个吧：

data a ;
    input string $10.;
    if _n_=1 then re=prxparse("/^1101\d{6}/");
    retain re;
    if prxmatch(re,string) then output;    keep string;
    cards;
3219345132
2345938034
5467873043
1101343454
;
run;