19234 |
|
|
19235 |
=item RETURN |
=item RETURN |
19236 |
|
|
19237 |
Returns a pointer to a list of 3-tuples. Each tuple consists of a subsystem name, a role ID, |
Returns a pointer to a list of 4-tuples. Each tuple consists of a subsystem name, a role ID, |
19238 |
and a feature ID. |
a feature ID, and the variant code. |
19239 |
|
|
19240 |
=back |
=back |
19241 |
|
|
19266 |
} |
} |
19267 |
|
|
19268 |
eval { |
eval { |
19269 |
$retVal = $rdbH->SQL(qq(SELECT DISTINCT subsystem,role,protein |
$retVal = $rdbH->SQL(qq(SELECT DISTINCT subsystem,role,protein,variant |
19270 |
FROM subsystem_index |
FROM subsystem_index |
19271 |
$constraint |
$constraint |
19272 |
)); |
)); |
19275 |
|
|
19276 |
if ($@ =~ /variant/) |
if ($@ =~ /variant/) |
19277 |
{ |
{ |
19278 |
$retVal = $rdbH->SQL(qq(SELECT DISTINCT subsystem,role,protein |
$retVal = $rdbH->SQL(qq(SELECT DISTINCT subsystem,role,protein,variant |
19279 |
FROM subsystem_index |
FROM subsystem_index |
19280 |
WHERE (protein like 'fig\|$genomeID.peg.%') |
WHERE (protein like 'fig\|$genomeID.peg.%') |
19281 |
)); |
)); |