oracle经纬度计算,根据经纬度分别用Java和Oracle存储过程计算两点距离

在给定2点的经纬度，通过Java代码和Oracle存储过程来计算出点的距离 单位是(米)

oracle存储过程：

create or replace procedure SP_GET_DISTANCE

(cx in number,cy in number,sx in number, sy in number,distance out varchar2)

is

d number;

x number;

y number;

r number;

pi number;

begin

--开始计算

r:=6371229;--地球半径

pi:=3.14159265358979323;--圆周率

x:=(sx-cx)*pi*r*cos((sy+cy)/2*pi/180)/180;

y:=(sy-cy)*pi*r/180;

d:=SQRT(power(x,2)+power(y,2));

distance:=to_char(d,9999999999999.99);

end SP_GET_DISTANCE;

java代码：

package com.wpn.web.util;

public class Distance {

private final static double PI = 3.14159265358979323;// 圆周率

private final static double R = 6371229;  // 地球的半径

private Distance() {

}

/**