NODUPKEY writes only the first observation of each BY group to the new data set TOWNS.
proc sort data=account out=towns nodupkey;