根据经纬度，计算亮点之间的距离

BEGIN
#根据两点的经、纬度值获取两点距离
#返回值为米
#eg.28.199607, 112.983135 28.199559, 112.98556 两点距离大约为237米
DECLARE R,distance,dLat,dLon,a double;
SET R = 6371.0,distance = 0.0,dLat = (lat2 - lat1)*PI() /180,dLon = (lon2 - lon1)*PI() /180;

SET a = SIN(dLat/2)*SIN(dLat/2) + COS(lat1*PI()/180) *COS(lat2*PI()/180) *sin(dLon/2)*SIN(dLon/2);
SET distance = floor((2*ATAN(SQRT(a),SQRT(1-a)))*R*1000);
RETURN distance;
END

SELECT
id,
name,
lat,
lon,
szm,
kpy,
type,
getDistatce(lat,:lat,lon,:lon) AS meters
FROM
region
WHERE
status = '0' AND
getDistatce(
lat,
:lat,
lon,
:lon
) < :meters

ORDER BY
meters