";
echo "| ", ++$num, " | ";
//-- Family ID
if ($SHOW_ID_NUMBERS)
echo '', $family->getXrefLink("_blank"), ' | ';
//-- Husband ID
if ($SHOW_ID_NUMBERS)
echo '', $husb->getXrefLink("_blank"), ' | ';
//-- Husband name(s)
list($husb_name, $wife_name)=explode(' + ', $family->getSortName());
$names=$husb->getAllNames();
// The husband's primary/secondary name might not be the family's primary name
foreach ($names as $n=>$name) {
if ($name['sort']==$husb_name) {
$husb->setPrimaryName($n);
break;
}
}
$n1=$husb->getPrimaryName();
$n2=$husb->getSecondaryName();
$tdclass = "list_value_wrap";
if (!$husb->isDead()) $tdclass .= " alive";
if (!$husb->getChildFamilyIds()) $tdclass .= " patriarch";
echo "";
echo "getLinkUrl()), "\" class=\"list_item name2\" dir=\"", $TEXT_DIRECTION, "\">", PrintReady($names[$n1]['list']), "";
if ($tiny) echo $husb->getSexImage();
if ($n1!=$n2) {
echo "
getLinkUrl()), "\" class=\"list_item\">", PrintReady($names[$n2]['list']), "";
}
// Husband parents
echo $husb->getPrimaryParentsNames("parents_$table_id details1", "none");
echo " | ";
//-- Husb GIVN
list($surn, $givn)=explode(',', $husb->getSortName());
echo '', $givn, ' | ';
$mdate=$family->getMarriageDate();
//-- Husband age
echo "";
$hdate=$husb->getBirthDate();
if ($hdate->isOK()) {
if ($hdate->gregorianYear()>=1550 && $hdate->gregorianYear()<2030) {
$birt_by_decade[floor($hdate->gregorianYear()/10)*10] .= $husb->getSex();
}
if ($mdate->isOK()) {
$hage=GedcomDate::GetAgeYears($hdate, $mdate);
$hage_jd = $mdate->MinJD()-$hdate->MinJD();
echo '', $hage, '';
$marr_by_age[max(0, min($max_age, $hage))] .= $husb->getSex();
} else {
echo ' ';
}
} else {
echo ' ';
}
echo " | ";
//-- Wife ID
if ($SHOW_ID_NUMBERS)
echo '', $wife->getXrefLink("_blank"), ' | ';
//-- Wife name(s)
$names=$wife->getAllNames();
// The husband's primary/secondary name might not be the family's primary name
foreach ($names as $n=>$name) {
if ($name['sort']==$wife_name) {
$wife->setPrimaryName($n);
break;
}
}
$n1=$wife->getPrimaryName();
$n2=$wife->getSecondaryName();
$tdclass = "list_value_wrap";
if (!$wife->isDead()) $tdclass .= " alive";
if (!$wife->getChildFamilyIds()) $tdclass .= " patriarch";
echo "";
echo "getLinkUrl()), "\" class=\"list_item name2\" dir=\"", $TEXT_DIRECTION, "\">", PrintReady($names[$n1]['list']), "";
if ($tiny) echo $wife->getSexImage();
if ($n1!=$n2) {
echo "
getLinkUrl()), "\" class=\"list_item\">", PrintReady($names[$n2]['list']), "";
}
// Wife parents
echo $wife->getPrimaryParentsNames("parents_$table_id details1", "none");
echo " | ";
//-- Wife GIVN
list($surn, $givn)=explode(',', $wife->getSortName());
echo '', $givn, ' | ';
$mdate=$family->getMarriageDate();
//-- Wife age
echo "";
$wdate=$wife->getBirthDate();
if ($wdate->isOK()) {
if ($wdate->gregorianYear()>=1550 && $wdate->gregorianYear()<2030) {
$birt_by_decade[floor($wdate->gregorianYear()/10)*10] .= $wife->getSex();
}
if ($mdate->isOK()) {
$wage=GedcomDate::GetAgeYears($wdate, $mdate);
$wage_jd = $mdate->MinJD()-$wdate->MinJD();
echo '', $wage, '';
$marr_by_age[max(0, min($max_age, $wage))] .= $wife->getSex();
} else {
print " ";
}
} else {
print " ";
}
echo " | ";
//-- Marriage date
echo "";
if ($marriage_dates=$family->getAllMarriageDates()) {
foreach ($marriage_dates as $n=>$marriage_date) {
if ($n) {
echo ' ', $marriage_date->Display(!$SEARCH_SPIDER), ' ';
} else if ($marriage_date->MinJD()!=0) {
echo '', str_replace(' Display(!$SEARCH_SPIDER)), '', i18n::translate('Yes'), ' ', i18n::translate('No'), ' | ";
//-- Marriage anniversary
if ($tiny) {
echo "";
$mage=GedcomDate::GetAgeYears($mdate);
if (empty($mage)) echo " ";
else echo "", $mage, "";
echo " | ";
}
//-- Marriage place
echo '';
if ($marriage_places=$family->getAllMarriagePlaces()) {
foreach ($marriage_places as $marriage_place) {
if ($SEARCH_SPIDER) {
echo get_place_short($marriage_place), ' ';
} else {
echo '';
}
}
} else {
echo ' ';
}
echo ' | ';
//-- Number of children
if ($tiny) {
echo "";
if (showFactDetails('NCHI', $family->getXref(), 'FAM')) {
if($SEARCH_SPIDER) {
echo $family->getNumberOfChildren();
} else {
echo "getLinkUrl()), "\" class=\"list_item\" name=\"", $family->getNumberOfChildren(), "\">", $family->getNumberOfChildren(), "";
}
} else {
echo ' ';
}
echo " | ";
}
//-- Last change
if ($tiny && $SHOW_LAST_CHANGE)
echo '', $family->LastChangeTimestamp(empty($SEARCH_SPIDER)), ' | ';
//-- Sorting by marriage date
echo "";
if (!$family->canDisplayDetails() || !$mdate->isOK()) {
echo "U";
} else {
if (GedcomDate::Compare($mdate, $d100y)>0) {
echo "Y100";
} else {
echo "YES";
}
}
if ($family->isDivorced())
echo " DIV";
echo " | ";
//-- Sorting alive/dead
echo "";
if ($husb->isDead() && $wife->isDead()) echo "Y";
if ($husb->isDead() && !$wife->isDead()) {
if ($wife->getSex()=="F") echo "H";
if ($wife->getSex()=="M") echo "W"; // male partners
}
if (!$husb->isDead() && $wife->isDead()) {
if ($husb->getSex()=="M") echo "W";
if ($husb->getSex()=="F") echo "H"; // female partners
}
if (!$husb->isDead() && !$wife->isDead()) echo "N";
echo " | ";
//-- Roots or Leaves
echo "";
if (!$husb->getChildFamilyIds() && !$wife->getChildFamilyIds()) {
echo "R"; // roots
} elseif (!$husb->isDead() && !$wife->isDead() && $family->getNumberOfChildren()<1) {
echo "L"; // leaves
}
echo " | ";
echo "
\n";
}
echo "