From: Sandro Santilli <strk@keybit.net>
Date: Tue, 1 Nov 2005 11:46:19 +0000 (+0000)
Subject: Removed calls to get_proj4_from_srid() from transform() to require
X-Git-Tag: pgis_1_1_0~174
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=99ed4467ce45b922fee6444bc4db65c8a202a305;p=postgis

Removed calls to get_proj4_from_srid() from transform() to require
a single scan of spatial_ref_sys for call rather then two.


git-svn-id: http://svn.osgeo.org/postgis/trunk@2016 b70326c6-7e19-0410-871a-916f4a2858ee
---

diff --git a/lwgeom/lwpostgis.sql.in b/lwgeom/lwpostgis.sql.in
index 4afe267f7..a26620887 100644
--- a/lwgeom/lwpostgis.sql.in
+++ b/lwgeom/lwpostgis.sql.in
@@ -3062,11 +3062,12 @@ CREATEFUNCTION transform_geometry(geometry,text,text,int)
 CREATEFUNCTION transform(geometry,integer) RETURNS geometry AS
 '
 DECLARE
-	iproj text;
-	oproj text;
+	iproj text := NULL;
+	oproj text := NULL;
 	isrid integer;
 	osrid alias for $2;
 	ret geometry;
+	rec RECORD;
 BEGIN
 
 	SELECT INTO isrid SRID($1);
@@ -3082,13 +3083,21 @@ BEGIN
 	IF isrid = -1 THEN
 		RAISE EXCEPTION ''Input geometry has unknown (-1) SRID'';
 	END IF;
+	
+	FOR rec IN SELECT srid, proj4text FROM spatial_ref_sys
+		WHERE srid = isrid OR srid = osrid
+	LOOP
+		IF rec.srid = isrid THEN
+			iproj = rec.proj4text;
+		ELSE
+			oproj = rec.proj4text;
+		END IF;
+	END LOOP;
 
-	SELECT INTO iproj get_proj4_from_srid(isrid);
 	IF iproj IS NULL THEN
 		RAISE EXCEPTION ''Cannot find input SRID (%) in spatial_ref_sys'', isrid;
 	END IF;
 
-	SELECT INTO oproj get_proj4_from_srid(osrid);
 	IF oproj IS NULL THEN
 		RAISE EXCEPTION ''Cannot find target SRID (%) in spatial_ref_sys'', osrid;
 	END IF;