sql 计算两个经纬度点之间的距离

这里用到的算法和地球半径等数据均来自网络，此文只作整理记录。

地球半径值采用赤道半径 6378137.0米，这是1980年的国际标准数据。

//存储过程
CREATE FUNCTION [f_GetDistance]  
(   
@GPSLng DECIMAL(12,6),  
@GPSLat DECIMAL(12,6)
)  
RETURNS DECIMAL(12,4)  
AS  
BEGIN  
   DECLARE @result DECIMAL(12,4)  
   SELECT @result = 6378137.0*ACOS(SIN(@GPSLat/180*PI())*SIN(Lat/180*PI())+COS(@GPSLat/180*PI())*COS(Lat/180*PI())*COS((@GPSLng-Lng)/180*PI()))  
   RETURN @result  
END  
GO  


//查询语句
select *,(6378137.0*ACOS(SIN(@GPSLat/180*PI())*SIN(Lat/180*PI())+COS(@GPSLat/180*PI())*COS(Lat/180*PI())*COS((@GPSLng-Lng)/180*PI()))) as distance from tab_address