BAIDU2GOOGLE(百度转google)和GOOGLE2BAIDU(google转百度)。
CREATE OR REPLACE PROCEDURE "BAIDU2GOOGLE"
(in_lat IN OUT NUMBER,in_lng IN OUT NUMBER)
IS
RESULT NUMBER;
V NUMBER;
X NUMBER;
Y NUMBER;
Z NUMBER;
T NUMBER;
BEGIN
IF in_lat IS NULL OR in_lng IS NULL THEN
RETURN;
END IF;
IF in_lat = 0 OR in_lng = 0 THEN
RETURN;
END IF;
V := (ACOS(-1) * 3000.0) / 180.0;
X := in_lng - 0.0065;
Y := in_lat - 0.006;
IF X = 0 OR Y = 0 THEN
RETURN;
END IF;
Z := sqrt(X*X + Y*Y) - 0.00002 * sin(Y*V);
T := atan2(Y,X) - 0.000003 * cos(X*V);
in_lat := Z * sin(T);
in_lng := Z * cos(T