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