data b
set a;
array X(88) var1-var88;
do i=1 to 88;
   if X(i)>p99(X(i)) then delete;
   if X(i)<0 then delete;
run;
百分位函数怎么用