一个例子，可以参考一下

data a;
input id $  y;
datalines;
a  3
c  6
b  5
c  5
b  6
a  4
;
run;

proc sort data=a;
by id;
run;

data h;
set a;
by id;
if id not eq lag(id) then output;
run;

那怎麼把日期FORMAT成mmddyy10.呢?
data ex_Forecast_1;
set Forecast ;
rename Rptdt=ReportAnnouncementDate;
ReportAnnouncementDate=input(Rptdt,yymmdd10.);
run;

proc print data=ex_Forecast_1;
format ReportAnnouncementDate1 mmddyy10.;
run;

ERROR: You are trying to use the numeric format MMDDYY with the character variable
       ReportAnnouncementDate in data set WORK.EX_FORECAST_1.

是為什麼呢?

不是啊...我現在有很多家公司..我想把每家公司的最後一天交易的數據顯示出來
Stkcd         Rptdt            
000002      2008-01-04
000002      2008-01-04
000002      2008-01-08
000006      2008-02-19
000006      2008-03-06
000245      2008-01-04
000245      2008-01-08
000245      2008-03-20
000245      2008-03-21

應該怎麼寫呢?

[code]data test;
        input stkcd  rptdt @@ ;
        new_stkcd=put(stkcd,z6.);
        informat rptdt yymmdd10.;
        format rptdt yymmdd10.;
cards;
000002      2008-01-04
000002      2008-01-04
000002      2008-01-08
000006      2008-02-19
000006      2008-03-06
000245      2008-01-04
000245      2008-01-08
000245      2008-03-20
000245      2008-03-21
;
run;
proc sort data=test;
        by new_stkcd rptdt ;
run;
data lastday_stkcd(drop=stkcd);
        set test;
        by new_stkcd;
        if last.new_stkcd ;
run;

proc import  out=forcast
                     datafile="d:\12 tst\Forecast.xls" /* change it to your file location*/
                                        dbms=excel replace;
                         getnames=yes;
                                         scantime=yes;
run;

proc sort data=forcast;
    by Stkcd   Rptdt  ;
run;

data want;
   set forcast;
  by stkcd;
if last.stkcd;
run;