proc sort data=a;
by xh descending a;
run;
data b;
set a;
retain temp;
if first.xh then temp=z;
else z=temp;
by xh;
if z^=1;
run;

楼主的描述着实让我头晕，不知道以下结果合不合意、、、

data a;
input xh z;
cards;
1 .
1 .
1 1
2 .
2 1
2 .
3 .
3 .
3 .
4 1
4 .
4 .
;
run;
data example;
set a;
if z=1 then delete;
proc print;
run;

输出结果：
                SAS 系统                  2013年11月12日 星期二 上午11时22分11秒   1
                                                        Obs    xh    z
                                                         1      1    .
                                                         2      1    .
                                                         3      2    .
                                                         4      2    .
                                                         5      3    .
                                                         6      3    .
                                                         7      3    .
                                                         8      4    .
                                                         9      4    .

谢谢指教！！

谢谢指教！！