[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.768, Sat May 9 15:22:57 2009 UTC revision 1.769, Sat May 9 15:30:01 2009 UTC
# Line 18071  Line 18071 
18071    
18072          my $sql="SELECT DISTINCT subsystem from subsystem_index WHERE (protein like 'fig\|$genome.peg.%'";          my $sql="SELECT DISTINCT subsystem from subsystem_index WHERE (protein like 'fig\|$genome.peg.%'";
18073          if (defined($all) && ($all == 2)) {          if (defined($all) && ($all == 2)) {
18074            $sql .= " AND (variant != '-1')";            $sql .= " AND (variant ne '-1')";
18075          } elsif (!$all) {$sql .= " AND (variant != '-1' AND variant != '0')"}          } elsif (!$all) {$sql .= " AND (variant ne '-1' AND variant != '0')"}
18076          $sql .= ")";          $sql .= ")";
18077    
18078          eval {          eval {
# Line 19071  Line 19071 
19071    $retVal = $rdbH->SQL(qq(SELECT COUNT(DISTINCT subsystem)    $retVal = $rdbH->SQL(qq(SELECT COUNT(DISTINCT subsystem)
19072                                              FROM subsystem_index                                              FROM subsystem_index
19073                                              WHERE (protein like 'fig\|$genomeID.peg.%' AND                                              WHERE (protein like 'fig\|$genomeID.peg.%' AND
19074                                                     variant != '-1')                                                     variant ne '-1')
19075                                             ));                                             ));
19076    return $retVal->[0]->[0];    return $retVal->[0]->[0];
19077  }  }
# Line 19166  Line 19166 
19166              $retVal = $rdbH->SQL(qq(SELECT DISTINCT subsystem,role,protein              $retVal = $rdbH->SQL(qq(SELECT DISTINCT subsystem,role,protein
19167                                              FROM subsystem_index                                              FROM subsystem_index
19168                                              WHERE (protein like 'fig\|$genomeID.peg.%' AND                                              WHERE (protein like 'fig\|$genomeID.peg.%' AND
19169                                                     (variant != '-1') AND (variant != '0'))                                                     (variant ne '-1') AND (variant != '0'))
19170                                             ));                                             ));
19171          };          };
19172      }      }

Legend:
Removed from v.1.768  
changed lines
  Added in v.1.769

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3