[MOBY-guts] biomoby commit

[Dennis Wang]

dwang
Wed Jul 13 14:19:09 EDT 2005
Update of /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby
In directory pub.open-bio.org:/tmp/cvs-serv20848/Perl/MOBY/Adaptor/moby

Modified Files:
	queryapi.pm 
Log Message:
1st commit by Dennis

moby-live/Perl/MOBY/Adaptor/moby queryapi.pm,1.2,1.3
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi.pm	2004/07/09 00:21:53	1.2
+++ /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi.pm	2005/07/13 18:19:09	1.3
@@ -3,6 +3,7 @@
 use Carp;
 use vars qw($AUTOLOAD);
 
+# Modified by Dennis
 
 {
 	#Encapsulated class data
@@ -107,28 +108,44 @@
     
 }
 
-sub insert_collection_input {
-	die "insert_collection_input not implemented in adaptor\n";
-	#my ($self, %args) = @_;	
-	#my $dbh = $self->dbh;
-	#if ($self->sourcetype eq "MOBY::Adaptor::moby::queryapi::mysql"){
-	#	# this should be dropped down into the mysql.pm module??  probably...
-	#	$self->dbh->do("insert into collection_input (service_instance_id, article_name) values (?,?)", undef, ($args{service_instance}, $args{article_name}));
-	#	my $id=$self->dbh->{mysql_insertid};
-	#	return $id;
-	#}
+
+#
+# authority table functions
+#
+sub query_authority{
+	
+	
 }
 
-sub insert_collection_output {
-	die "insert_collection_output not implemented in adaptor\n";
-	#my ($self, %args) = @_;	
-	#my $dbh = $self->dbh;
-	#if ($self->sourcetype eq "MOBY::Adaptor::moby::queryapi::mysql"){
-	#	# this should be dropped down into the mysql.pm module??  probably...
-	#	$self->dbh->do("insert into collection_output (service_instance_id, article_name) values (?,?)", undef, ($args{service_instance}, $args{article_name}));
-	#	my $id=$self->dbh->{mysql_insertid};
-	#	return $id;
-	#}
+sub insert_authority{
+
+}
+
+sub delete_authority{
+	
+}
+
+
+#
+# service_instance table functions
+#
+sub query_service_instance {
+	die "query_service_instance not implemented in adaptor\n";
+}
+
+sub insert_service_instance {
+	die "insert_service_instance not implemented in adaptor\n";
+}
+
+sub delete_service_intance{
+	
+}
+
+#
+# simple_output table functions
+#
+sub query_simple_input{
+	
 }
 
 sub insert_simple_input {
@@ -153,6 +170,16 @@
 	#return $id;
 }
 
+sub delete_simple_input{
+	
+}
+
+#
+# simple_output table functions
+#
+sub query_simple_output{
+	
+}
 
 sub insert_simple_output {
 	die "insert_simple_output not implemented in adaptor\n";
@@ -177,14 +204,180 @@
 
 }
 
-sub query_service_instance {
-	die "query_service_instance not implemented in adaptor\n";
+sub delete_simple_output{
+	
 }
 
-sub insert_service_instance {
-	die "insert_service_instance not implemented in adaptor\n";
+#
+# collection_input table functions
+#
+sub query_collection_input{
+	
+}
+
+sub insert_collection_input {
+	die "insert_collection_input not implemented in adaptor\n";
+	#my ($self, %args) = @_;	
+	#my $dbh = $self->dbh;
+	#if ($self->sourcetype eq "MOBY::Adaptor::moby::queryapi::mysql"){
+	#	# this should be dropped down into the mysql.pm module??  probably...
+	#	$self->dbh->do("insert into collection_input (service_instance_id, article_name) values (?,?)", undef, ($args{service_instance}, $args{article_name}));
+	#	my $id=$self->dbh->{mysql_insertid};
+	#	return $id;
+	#}
+}
+
+sub delete_collection_input{
+	
+}
+
+#
+# collection_output table fuctions
+#
+sub query_collection_output{
+	
+}
+
+sub insert_collection_output {
+	die "insert_collection_output not implemented in adaptor\n";
+	#my ($self, %args) = @_;	
+	#my $dbh = $self->dbh;
+	#if ($self->sourcetype eq "MOBY::Adaptor::moby::queryapi::mysql"){
+	#	# this should be dropped down into the mysql.pm module??  probably...
+	#	$self->dbh->do("insert into collection_output (service_instance_id, article_name) values (?,?)", undef, ($args{service_instance}, $args{article_name}));
+	#	my $id=$self->dbh->{mysql_insertid};
+	#	return $id;
+	#}
+}
+
+sub delete_collection_output{
+	
+}
+
+#
+# object table functions
+#
+sub query_object{
+	
+}
+
+sub insert_object{
+
+}
+
+sub delete_object{
+	
+}
+
+#
+# object_term2term table functions
+#
+sub query_object_term2term{
+	
+}
+
+sub insert_object_term2term{
+	
+}
+
+sub delete_object_term2term{
+	
+}
+
+#
+# relationship table functions
+#
+sub query_relationship{
+	
+}
+
+sub insert_relationship{
+	
+}
+
+sub delete_relationship{
+	
+}
+
+#
+# service table fuctions
+#
+sub query_service{
+	
+}
+
+sub insert_service{
+	
+}
+
+sub delete_service{
+	
+}
+
+#
+# service_term2term table functions
+#
+sub query_service_term2term{
+	
+}
+
+sub insert_service_term2term{
+
+}
+
+sub delete_service_term2term{
+	
 }
 
+#
+# namespace table functions
+#
+sub query_namespace{
+	
+}
+
+sub insert_namespace{
+	
+}
+
+sub delete_namespace{
+	
+}
+
+#
+# namespace_term2term table functions
+#
+sub query_namespace_term2term{
+	
+}
+
+sub insert_namespace_term2term{
+	
+}
+
+sub delete_namespace_term2term{
+	
+}
+
+# secondary_input table functions
+sub query_secondary_input{
+	
+}
+
+sub insert_secondary_input{
+	
+}
+
+sub delete_secondary_input{
+	
+}
+
+#
+# query term2term tables - queries relation between two tables
+#
+sub select_term2term{
+	
+}
 
 sub _dump {
 	my ($self) = @_;