Update of /cvsroot/monetdb/sql/src/test/Skyserver
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv27529

Modified Files:
      Tag: SQL_2-24
        Skyserver_functions_v6.sql Skyserver_dropFunctions_v6.sql 
Log Message:
Add missing function:

fGetUrlFitsSpectrum


U Skyserver_dropFunctions_v6.sql
Index: Skyserver_dropFunctions_v6.sql
===================================================================
RCS file: 
/cvsroot/monetdb/sql/src/test/Skyserver/Skyserver_dropFunctions_v6.sql,v
retrieving revision 1.1.2.5
retrieving revision 1.1.2.6
diff -u -d -r1.1.2.5 -r1.1.2.6
--- Skyserver_dropFunctions_v6.sql      3 Jun 2008 13:55:43 -0000       1.1.2.5
+++ Skyserver_dropFunctions_v6.sql      6 Jun 2008 12:52:21 -0000       1.1.2.6
@@ -1,3 +1,4 @@
+DROP FUNCTION fGetUrlFitsSpectrum;
 DROP FUNCTION fGetUrlFrameImg;
 DROP FUNCTION fGetNearbyObjAllEq;
 DROP FUNCTION fGetNearbyObjAllXYZ;

U Skyserver_functions_v6.sql
Index: Skyserver_functions_v6.sql
===================================================================
RCS file: /cvsroot/monetdb/sql/src/test/Skyserver/Skyserver_functions_v6.sql,v
retrieving revision 1.1.2.7
retrieving revision 1.1.2.8
diff -u -d -r1.1.2.7 -r1.1.2.8
--- Skyserver_functions_v6.sql  3 Jun 2008 13:52:04 -0000       1.1.2.7
+++ Skyserver_functions_v6.sql  6 Jun 2008 12:52:21 -0000       1.1.2.8
@@ -2263,3 +2263,23 @@
                + cast(coalesce(specObjId,0) as varchar(32));
 end;
 
+CREATE FUNCTION fGetUrlFitsSpectrum(specObjIdd bigint)
+RETURNS varchar(128) 
+BEGIN
+        DECLARE link varchar(128), plate varchar(8), mjd varchar(8), fiber 
varchar(8), rerun int;
+        SET link = (select value from SiteConstants where 
name='DataServerURL');        SET rerun=(select p.spRerun from specobjall s, 
platex p where s.plateid=p.plateid and s.specobjid=specObjIdd);
+        SET link = link + 'spectro/1d_' + cast(rerun as varchar(4)) + '/';
+        SELECT cast(p.mjd as varchar(8)) into mjd
+            FROM PlateX p, specObjAll s 
+            WHERE p.plateId=s.plateId AND s.specObjID=specObjIdd;
+       SELECT cast(p.plate as varchar(8)) into plate
+            FROM PlateX p, specObjAll s 
+            WHERE p.plateId=s.plateId AND s.specObjID=specObjIdd;
+       SELECT cast(s.fiberID as varchar(8)) into fiber  
+            FROM PlateX p, specObjAll s 
+            WHERE p.plateId=s.plateId AND s.specObjID=specObjIdd;
+        SET plate = substring('0000',1,4-length(plate)) + plate;
+        SET fiber = substring( '000',1,3-length(fiber)) + fiber;
+        RETURN   link + plate + '/1d/spSpec-'+mjd+'-'+plate+'-'+fiber+'.fit';
+END;
+


-------------------------------------------------------------------------
Check out the new SourceForge.net Marketplace.
It's the best place to buy or sell services for
just about anything Open Source.
http://sourceforge.net/services/buy/index.php
_______________________________________________
Monetdb-sql-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-sql-checkins

Reply via email to