data temp;
input x $  @@;
cards;
2100 2201 2111 2132 2213
;
run;

proc sql;
create table a as
select * from temp
where x like '21*';
quit;