| Source: |
|
| Name: |
|
0)
{
?>
| Nomencl. ref. |
|
0)
{
?>
| Nomencl. status(es) |
|
0)
{
//If it has homonyms show them, take the details.
$SQL="SELECT Name.NameId, Name.NameCache, Name.FullNameCache, Reference.RefYear FROM Name LEFT JOIN Reference ON Name.NomRefFk = Reference.RefId WHERE (Name.NameId = ".$Rhom["NameFk1"].")";
// $Rhom_details is of type "ADODB.Recordset"
echo $MM_jun_STRING;
echo $SQL;
echo 3;
echo 2;
echo 1;
$rs=mssql_query();
while(!($Rhom_details==0))
{
$non_part=$Rhom_details["FullNameCache"];
if ($Rhom_details["RefYear"]!="")
{
$non_part=$non_part." (".$Rhom_details["RefYear"].")";
}
?>
| Homonyms |
|
| Rank: |
|
| Status: |
;
$red>;
if ($Rptaxon["DoubtfulFlag"]="d")
{
$PRELIMINARY<$%;
}
;
} ?>
|
0)
{
?>
| Is basionym for: |
"> |
0)
{
$nameid=$Rherar["PTNameFk"];
$refid=$Rherar["PTRefFk"];
$herarchy[0][$cont]=$nameid;
$herarchy[1][$cont]=$refid;
//Show the reference as "sec." when the reference is different from the one using the potential taxon
if ($Rherar["PTRefFk"]!=$refid)
{
$herarchy[2][$cont]="".$Rherar["FullNameCache"]." sec. ".$Rherar["RefCache"];
}
else
{
$herarchy[2][$cont]="".$Rherar["FullNameCache"]."";
}
$herarchy[3][$cont]=$Rherar["Rank"];
$cont=$cont+1;
}
else
{
$nameid="";
$refid="";
$control=0;
}
$Rherar=null;
}
if ($herarchy[0][0]!="")
{
?>
| Taxonomy (this taxon is included in): |
=0; $i=$i-1)
{
?>
-
|
0)
{
$contador=0;
while(!($Rinclu==0))
{
$contador=$contador+1;
?>
| Included taxa:
|
&PTRefFk="> sec. |
0)
{
$contador=0;
while(!($Racc==0))
{
$contador=$contador+1;
?>
|
Synonym of:
|
&PTRefFk="> |
0)
{
?>
| Basionym: |
&PTRefFk="> |
0)
{
$contador=0;
$syn_rel="";
while(!($Rsyn==0))
{
$contador=$contador+1;
?>
|
|
&PTRefFk="> |
0)
{
?>
|
Concept Synonym(s):
|
|
| |
According to: |
| |
";
}
if ($Rcsyn["is_included_in"]!=0)
{
if ($concept_images!="")
{
$concept_images=$concept_images.",![](\"images/is_include_in_symbol.gif\") ";
}
else
{
$concept_images="";
}
}
if ($Rcsyn["includes"]!=0)
{
if ($concept_images!="")
{
$concept_images=$concept_images.",![](\"images/includes_symbol.gif\") ";
}
else
{
$concept_images="";
}
}
if ($Rcsyn["overlaps"]!=0)
{
if ($concept_images!="")
{
$concept_images=$concept_images.",![](\"images/overlaps_symbol.gif\") ";
}
else
{
$concept_images="";
}
}
if ($Rcsyn["excludes"]!=0)
{
if ($concept_images!="")
{
$concept_images=$concept_images.",![](\"images/excludes_symbol.gif\") ";
}
else
{
$concept_images="";
}
}
$concept_images="{".$concept_images."}";
if ($Rcsyn["doubtful"]!=0)
{
$concept_images="?".$concept_images;
}
?>
&PTRefFk="> sec. |
0)
{
$contador=0;
while(!($Rmiss==0))
{
$contador=$contador+1;
?>
|
Missaplied Name(s):
|
&PTRefFk="> sec. [] |
| Name Notes: |
|
| Taxon Notes: |
|
|
|
0)
{
$VisibleColExist=true;
}
else
{
$VisibleColExist=false;
}
$RVisibleCol=null;
//I create a different SQL depending if the Visible column exist or not in the database if ($VisibleColExist==true)
{
$SQL="SELECT PTaxon.PTNameFk, PTaxon.PTRefFk, FactCategory.FactCategory, FactCategory.FactCategoryId , FactCategory.Visible, Fact.Fact, FactCategory.MaxFactNumber FROM (PTaxon INNER JOIN Fact ON (PTaxon.PTRefFk = Fact.PTRefFk) AND (PTaxon.PTNameFk = Fact.PTNameFk)) INNER JOIN FactCategory ON Fact.FactCategoryFk = FactCategory.FactCategoryId WHERE (((PTaxon.PTNameFk)=".$Rptaxon["PTNameFk"].") AND ((PTaxon.PTRefFk)=".$Rptaxon["PTRefFk"].")) ORDER BY FactCategory.FactCategory";
}
else
{
$SQL="SELECT PTaxon.PTNameFk, PTaxon.PTRefFk, FactCategory.FactCategory, FactCategory.FactCategoryId , Fact.Fact, FactCategory.MaxFactNumber FROM (PTaxon INNER JOIN Fact ON (PTaxon.PTRefFk = Fact.PTRefFk) AND (PTaxon.PTNameFk = Fact.PTNameFk)) INNER JOIN FactCategory ON Fact.FactCategoryFk = FactCategory.FactCategoryId WHERE (((PTaxon.PTNameFk)=".$Rptaxon["PTNameFk"].") AND ((PTaxon.PTRefFk)=".$Rptaxon["PTRefFk"].")) ORDER BY FactCategory.FactCategory";
}
// $Rfacts is of type "ADODB.Recordset"
echo $MM_jun_STRING;
echo $SQL;
echo 3;
echo 2;
echo 1;
$rs=mssql_query();
if (mssql_num_rows($Rfacts_query)>0)
{
//--------------------------------------------------------
//To concatenate the facts by category first all of them are included in an array
$control=0;
//I will use a different code depending if the Visible column exist or not, using the VisibleColExist= True
while(!($Rfacts==0))
{
if ($VisibleColExist==true)
{
if ($control>0)
{
//Only add the fact to the array if it can be output (MaxFactNumber<>0) if ($Rfacts["Visible"]=true)
{
if ($facts[0][$control-1]==$Rfacts["FactCategory"])
{
$facts[1][$control-1]=$facts[1][$control-1].", ".$Rfacts["Fact"];
}
else
{
$facts[0][$control]=$Rfacts["FactCategory"];
$facts[1][$control]=$Rfacts["Fact"];
$control=$control+1;
}
}
}
}
else
{
if ($Rfacts["Visible"]=true)
{
$facts[0][0]=$Rfacts["FactCategory"];
}
$facts[1][0]=$Rfacts["Fact"];
$control=1;
}
else
{
$control=0;
}
} if ()
{
}
else
{
}
if ($control>0)
{
if ($facts[0][$control-1]==$Rfacts["FactCategory"])
{
$facts[1][$control-1]=$facts[1][$control-1].", ".$Rfacts["Fact"];
}
else
{
$facts[0][$control]=$Rfacts["FactCategory"];
$facts[1][$control]=$Rfacts["Fact"];
$control=$control+1;
}
}
else
{
$facts[0][0]=$Rfacts["FactCategory"];
$facts[1][0]=$Rfacts["Fact"];
$control=1;
}
}
$Rfacts=mssql_fetch_array($Rfacts_query);
}
$Rfacts=null;
?>
| Facts: |
|
| : |
|
|
