[MOBY-guts] biomoby commit

[Dennis Wang]

dwang
Tue Jul 26 20:30:43 EDT 2005
Update of /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby
In directory pub.open-bio.org:/tmp/cvs-serv26328/Perl/MOBY/Adaptor/moby

Modified Files:
	queryapi.pm 
Log Message:
again more comments... noticed some deletes were not implemented in mysql api, should they be removed from queryapi?

moby-live/Perl/MOBY/Adaptor/moby queryapi.pm,1.17,1.18
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi.pm,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -r1.17 -r1.18
--- /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi.pm	2005/07/27 00:15:48	1.17
+++ /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi.pm	2005/07/27 00:30:43	1.18
@@ -467,14 +467,37 @@
 	die "query_authority not implemented in adaptor\n";
 }
 
+=head2 get_all_authorities
+
+ Title     :	get_all_authorities
+ Usage     :	my $un = $API->get_all_authorities()
+ Function  :	Gets all unique authority URIs from the database
+ Args      :    no arguments
+ Returns   :    listref of hashrefs:
+ 				[{authority_uri => String}]
+ 				
+=cut
 sub get_all_authorities{
 	die "get_all_authorities not implemented in adaptor\n";
 }
 
+=head2 insert_authority
+
+ Title     :	insert_authority
+ Usage     :	my $un = $API->insert_authority(%args)
+ Function  :	Inserts an authority into the database
+ Args      :    authority_common_name => String,
+				authority_uri		  => String,
+				contact_email		  => String
+ Returns   :    Integer insertid
+ Notes     : 	the fact that it returns an insertid is bad since this
+             	is only useful to an SQL-based API...
+=cut
 sub insert_authority{
 	die "insert_authority not implemented in adaptor\n";
 }
 
+# Not implemented in mysql... should we allow deleting the authority?
 sub delete_authority{
 	die "delete_authority not implemented in adaptor\n";
 }
@@ -482,6 +505,22 @@
 #
 # service table fuctions
 #
+=head2 query_service
+
+ Title     :	query_service
+ Usage     :	my $un = $API->query_service(%args)
+ Function  :	Executes a query for service class
+ Args      :    type => String - either service_type or service_lsid
+ Returns   :    listref of hashrefs:
+ 				[{service_id  => Integer, 
+          		service_lsid  => String,
+          		service_type  => String,
+          		description	  => String,
+          		authority	  => String,
+          		contact_email => String}]
+ Notes     : 	the fact that it returns an service_id is bad since this
+             	is only useful to an SQL-based API...
+=cut
 sub query_service{
 	die "query_service not implemented in adaptor\n";
 }