combine one-obs dataset to multi-obs dataset

Explain the meaning of the following SAS code.
data ds5 (drop=type freq );
retain style exercisetype sales grandtotal percent;
if N=1 then
set sh3;
set sh;
percent=round(sales/grandtotal,0.00001)*100;
run;