If you want the waypoint(s) moving, try something like this:
st = Interpreter["Date"][#[[3]]] -> GeoPosition[#[[1 ;; 2]]] & /@
SemanticImport["~/Downloads/st.csv", Automatic, "Rows"];
Manipulate[
GeoGraphics[{GeoStyling["OutlineMap"], GeoMarker[st[[date, 2]]]},
GeoRange -> Quantity[500, "Miles"]], {date, 1, Length@st, 1}]
