k*****y 发帖数: 221 | 1 data a;
input id $;
cards;
10B5-527
10B8-816
10B5-528
10B8-838
;
run;
data b;
set a;
if substr(id,1,4) ^= "10B5" then
delete;
run;
data c;
set a;
if substr(id,1,4) ^= '10B8' then
delete;
run;
proc print data=b;
run;
proc print data=c;
run; |
|