在 Oracle 中根據經緯度計算兩地之間的距離____Oracle

在 Oracle 中根據經緯度計算兩地之間的距離

獲得弧度的函數：
CREATE OR REPLACE FUNCTION Radian(d number) RETURN NUMBER
is
PI number :=3.141592625;

begin
return  d* PI/180.0;
end ;

測試一下這個函數：
select Radian(360) from dual;


根據經緯度計算距離的函數：

CREATE OR REPLACE FUNCTION GetDistance(lat1 number,
                                       lng1 number,
                                       lat2 number,
                                       lng2 number) RETURN NUMBER is
  earth_padius number := 6378.137;
  radLat1      number := Radian(lat1);
  radLat2      number := Radian(lat2);
  a            number := radLat1 - radLat2;
  b            number := Radian(lng1) - Radian(lng2);
  s            number := 0;
begin
  s := 2 *
       Asin(Sqrt(power(sin(a / 2), 2) +
                 cos(radLat1) * cos(radLat2) * power(sin(b / 2), 2)));
  s := s * earth_padius;
  s := Round(s * 10000) / 10000;
  return s;

end;

 

樣本，根據城市名計算距離：

東方明珠塔的經緯度是：121.506656,31.245087 陸家嘴地鐵站的經緯度是:121.508883,31.243481

SQL> select GetDistance('121.506656','31.245087','121.508883','31.243481') from dual;

輸出結果是 0.2649 千米