[Bio] / FigKernelPackages / FIG.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/FIG.pm

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

revision 1.527, Mon Oct 2 18:09:07 2006 UTC revision 1.528, Wed Oct 4 18:00:12 2006 UTC
# Line 5599  Line 5599 
5599    
5600    my $defined_val = "";    my $defined_val = "";
5601    if (defined($value)) {    if (defined($value)) {
5602        if (ref($value) eq "ARRAY") {
5603          my $vals;
5604          foreach my $val (@$value) {
5605            push(@$vals, "val='" . $val . "'");
5606          }
5607          $defined_val = " AND (" . join(" OR ", @$vals) . ")";
5608        } else {
5609      $defined_val = " AND val='" . $value . "'";      $defined_val = " AND val='" . $value . "'";
5610    }    }
5611      }
5612    
5613    my $statement = "SELECT prot, aliases, assigned_function, val, minloc FROM (SELECT CONCAT('fig|', genome, '.', ftype, '.', id) AS pid, val FROM attribute WHERE genome='" . $genome . "' AND tag='" . $experiment . "'" . $defined_val . ") AS t1 LEFT OUTER JOIN assigned_functions on t1.pid = assigned_functions.prot LEFT OUTER JOIN features ON t1.pid = features.id ORDER BY minloc";    my $statement = "SELECT prot, aliases, assigned_function, val, minloc FROM (SELECT CONCAT('fig|', genome, '.', ftype, '.', id) AS pid, val FROM attribute WHERE genome='" . $genome . "' AND tag='" . $experiment . "'" . $defined_val . ") AS t1 LEFT OUTER JOIN assigned_functions on t1.pid = assigned_functions.prot LEFT OUTER JOIN features ON t1.pid = features.id ORDER BY minloc";
5614    

Legend:
Removed from v.1.527  
changed lines
  Added in v.1.528

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3