How to get using first and last in SAS below output!

[epo2l]

id         date
2309    04/14/2013
2309    05/01/2013
2309   05/21/2013
2309     06/21/2013

Looking  output like
ID             initialdate        Recent
2309           04/14/2013     06/21/2013

[DBailey]

PROC SQL;

SELECT

     ID,

     MIN(DATE) AS INITIALDATE,

     MAX(DATE) AS RECENT

FROM

     WORK.DATA

GROUP BY ID;

QUIT;

[Linlin]

data have;
input id  date mmddyy10.;
cards;
2309    04/14/2013
2309    05/01/2013
2309    05/21/2013
2309    06/21/2013
;
data want(drop=date);
retain id initialdate;
set have;
by id;
if first.id then initialdate=date;
Recent=ifn(last.id,date,.);
if last.id;
format initialdate Recent mmddyy10.;
proc print;run;

                                         Obs     id     initialdate        Recent

                                          1     2309    04/14/2002     06/21/2002

[epo2l]

Thanks you very helpful!