你这样说也不太清楚啊，贴个图看看筛选出来的结果，

本题已经解决；
代码：
data a;
set data.hf000012;
where tvolume>=100000;
output;
proc sort data=a;
by date tvolume;
run;
data b;
set a;
by date tvolume;
retain y 0;
if first.date then y=1;
else y+1;
if last.date;
if y>=5 then delete;
run;
data b;
update b a;
by date;
run;