xXx

Hexid M1n1 5h3ll MobiLe

C:/www/familytree/mods/_[ Writable ]

File:C:/www/familytree/mods/ancestors_map_1_add_map_v10.1.0.2.cfg

%name:Ancestor Map%
%version:v10.1.0.2%
%description:This mod was developed from a discussion on <i>Adding a map to Ancestry for an individual, Putting all ancestors for an individual on a google map</i> in this 
<a href="http://www.tngforum.us/index.php?showtopic=4055&hl=">TNG Forum entry</a>. 
<br /><br />Developer is R&eacute;al Charlebois. This mod cfg file was prepared by Bruce Roy and updated for TNG V8 version by Bryan S. Larson. Mod was updated by Roger Moffat, for TNG V9.<br /><br />Mod was updated by Roger Moffat, for TNG V10 and TNG V10.1. See TNG Wiki article <a href="http://tng.lythgoes.net/wiki/index.php?title=Ancestor_map" target="_blank">Ancestor Map</a> for additional details.%

%wikipage:Ancestor_map%

%target:pedigree.php%
	Location 1 - line 31
%location:%
$pdfform_url = getURL( "rpt_pdfform", 1 );
%end:%
%insert:after%
//added for ancestors map created by Réal Charlebois
$mappedigree_url = getURL( "mappedigree", 1 );
%end:%  

	Location 2 - line 486
%location:%
		$innermenu .= " &nbsp;&nbsp; | &nbsp;&nbsp; <a href=\"#\" class=\"lightlink\" onclick=\"tnglitbox = new LITBox('$pdfform_url" . "pdftype=ped&amp;personID=' + firstperson + '&amp;tree=$tree&amp;generations=$generations',{width:350,height:350});return false;\">PDF</a>\n";
%end:%
%insert:after%
//added for ancestors map created by Réal Charlebois
	$innermenu .= "&nbsp;&nbsp; | &nbsp;&nbsp; <a href=\"$mappedigree_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&amp;generations=$generations\" class=\"lightlink\" id=\"maplnk\">{$text['ancestorsmap']}</a>\n";
%end:%

%target:pedigreetext.php%
	Location 1 - line 18
%location:%
$pdfform_url = getURL( "rpt_pdfform", 1 );
%end:%
%insert:after%
//added for ancestors map created by Réal Charlebois
$mappedigree_url = getURL( "mappedigree", 1 );
%end:%  

	Location 2 - line 298
%location:%
		$innermenu .= " &nbsp;&nbsp; | &nbsp;&nbsp; <a href=\"#\" class=\"lightlink\" onclick=\"tnglitbox = new LITBox('$pdfform_url" . "pdftype=ped&amp;personID=$personID&amp;tree=$tree&amp;generations=$generations',{width:350,height:350});return false;\">PDF</a>\n";
%end:%
%insert:after%
//added for ancestors map created by Réal Charlebois
	$innermenu .= "&nbsp;&nbsp; | &nbsp;&nbsp;<a href=\"$mappedigree_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&amp;generations=$generations\" class=\"lightlink\" id=\"maplnk\">{$text['ancestorsmap']}</a>\n";
%end:%


%target:verticalchart.php%
	Location 1 - line 13
%location:%
$pdfform_url = getURL( "rpt_pdfform", 1 );
%end:%
%insert:after%
//added for ancestors map created by Réal Charlebois
$mappedigree_url = getURL( "mappedigree", 1 );
%end:%  

	Location 2 - line 74
%location:%
		$innermenu .= " &nbsp;&nbsp; | &nbsp;&nbsp; <a href=\"#\" class=\"lightlink\" onclick=\"tnglitbox = new LITBox('$pdfform_url" . "pdftype=ped&amp;personID=$personID&amp;tree=$tree&amp;generations=$generations',{width:350,height:350});return false;\">PDF</a>\n";
%end:%
%insert:after%
//added for ancestors map created by Réal Charlebois
	$innermenu .= "&nbsp;&nbsp; | &nbsp;&nbsp;<a href=\"$mappedigree_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&amp;generations=$generations\" class=\"lightlink\" id=\"maplnk\">{$text['ancestorsmap']}</a>\n";
%end:%

%target:ahnentafel.php%
	Location 1 - line 17
%location:%
$pdfform_url = getURL( "rpt_pdfform", 1 );
%end:%
%insert:after%
//added for ancestors map created by Réal Charlebois
$mappedigree_url = getURL( "mappedigree", 1 );
%end:%  
	Location 2 - line 104
%location:%
		$innermenu .= " &nbsp;&nbsp; | &nbsp;&nbsp; <a href=\"#\" class=\"lightlink\" onclick=\"tnglitbox = new LITBox('$pdfform_url" . "pdftype=ped&amp;personID=$personID&amp;tree=$tree&amp;generations=$generations',{width:350,height:350});return false;\">PDF</a>\n";
%end:%
%insert:after%
//added for ancestors map created by Réal Charlebois
	$innermenu .= "&nbsp;&nbsp; | &nbsp;&nbsp;<a href=\"$mappedigree_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&amp;generations=$generations\" class=\"lightlink\" id=\"maplnk\">{$text['ancestorsmap']}</a>\n";
%end:%

%target:extrastree.php%
	Location 1 - line 12
%location:%
$pdfform_url = getURL( "rpt_pdfform", 1 );
%end:%
%insert:after%
//added for ancestors map created by Réal Charlebois
$mappedigree_url = getURL( "mappedigree", 1 );
%end:%  
	Location 2 - line 166
%location:%
	$innermenu .= " &nbsp;&nbsp; | &nbsp;&nbsp; <a href=\"#\" class=\"lightlink\" onclick=\"tnglitbox = new LITBox('$pdfform_url" . "pdftype=ped&amp;personID=$personID&amp;tree=$tree&amp;generations=$generations',{width:350,height:350});return false;\">PDF</a>\n";
%end:%
%insert:after%
//added for ancestors map created by Réal Charlebois
	$innermenu .= "&nbsp;&nbsp; | &nbsp;&nbsp;<a href=\"$mappedigree_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&amp;generations=$generations\" class=\"lightlink\" id=\"maplnk\">{$text['ancestorsmap']}</a>\n";
%end:%

%target:languages/English/cust_text.php%
%location:%
?>
%end:%
%insert:before%
// added for use with mappedigree file
$text['ancestorsmap'] = "Map";
%end:%

%target:languages/English-UTF8/cust_text.php%
%location:%
?>
%end:%
%insert:before%
// added for use with mappedigree file
$text['ancestorsmap'] = "Map";
%end:%

%target:css/genstyle.css%
%location:%
/* Classes for TNG Mods to be added below */
%end:%
%insert:after%
 
/* added by Ancestor Map mod for use with mappedigree file */
.mapballoonpedigree {
	width:360px;
}
%end:%

%newfile:mappedigree.php%
%fileversion:v10.1.0.2%
<?php
// Ancestor Map
//   Shows a Google map of birth places of the individual's ancestors.
//   Developed by Réal Charlebois.  Updated by Ken Roy to get mapconfig.php from $subroot.
//   Updated by Roger Moffat to include numbers on the map pins on the Event List and to quote all $text variables.
// %version:v10.1.0.2%  
$textpart = "pedigree";
include("tng_begin.php");
include($subroot . "pedconfig.php");
if(!$personID) {header( "Location: thispagedoesnotexist.html" ); exit;}
include($subroot . "mapconfig.php");
include($cms['tngpath'] . "reglib.php" );
if($map['key'])
include_once($cms['tngpath'] . "googlemaplib.php");

$getperson_url = getURL( "getperson", 1 );
$descend_url = getURL( "descend", 1 );
$familygroup_url = getURL( "familygroup", 1 );
$ahnentafel_url = getURL( "ahnentafel", 1 );
$vertical_url = getURL( "verticalchart", 1 );
$pedigree_url = getURL( "pedigree", 1 );
$pedigreetext_url = getURL( "pedigreetext", 1 );
$extrastree_url = getURL( "extrastree", 1 );
$pdfform_url = getURL( "rpt_pdfform", 1 );
$mappedigree_url = getURL( "mappedigree", 1 );

$generation = 1;
$personcount = 1;

$currgen = array();
$nextgen = array();
$numbers = array();
$lastgen = array();
$lastlastgen = array();

$result = getPersonFullPlusDates($tree, $personID);
if( !tng_num_rows($result) ) {
	if(!$allow_add && !isset($needperson)) {
		tng_free_result($result);
		header( "Location: thispagedoesnotexist.html" );
		exit;
	}
}

	$row = tng_fetch_assoc( $result );
	$righttree = checktree($tree);
	$rightbranch = $righttree ? checkbranch($row['branch']) : false;
	$rights = determineLivingPrivateRights($row, $righttree, $rightbranch);
	$row['allow_living'] = $rights['living'];
	$row['allow_private'] = $rights['private'];
	$row['name'] = getName( $row );
	//if( $row['name'] == $text['living'] ) $row['firstname'] = $text['living'];
	$firstfirstname = getFirstNameOnly( $row );

	$logname = $tngconfig['nnpriv'] && $row['private'] ? $admtext['text_private'] : ($nonames && $row['living'] ? $text['living'] : $pedname);
	$row['genlist'] = "";
	$row['number'] = 1;
	$row['spouses'] = getSpouses( $personID, $row['sex'] );
	$disallowgedcreate = $row['disallowgedcreate'];
	$allowpdf = !$treerow['disallowpdf'] || ($allow_pdf && $rightbranch);
	$lastlastgen[$personID] = 1;

writelog( "<a href=\"$mappedigree_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&generations=$generations\">" . xmlcharacters("$text[pedigreefor]: $logname ($personID)") . "</a>" );
preparebookmark( "<a href=\"$mappedigree_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&generations=$generations\">" . xmlcharacters("$text[pedigreefor]: " . $row['name'] . " ($personID)") . "</a>" );

$flags['tabs'] = $tngconfig['tabs'];

if( $map['key'] )
    $flags['scripting'] .= "<script type=\"text/javascript\" src=\"{$http}://maps.googleapis.com/maps/api/js?sensor=false&amp;language={$text['glang']}\"></script>\n";

tng_header( $row['name'], $flags );
  $namestr = $text['generation']." 1 - ".getName( $row );
  $nameformap = "";
	echo tng_DrawHeading( "", $namestr, getYears( $row ) );

	if( !$pedigree['maxgen'] ) $pedigree['maxgen'] = 6;
	if( $generations > $pedigree['maxgen'] ) 
	    $generations = $pedigree['maxgen'];
	else if( !$generations ) 
	    $generations = $pedigree['maxgen'] < 4 ? $pedigree['maxgen'] : 4;

	$innermenu = "$text[generations]: &nbsp;";
	$innermenu .= "<select name=\"generations\" class=\"verysmall\" onchange=\"window.location.href='$mappedigree_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&amp;generations=' + this.options[this.selectedIndex].value\">\n";
    for( $i = 1; $i <= $pedigree['maxgen']; $i++ ) {
        $innermenu .= "<option value=\"$i\"";
        if( $i == $generations ) $innermenu .= " selected=\"selected\"";
        $innermenu .= ">$i</option>\n";
    }
	$innermenu .= "</select>&nbsp;&nbsp;&nbsp;\n";
	$innermenu .= "<a href=\"$pedigree_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&amp;display=standard&amp;generations=$generations\" class=\"lightlink$slinkstyle\" id=\"stdpedlnk\">{$text['pedstandard']}</a> &nbsp;&nbsp; | &nbsp;&nbsp; \n";
	$innermenu .= "<a href=\"$vertical_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&amp;display=vertical&amp;generations=$generations\" class=\"lightlink$chtlinkstyle\" id=\"pedchartlnk\">{$text['pedvertical']}</a> &nbsp;&nbsp; | &nbsp;&nbsp; \n";
	$innermenu .= "<a href=\"$pedigree_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&amp;display=compact&amp;generations=$generations\" class=\"lightlink$clinkstyle\" id=\"compedlnk\">{$text['pedcompact']}</a> &nbsp;&nbsp; | &nbsp;&nbsp; \n";
	$innermenu .= "<a href=\"$pedigree_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&amp;display=box&amp;generations=$generations\" class=\"lightlink$blinkstyle\" id=\"boxpedlnk\">{$text['pedbox']}</a> &nbsp;&nbsp; | &nbsp;&nbsp; \n";
	$innermenu .= "<a href=\"$pedigreetext_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&amp;generations=$generations\" class=\"lightlink\" id=\"textlnk\">{$text['pedtextonly']}</a> &nbsp;&nbsp; | &nbsp;&nbsp; \n";
	$innermenu .= "<a href=\"$ahnentafel_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&amp;generations=$generations\" class=\"lightlink\" id=\"ahnlnk\">{$text['ahnentafel']}</a> &nbsp;&nbsp; | &nbsp;&nbsp; \n";
	$innermenu .= "<a href=\"$extrastree_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&amp;showall=1&amp;generations=$generations\" class=\"lightlink\" id=\"extralnk\">{$text['media']}</a>\n";
	if($generations <= 6 && $allowpdf)
		$innermenu .= " &nbsp;&nbsp; | &nbsp;&nbsp; <a href=\"#\" class=\"lightlink\" onclick=\"tnglitbox = new LITBox('$pdfform_url" . "pdftype=ped&amp;personID=$personID&amp;tree=$tree&amp;generations=$generations',{width:350,height:350});return false;\">PDF</a>\n";
	$innermenu .= " &nbsp;&nbsp; | &nbsp;&nbsp; <a href=\"$mappedigree_url" . "personID=$personID&amp;tree=$tree&amp;parentset=$parentset&amp;generations=$generations\" class=\"lightlink3\" id=\"maplnk\">$text[ancestorsmap]</a>\n";

	echo getFORM( "mappedigree", "", "form1", "form1" );
	echo tng_menu( "I", "pedigree", $personID, $innermenu );
	echo "</form>\n";

//do self
    $gentxt = $text['generation']." 1 - ";
    if ( $rights['both'] ) {
		setEvent( array( "text"=>$gentxt.$row['name'].": ".$text['born'], "fact"=>$stdex['BIRT'], "date"=>$row['birthdate'], "place"=>$row['birthplace'], "event"=>"BIRT", "entity"=>$personID, "type"=>"I" ), $row['birthdatetr'] );
		setEvent( array( "text"=>$gentxt.$row['name'].": ".$text['christened'], "fact"=>$stdex['CHR'], "date"=>$row['altbirthdate'], "place"=>$row['altbirthplace'], "event"=>"CHR", "entity"=>$personID, "type"=>"I" ), $row['altbirthdatetr'] );
		setEvent( array( "text"=>$gentxt.$row['name'].": ".$text['baptizedlds'], "fact"=>$stdex['BAPL'], "date"=>$row['baptdate'], "place"=>$row['baptplace'], "event"=>"BAPL", "entity"=>$personID, "type"=>"I" ), $row['baptdatetr'] );
	//	doCustomEvents($personID,"I");
		setEvent( array( "text"=>$gentxt.$row['name'].": ".$text['died'], "fact"=>$stdex['DEAT'], "date"=>$row['deathdate'], "place"=>$row['deathplace'], "event"=>"DEAT", "entity"=>$personID, "type"=>"I" ), $row['deathdatetr'] );
		setEvent( array( "text"=>$gentxt.$row['name'].": ".$text['buried'], "fact"=>$stdex['BURI'], "date"=>$row['burialdate'], "place"=>$row['burialplace'], "event"=>"BURI", "entity"=>$personID, "type"=>"I" ), $row['burialdatetr'] );

		setEvent( array( "text"=>$gentxt.$row['name'].": ".$text['married'], "fact"=>$stdexf['MARR'], "date"=>$row['marrdate'], "place"=>$row['marrplace'], "event"=>"MARR", "entity"=>$row['familyID'], "type"=>"F" ), $row['marrdatetr'] );
		setEvent( array( "text"=>$gentxt.$row['name'].": ".$text['divorced'], "fact"=>$stdexf['DIV'], "date"=>$row['divdate'], "place"=>$row['divplace'], "event"=>"DIV", "entity"=>$row['familyID'], "type"=>"F" ), $row['divdatetr'] );
		}

	//do marriages of Generation 1
		if ( $row['sex'] == "M" ) {
		$sex = $text['male']; $spouse = "wife"; $self = "husband"; $spouseorder = "husborder";
	}
	else if ($row['sex'] == "F" ) {
		$sex = $text['female']; $spouse = "husband"; $self = "wife"; $spouseorder = "wifeorder";
	}
	else {
		$sex = $text['unknown'];   $spouseorder = "";
	}
	
	if( $spouseorder )
		$query = "SELECT $spouse, familyID, living, branch, marrdate, marrdatetr, marrplace, marrtype, divdate, divdatetr, divplace, sealdate, sealdatetr, sealplace, DATE_FORMAT(changedate,\"%d %b %Y\") as changedate FROM $families_table WHERE $families_table.$self = \"$personID\" AND gedcom = \"$tree\" ORDER BY $spouseorder";
	else
		$query = "SELECT husband, wife, familyID, living, branch, marrdate, marrdatetr, marrplace, marrtype, divdate, divdatetr, divplace, sealdate, sealdatetr, sealplace, DATE_FORMAT(changedate,\"%d %b %Y\") as changedate FROM $families_table WHERE $families_table.husband = \"$personID\" AND gedcom = \"$tree\" UNION SELECT husband, wife, familyID, living, branch, marrdate, marrdatetr, marrplace, marrtype, divdate, divdatetr, divplace, sealdate, sealdatetr, sealplace, DATE_FORMAT(changedate,\"%d %b %Y %H:%i:%s\") as changedate FROM $families_table WHERE $families_table.wife = \"$personID\" AND gedcom = \"$tree\"";
	$marriages= tng_query($query) or die ("$text[cannotexecutequery]: $query");
	$marrtot = tng_num_rows($marriages);
	if( !$marrtot ) {
		$query = "SELECT husband, wife, familyID, living, branch, marrdate, marrdatetr, marrplace, marrtype, divdate, divdatetr, divplace, sealdate, sealdatetr, sealplace, DATE_FORMAT(changedate,\"%d %b %Y\") as changedate FROM $families_table WHERE $families_table.husband = \"$personID\" AND gedcom = \"$tree\" UNION SELECT husband, wife, familyID, living, branch, marrdate, marrdatetr, marrplace, marrtype, divdate, divdatetr, divplace, sealdate, sealdatetr, sealplace, DATE_FORMAT(changedate,\"%d %b %Y\") as changedate FROM $families_table WHERE $families_table.wife = \"$personID\" AND gedcom = \"$tree\"";
		$marriages= tng_query($query) or die ("$text[cannotexecutequery]: $query");
		$marrtot = tng_num_rows($marriages);
		$spouseorder = 0;
	}
	$marrcount = 1;

	while ( $marriagerow =  tng_fetch_assoc( $marriages ) )
	{
		if( $marriagerow['marrtype'] ) {
			if( !is_array( $stdexf['MARR'] ) ) $stdexf['MARR'] = array();
			array_unshift( $stdexf['MARR'], "$text[type]: $marriagerow[marrtype]" );
		}

		if( !$spouseorder )
			$spouse = $marriagerow['husband'] == $personID ? wife : husband;
		unset($spouserow);
		if( $marriagerow[$spouse] ) {
			$query = "SELECT personID, lastname, lnprefix, firstname, prefix, suffix, nameorder, birthdate, birthplace, altbirthdate, altbirthplace, deathdate, deathplace, burialdate, burialplace, living, branch FROM $people_table WHERE personID = \"$marriagerow[$spouse]\" AND gedcom = \"$tree\"";
			$spouseresult= tng_query($query) or die ("$text[cannotexecutequery]: $query");
			$spouserow =  tng_fetch_assoc( $spouseresult );
			$spouserow['allow_living'] = !$spouserow['living'] || $livedefault == 2 || ( $allow_living && checkbranch( $spouserow['branch'] ) ) ? 1 : 0;
		}
		else
		$marrstr = $marrtot > 1 ? " $marrcount" : "";
		if( $spouserow['allow_living'] )
		$rightfbranch = checkbranch( $marriagerow['branch'] ) ? 1 : 0;
		$marriagerow['allow_living'] = !$marriagerow['living'] || $livedefault == 2 || ( $allow_living && $rightfbranch ) ? 1 : 0;
		if( $marriagerow['allow_living'] ) {
			setEvent( array( "text"=>$gentxt.$row['name']." & ".$spouserow['firstname']." ".$spouserow['lastname'].": ".$text[married], "fact"=>$stdexf['MARR'], "date"=>$marriagerow['marrdate'], "place"=>$marriagerow['marrplace'], "event"=>"MARR", "entity"=>$marriagerow['familyID'], "type"=>"F" ), $marriagerow['marrdatetr'] );
			setEvent( array( "text"=>$gentxt.$row['name']." & ".$spouserow['firstname']." ".$spouserow['lastname'].": ".$text[divorced], "fact"=>$stdexf['DIV'], "date"=>$marriagerow['divdate'], "place"=>$marriagerow['divplace'], "event"=>"DIV", "entity"=>$marriagerow['familyID'], "type"=>"F" ), $marriagerow['divdatetr'] );
			if( $allow_lds ) {
				setEvent( array( "text"=>$gentxt.$row['name']." & ".$spouserow['firstname']." ".$spouserow['lastname'].": ".$text[sealedslds], "fact"=>$stdexf['SLGS'], "date"=>$marriagerow['sealdate'], "place"=>$marriagerow['sealplace'], "event"=>"SLGS", "entity"=>$marriagerow['familyID'], "type"=>"F" ), $marriagerow['sealdatetr'] );
			}
		}
		$marrcount++;
  }
// end of marriages of generation 1

//push famc (family of parents) to nextgen
$parentfamID = "";
$locparentset = $parentset;
$parentscount = 0;
$parentfamIDs = array();
$query = "SELECT familyID FROM $children_table WHERE personID = \"$personID\" AND gedcom = \"$tree\" ORDER BY parentorder";
$parents = tng_query($query) or die ("$text[cannotexecutequery]: $query");
if ( $parents ) {
	$parentscount = tng_num_rows( $parents );
	if ( $parentscount > 0 ) {
		if ( $locparentset > $parentscount )
			$locparentset = $parentscount;
		$i = 0;
		while ( $parentrow = tng_fetch_assoc( $parents ) ) {
			$i++;
			if( $i == $locparentset )
				$parentfamID = $parentrow['familyID'];
			$parentfamIDs[$i] = $parentrow['familyID'];
		}
		if(!$parentfamID) $parentfamID = $row['famc'];
	}
	tng_free_result($parents);
}

array_push( $currgen, $parentfamID );
$generation++;
$personcount = 1;
$numbers[$parentfamID] = 1;

//loop through nextgen
//while there's one to pop and we're less than maxgen
while( count( $currgen ) && $generation <= $generations ) {
	while( $nextfamily = array_shift( $currgen ) ) {
		$query = "SELECT husband, wife, marrdate, marrplace, living, branch FROM $families_table WHERE familyID = \"$nextfamily\" AND gedcom = \"$tree\"";
		$parents = tng_query($query) or die ("$text[cannotexecutequery]: $query");
		if( $parents ) {
			$parentrow = tng_fetch_assoc( $parents );
			if( $parentrow['husband'] ) {

				$gotfather = getPersonFullPlusDates($tree, $parentrow[husband]);
					if( $gotfather ) { 		
					$fathrow =  tng_fetch_assoc( $gotfather );
					if( $fathrow['firstname'] || $fathrow['lastname'] ) {
						$personcount = $numbers[$nextfamily] * 2;
						$lastgen[$fathrow['personID']] = $personcount;
						$righttree = checktree($tree);
						$rightbranch = $righttree ? checkbranch($fathrow['branch']) : false;
						$rights = determineLivingPrivateRights($fathrow, $righttree, $rightbranch);
						$fathrow['allow_living'] = $rights['living'];
						$fathrow['allow_private'] = $rights['private'];
						$fathrow['name'] = getName( $fathrow );

            $gentxt = $text['generation']." $generation - ";
			if ( $rights['both'] ) {
	            setEvent( array( "text"=>$gentxt.$fathrow['name'].": ".$text['born'], "fact"=>$stdex['BIRT'], "date"=>$fathrow['birthdate'], "place"=>$fathrow['birthplace'], "event"=>"BIRT", "entity"=>$fathrow['personID'], "type"=>"I" ), $fathrow['birthdatetr'] );
	            setEvent( array( "text"=>$gentxt.$fathrow['name'].": ".$text['christened'], "fact"=>$stdex['CHR'], "date"=>$fathrow['altbirthdate'], "place"=>$fathrow['altbirthplace'], "event"=>"CHR", "entity"=>$fathrow['personID'], "type"=>"I" ), $fathrow['altbirthdatetr'] );
	            setEvent( array( "text"=>$gentxt.$fathrow['name'].": ".$text['baptizedlds'], "fact"=>$stdex['BAPL'], "date"=>$fathrow['baptdate'], "place"=>$fathrow['baptplace'], "event"=>"BAPL", "entity"=>$fathrow['personID'], "type"=>"I" ), $fathrow['baptdatetr'] );
	            //doCustomEvents($fathrow['personID'],"I");
	            setEvent( array( "text"=>$gentxt.$fathrow['name'].": ".$text['died'], "fact"=>$stdex['DEAT'], "date"=>$fathrow['deathdate'], "place"=>$fathrow['deathplace'], "event"=>"DEAT", "entity"=>$fathrow['personID'], "type"=>"I" ), $fathrow['deathdatetr'] );
 	           setEvent( array( "text"=>$gentxt.$fathrow['name'].": ".$text['buried'], "fact"=>$stdex['BURI'], "date"=>$fathrow['burialdate'], "place"=>$fathrow['burialplace'], "event"=>"BURI", "entity"=>$$fathrow['personID'], "type"=>"I" ), $fathrow['burialdatetr'] );
				}
						if( $fathrow['famc'] ) {
							if( !in_array( $fathrow['famc'], $nextgen ) )
								array_push( $nextgen, $fathrow['famc'] );
							if(!$numbers[$fathrow['famc']])
								$numbers[$fathrow['famc']] = $personcount;
						}
					}
					tng_free_result( $gotfather );
				} 
			}

			if( $parentrow['wife'] ) {
			$gotmother = getPersonFullPlusDates($tree, $parentrow[wife]);
				if( $gotmother ) { 
					$mothrow =  tng_fetch_assoc( $gotmother );
					if( $mothrow['firstname'] || $mothrow['lastname'] ) {
						$personcount = $numbers[$nextfamily] * 2 + 1;
						$lastgen[$mothrow['personID']] = $personcount;
						$righttree = checktree($tree);
						$rightbranch = $righttree ? checkbranch($mothrow['branch']) : false;
						$rights = determineLivingPrivateRights($mothrow, $righttree, $rightbranch);
						$mothrow['allow_living'] = $rights['living'];
						$mothrow['allow_private'] = $rights['private'];
						$mothrow['name'] = getName( $mothrow );
			    if ( $rights['both'] ) {
						if( $mothrow['name'] == $text[living] ) $mothrow['firstname'] = $text[living];

						if( $parentrow['husband'] ) {
							$parentrow['allow_living'] = $mothrow['allow_living'];	
							setEvent( array( "text"=>$gentxt.$fathrow['name']." & ".$mothrow['name'].": ".$text['married'], "fact"=>$stdexf['MARR'], "date"=>$parentrow['marrdate'], "place"=>$parentrow['marrplace'], "event"=>"MARR", "entity"=>$parentrow['familyID'], "type"=>"F" ), $parentrow['marrdatetr'] );
							setEvent( array( "text"=>$gentxt.$fathrow['name']." & ".$mothrow['name'].": ".$text['divorced'], "fact"=>$stdexf['DIV'], "date"=>$parentrow['divdate'], "place"=>$parentrow['divplace'], "event"=>"DIV", "entity"=>$parentrow['familyID'], "type"=>"F" ), $parentrow['divdatetr'] );
						}

					setEvent( array( "text"=>$gentxt.$mothrow['name'].": ".$text['born'], "fact"=>$stdex['BIRT'], "date"=>$mothrow['birthdate'], "place"=>$mothrow['birthplace'], "event"=>"BIRT", "entity"=>$mothrow['personID'], "type"=>"I" ), $mothrow['birthdatetr'] );
					setEvent( array( "text"=>$gentxt.$mothrow['name'].": ".$text['christened'], "fact"=>$stdex['CHR'], "date"=>$mothrow['altbirthdate'], "place"=>$mothrow['altbirthplace'], "event"=>"CHR", "entity"=>$mothrow['personID'], "type"=>"I" ), $mothrow['altbirthdatetr'] );
					setEvent( array( "text"=>$gentxt.$mothrow['name'].": ".$text['baptizedlds'], "fact"=>$stdex['BAPL'], "date"=>$mothrow['baptdate'], "place"=>$mothrow['baptplace'], "event"=>"BAPL", "entity"=>$mothrow['personID'], "type"=>"I" ), $mothrow['baptdatetr'] );
					//doCustomEvents($mothrow['personID'],"I");
					setEvent( array( "text"=>$gentxt.$mothrow['name'].": ".$text['died'], "fact"=>$stdex['DEAT'], "date"=>$mothrow['deathdate'], "place"=>$mothrow['deathplace'], "event"=>"DEAT", "entity"=>$mothrow['personID'], "type"=>"I" ), $mothrow['deathdatetr'] );
					setEvent( array( "text"=>$gentxt.$mothrow['name'].": ".$text['buried'], "fact"=>$stdex['BURI'], "date"=>$mothrow['burialdate'], "place"=>$mothrow['burialplace'], "event"=>"BURI", "entity"=>$$mothrow['personID'], "type"=>"I" ), $mothrow['burialdatetr'] );
					}
						if( $mothrow['famc'] ) {
							if( !in_array( $mothrow['famc'], $nextgen ) )
   								array_push( $nextgen, $mothrow['famc'] );
							if(!$numbers[$mothrow['famc']])
								$numbers[$mothrow['famc']] = $personcount;
						}
					}
					tng_free_result( $gotmother );
				}
			}
		}
	}
	
	$currgen = $nextgen;
	$lastlastgen = $lastgen;
	unset( $nextgen );
	unset( $lastgen );
	$nextgen = array();
	$lastgen = array();
	$generation++;

}


	if ( $map['key'] && $locations2map ) {
		$persontext .= beginSection("eventmap");
		$persontext .= "<table class=\"whiteback\" border=\"0\"  cellpadding=\"4\" width=\"100%\">\n";

		$persontext .= "<tr valign=\"top\" align=\"left\"><td class=\"fieldnameback indleftcol\" id=\"eventmap1\"><span class=\"fieldname\">$text[gmapevent]</span></td>\n";
		
		$persontext .= "<td class=\"databack\" width=\"65%\">\n";
		$persontext .= "<div id=\"map\" style=\"width: $map[indw]; height: $map[indh]; \"></div>\n";
		$persontext .= "</td>\n";
		$persontext .= "<td class=\"databack\">\n";
		$persontext .= "<div id=\"map1\" style=\"height: $map[indh]; overflow:auto;\">\n";
		$persontext .= "<span class=\"normal\" >$text[gevents]<br /></span><table cellpadding=\"4\">\n";

//		asort($locations2map);
		reset($locations2map);
		$markerIcon = 0;
		$nonzeroplaces = 0;
		$usedplaces = array();
		$savedplaces = array();
		while( list($key, $val) = each($locations2map) ) {
		// RM these next lines are about getting different coloured pins for different levels of place
			$placelevel = $val['placelevel'];
			$pinplacelevel = $val['pinplacelevel'];
			if (!$placelevel)
				$placelevel = 0;
			else
				$nonzeroplaces++;
			if (!$pinplacelevel) $pinplacelevel = $pinplacelevel0;
			$lat = $val['lat'];
			$long = $val['long'];
			$zoom = $val['zoom'] ? $val['zoom'] : 10;
			$event = stri_replace($banish, $banreplace, $val['event']);
			$eventnotbanished = htmlspecialchars($val['event'], ENT_QUOTES, $charset);
			$place = $val['place'];

			$dateforremoteballoon = $dateforeventtable = displayDate($val['eventdate']);
			$dateforlocalballoon = htmlspecialchars(tng_real_escape_string($dateforremoteballoon), ENT_QUOTES, $charset);
			$description = $val['description'];
			if ($place) {
				$persontext .= "<tr valign=\"top\"><td class=\"databack\">";
				if( $lat && $long ) {
					if($map['showallpins'] || !in_array($place,$usedplaces)) {
						$markerIcon++;
						$usedplaces[] = $place;
						$savedplaces[] = array("place"=>$place,"key"=>$key);
						$locations2map[$key][htmlcontent] = "<div class=\"mapballoonpedigree normal\" style=\"margin-top:10px\"><strong>{$val['fixedplace']}</strong><br /><br />$eventnotbanished: $dateforlocalballoon</div>";
						$thismarker = $markerIcon;
					}
					else {
						$total = count($usedplaces);
						for($i = 0; $i < $total; $i++) {
							if($savedplaces[$i][place] == $place) {
								$thismarker = $i + 1;
								$thiskey = $savedplaces[$i][key];
								$locations2map[$thiskey][htmlcontent] = str_replace("</div>","<br/>$eventnotbanished: $dateforlocalballoon</div>",$locations2map[$thiskey][htmlcontent]);
								break;
							}
						}
					}
					$codedplace = htmlspecialchars(stri_replace($banish, $banreplace, $place), ENT_QUOTES, $charset);
					$codedballoontext = htmlspecialchars(stri_replace($banish, $banreplace, "$place - $nameformap $event $description $dateforremoteballoon"), ENT_QUOTES, $charset);
					$persontext .= "<a href=\"http://maps.google.com/maps?f=q{$text['glang']}$mcharsetstr&amp;q=$lat,$long($codedballoontext)&amp;z=$zoom&amp;om=1&amp;iwloc=addr\" target= \"_blank\"><img src=\"{$cms['tngpath']}google_marker.php?image=$pinplacelevel.png&amp;text=$thismarker\" alt=\"{$text['googlemaplink']}\" border=\"0\" width= \"20\" height=\"34\" /></a>";
					$map['pins']++;
				}
				else
					$persontext .= "&nbsp;";
				$persontext .= "</td><td class=\"databack\"><span class=\"smaller\"><strong>$eventnotbanished</strong>";
				if($description) $persontext .= " - $description";
				$persontext .= " - $dateforeventtable - $place</span></td>\n";
				$persontext .= "<td class=\"databack\" valign=\"middle\"><a href=\"$cms[tngpath]" . "googleearthbylatlong.php?m=world&amp;n=$codedplace&amp;lon=$long&amp;lat=$lat&amp;z=$zoom\"><img src=\"$cms[tngpath]" . "img/earth.gif\" border=\"0\" alt=\"$text[googleearthlink]\" width=\"15\" height=\"15\" /></a></td></tr>\n";
			}
		}
		$persontext .= "</table>\n<table>";
		$persontext .= "<tr><td><span class=\"smaller\"><img src=\"$cms[tngpath]" . "img/white.gif\" alt=\"Link to Google Maps\" height=\"15\" width=\"9\" align=\"left\" hspace=\"5\" />&nbsp;= $text[googlemaplink]&nbsp;</span></td></tr>\n";
		$persontext .= "<tr><td><span class=\"smaller\"><img src=\"$cms[tngpath]" . "img/earth.gif\" border=\"0\" alt=\"Link to Google Earth\" width=\"15\" height=\"15\" align=\"left\" />&nbsp;= <a href=\"{$http}://www.google.com/earth/download/ge/agree.html\" target=\"_blank\">$text[googleearthlink]</a>&nbsp;</span></td></tr></table>\n";
		$persontext .= "</div></td>\n</tr>\n";
		if($nonzeroplaces) {
			$persontext .= "<tr valign=\"top\"><td class=\"fieldnameback\"><span class=\"fieldname\">$text[gmaplegend]</span></td>\n";
			$persontext .= "<td colspan=\"2\" class=\"databack\"><span class=\"smaller\">";
			for($i = 1; $i < 7; $i++ )
				$persontext .= "<img src=\"$cms[tngpath]" . "img/" . ${"pinplacelevel" .$i} . ".png\" alt=\"{$admtext["level$i"]}\" height=\"17\" width=\"10\" />=&nbsp;" . $admtext["level$i"] . "&nbsp;&nbsp;\n";
			$persontext .= "<img src=\"$cms[tngpath]" . "img/$pinplacelevel0.png\" alt=\"{$admtext[level0]}\" height=\"17\" width=\"10\" />=&nbsp;{$admtext['level0']}</span></td>\n";
			$persontext .= "</tr>\n";
		}
		$persontext .= "</table>\n";
		$persontext .= endSection("eventmap");
		$persontext .= "<br /><br />\n";
	}

echo $persontext;

	tng_footer( "" );
	
function setEvent( $data, $datetr ) {
	global $eventctr, $events, $nodate, $map, $eventctr_all, $nodate_all, $tngconfig;

	//make a copy of datetr
	$datetr_all = $datetr;
	if( $datetr_all == "0000-00-00" )
		$datetr_all = $nodate_all;
	elseif( $datetr_all > $nodate_all )
		$nodate_all = $datetr_all;
	$index_all = $datetr_all . sprintf( "%03d", $eventctr_all );
	$eventctr_all++;

	if( $datetr == "0000-00-00" )
		$datetr = $nodate;
	elseif( $datetr > $nodate )
		$nodate = $datetr;
	$index = $datetr . sprintf( "%03d", $eventctr );
	$events[$index] = $data;
	$eventctr++;

	if( $map['key'] && $data['place'] ) {
		global $locations2map, $l2mCount, $places_table, $tree, $pinplacelevel0, $pinplacelevel1, $pinplacelevel2, $pinplacelevel3, $pinplacelevel4, $pinplacelevel5, $pinplacelevel6;

		$safeplace = tng_real_escape_string($data['place']);
		if ($tree && !$tngconfig['places1tree']) $wherestr = "gedcom = '$tree' AND ";
		$query = "SELECT place,placelevel,latitude,longitude,zoom
			FROM $places_table WHERE $wherestr$places_table.place = '$safeplace' and (latitude is not null and latitude != '') and (longitude is not null and longitude != '')";
		$custevents = tng_query($query) or die ("$text[cannotexecutequery]: $query");

		$numrows = tng_num_rows( $custevents );
		if($numrows) {
			$fixedplace = htmlspecialchars($safeplace, ENT_QUOTES, $charset);
			$custevent = tng_fetch_assoc( $custevents );
			$info = $data['fact'];
			$pinplacelevel = $custevent['placelevel'] ? ${"pinplacelevel" . $custevent['placelevel']} : $pinplacelevel0;
			//using $index above will ensure that this array gets sorted in the same order as the events on the page
			$locations2map[$l2mCount] = array($index_all,"placelevel"=>$custevent['placelevel'],"pinplacelevel"=>$pinplacelevel,"event"=>$data['text'],"htmlcontent"=>"","lat"=>$custevent['latitude'],"long"=>$custevent['longitude'],"zoom"=>$custevent['zoom'],"place"=>$custevent['place'],"eventdate"=>$data['date'],"description"=>$info['0'],"fixedplace"=>$fixedplace);
			$l2mCount++;
		}
		tng_free_result($custevents);
	}
}
function beginSection( $section ) {
	global $tableid, $cellnumber, $firstsection, $firstsectionsave, $tngconfig;

	$sectext = "";
	$tableid = $section;
	$cellnumber = 0;
	if( $firstsection ) {
		$firstsection = 0;
		$firstsectionsave = $section;
	}
	$sectext .= "<ul>";
	$sectext .= "<li id=\"$section\" style=\"list-style-type: none; ";
//	if( $tngconfig['istart'] && $section != "info" )
//		$sectext .= "display:none;";
	$sectext .= "\">\n";
	
	return $sectext;
}

function endSection( $section ) {
	return "</li></ul> <!-- end $section -->\n";
}

?>

%fileend:%

Your Access Expired	Date. in : 30-10-2025
Regist : 09-12-2024	Expired : 01-12-2027