[Bio] / Sprout / DBQuery.pm Repository:
ViewVC logotype

Diff of /Sprout/DBQuery.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3, Wed May 4 03:24:43 2005 UTC revision 1.6, Fri Oct 13 21:45:11 2006 UTC
# Line 70  Line 70 
70                  }                  }
71          } else {          } else {
72                  # Here we have a result, so we need to turn it into an instance object.                  # Here we have a result, so we need to turn it into an instance object.
73                  $retVal = DBObject::_new($self->{_db}, $self->{_objectNames}, @row);          $retVal = DBObject::_new($self, @row);
74                  Trace("Row returned from query.") if T(4);                  Trace("Row returned from query.") if T(4);
75          }          }
76          # Return the result.          # Return the result.
# Line 95  Line 95 
95    
96  Statement handle for the SELECT clause generated by the query.  Statement handle for the SELECT clause generated by the query.
97    
98  =item objectName1, objectName2, ...  =item relationMap
99    
100  Names of the objects being retrieved.  Reference to a list of 2-tuples. Each tuple consists of an object name as used in the
101    query followed by the actual name of that object. This enables the B<DBObject> to
102    determine the order of the tables in the query and which object name belongs to each
103    mapped object name. Most of the time these two values are the same; however, if a
104    relation occurs twice in the query, the relation name in the field list and WHERE
105    clause will use a mapped name (generally the actual relation name with a numeric
106    suffix) that does not match the actual relation name.
107    
108    =item searchObject (optional)
109    
110    If specified, then the query is a full-text search, and the first field will be a
111    relevance indicator for the named table.
112    
113  =back  =back
114    
# Line 105  Line 116 
116    
117  sub _new {  sub _new {
118          # Get the parameters.          # Get the parameters.
119          my ($database, $sth, @objectNames) = @_;      my ($database, $sth, $relationMap, $searchObject) = @_;
120          # Create this object.          # Create this object.
121          my $self = { _db => $database, _sth => $sth, _objectNames => \@objectNames };      my $self = { _db => $database, _sth => $sth, _objectNames => $relationMap,
122                     _fullText => $searchObject };
123          # Bless and return it.          # Bless and return it.
124          bless $self;          bless $self;
125          return $self;          return $self;

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.6

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3