Location: PHPKode > projects > HuMo-gen > include/person_cls.php
<?php
// *****************************************************
// *** Process person data                           ***
// *** Class for HuMo-gen program                    ***
// *****************************************************
class persoon_cls{

var $persoon='';  // Database record
var $privacy='';  // Person privacy

// *** Simple constructor, will work in all PHP version, I hope :-)) ***
function construct($personDb){
	$this->persoon=$personDb;           // Database record
	$this->privacy=$this->set_privacy($personDb); // Set privacy
}

// ***************************************************
// *** Privacy persoon                             ***
// ***************************************************
//function persoon_privacy($persoon){
function set_privacy($persoon){
	global $user, $dataDb;
	$privacypersoon='';  // *** Standard: show all persons ***
	if ($user["privacy"]=='n'){
		$privacypersoon="1";  // *** Standard: filter privacy data of person ***
		// *** $persoon is empty by N.N. person ***
		if ($persoon){
			// *** Haza-data and Aldfaer ***
			if ($user["levend"]=="j"){
				if ($persoon->pers_alive=='HZ_ovl'){ $privacypersoon=''; }
				if ($persoon->pers_alive=='HZ_levend'){ $privacypersoon='1'; }
			}

			// *** Privacy filter: date ***
			if ($user["group_alive_date_act"]=="j"){
				if ($persoon->pers_birth_date){
					if (substr($persoon->pers_birth_date,-4) < $user["group_alive_date"]){
						$privacypersoon=''; }
				}
				if ($persoon->pers_bapt_date){
					if (substr($persoon->pers_bapt_date,-4) < $user["group_alive_date"]){
						$privacypersoon=''; }
				}

				// *** Check if died persons should be filtered ***
				// *** Standaard worden ovl. personen weergegeven. ***
				if ($user["group_filter_death"]=='n'){
					if ($persoon->pers_death_date or $persoon->pers_death_place){ $privacypersoon=''; }
					if ($persoon->pers_buried_date or $persoon->pers_buried_place){ $privacypersoon=''; }
					// *** Ovl. vinkje bij Aldfaer ***
					if ($persoon->pers_alive=='Aldfaer_ovl'){ $privacypersoon=''; }
				}
			}

			// *** Personen ZONDER datum gegevens NIET filteren (persoon weergeven="j") ***
			if ($user["group_filter_date"]=='j'){
				if ($persoon->pers_birth_date=='' AND $persoon->pers_bapt_date==''
				AND $persoon->pers_death_date=='' AND $persoon->pers_buried_date==''){
					$privacypersoon='';
				}
			}

			// *** Privacy filter exceptions (added a space for single character check) ***
			if ($user["group_filter_pers_show_act"]=='j'
				AND strpos(' '.$persoon->pers_own_code,$user["group_filter_pers_show"])>0){ $privacypersoon=""; }
			if ($user["group_filter_pers_hide_act"]=='j'
				AND strpos(' '.$persoon->pers_own_code,$user["group_filter_pers_hide"])>0){ $privacypersoon="1"; }
			if ($user["group_pers_hide_totally_act"]=='j'
				AND strpos(' '.$persoon->pers_own_code,$user["group_pers_hide_totally"])>0){ $privacypersoon="1"; }
		}

	}

	// *** Privacy filter voor de hele stamboom ***
	if (isset($dataDb->tree_privacy)){
		if ($dataDb->tree_privacy=='personen_filteren'){ $privacypersoon="1"; }
		if ($dataDb->tree_privacy=='personen_weergeven'){ $privacypersoon=""; }
	}

	return $privacypersoon;
}

// *************************************************************
// *** Show person name standard                             ***
// *************************************************************
// *** LET OP: bij deze functie moet de $persoon meegestuurd worden, i.v.m. getuigen en ouders etc. ***
//function persoon_naam($personDb){
function naam($persoon){
	global $user, $language, $db;
	$tekst='';

	if ($persoon->pers_lastname=="doodgeboren kind"){
		$tekst=$language["pers_stillborn_child"];
		if ($persoon->pers_sexe=='M'){$tekst=$language["pers_stillborn_boy"];}
		if ($persoon->pers_sexe=='F'){$tekst=$language["pers_stillborn_girl"];}
	}
	else{
		if ($persoon->pers_gedcomnumber){

			// *** Aldfaer: predikaat bij naam ***
			$naamqry=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."events
				WHERE event_person_id='$persoon->pers_gedcomnumber' AND event_kind='predikaat' ORDER BY event_order",$db);
			while($naamDb=mysql_fetch_object($naamqry)){
				//if ($naamDb->datum){ $uitvoer.=datumplaats($naamDb->datum,'').' '; } //standaard weergave, plaats is er niet..
				$tekst.=$naamDb->event_event.' ';
				//if ($naamDb->bron){ $uitvoer.=bronweergave($naamDb->bron); }
				//if ($naamDb->tekst) { $uitvoer.=' '.$naamDb->tekst; }
			}

			// *** Gedcom 5.5 title: NPFX ***
			$naamqry=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."events
				WHERE event_person_id='$persoon->pers_gedcomnumber' AND event_kind='NPFX' ORDER BY event_order",$db);
			while($naamDb=mysql_fetch_object($naamqry)){
				//if ($naamDb->datum){ $uitvoer.=datumplaats($naamDb->datum,'').' '; } //standaard weergave, plaats is er niet..
				//$tekst.=$naamDb->event_event.' ';
				//if ($naamDb->bron){ $uitvoer.=bronweergave($naamDb->bron); }
				//if ($naamDb->tekst) { $uitvoer.=' '.$naamDb->tekst; }
				$titel_voor[]=$naamDb->event_event;
			}

			// *** Gedcom 5.5 title: NSFX ***
			$naamqry=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."events
				WHERE event_person_id='$persoon->pers_gedcomnumber' AND event_kind='NSFX' ORDER BY event_order",$db);
			while($naamDb=mysql_fetch_object($naamqry)){
				//if ($naamDb->datum){ $uitvoer.=datumplaats($naamDb->datum,'').' '; } //standaard weergave, plaats is er niet..
				//$tekst.=$naamDb->event_event.' ';
				//if ($naamDb->bron){ $uitvoer.=bronweergave($naamDb->bron); }
				//if ($naamDb->tekst) { $uitvoer.=' '.$naamDb->tekst; }
				$titel_na[]=$naamDb->event_event;
			}

			// *** Aldfaer: titel bij naam ***
			/*
			Titels VOOR de naam geplaatst
				Prof., Dr., Dr.h.c., Dr.h.c.mult., Ir., Mr., Drs., Lic., Kand., Bacc., Ing., Bc., em., Ds.
			Adellijke titels TUSSEN pers_firstname en pers_lastname geplaatst
				prins, prinses, hertog, hertogin, markies, markiezin, markgraaf, markgravin, graaf,
				gravin, burggraaf, burggravin, baron, barones, ridder
			Titels NA de naam geplaatst, gescheiden door een KOMMA
				Alle titels die niet tot een van de twee vorige categorieën behoren.
			*/
			$naamqry=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."events
				WHERE event_person_id='$persoon->pers_gedcomnumber' AND event_kind='titel' ORDER BY event_order",$db);
			while($naamDb=mysql_fetch_object($naamqry)){
				//if ($naamDb->datum){ $uitvoer.=datumplaats($naamDb->datum,'').' '; } //standaard weergave, plaats is er niet..
				//$tekst.=$naamDb->event_event.' ';
				//if ($naamDb->bron){ $uitvoer.=bronweergave($naamDb->bron); }
				//if ($naamDb->tekst) { $uitvoer.=' '.$naamDb->tekst; }
				$titel_plaats='na';
				if ($naamDb->event_event=='Prof.'){ $titel_plaats='voor'; }
				if ($naamDb->event_event=='Dr.'){ $titel_plaats='voor'; }
				if ($naamDb->event_event=='Dr.h.c.'){ $titel_plaats='voor'; }
				if ($naamDb->event_event=='Dr.h.c.mult.'){ $titel_plaats='voor'; }
				if ($naamDb->event_event=='Ir.'){ $titel_plaats='voor'; }
				if ($naamDb->event_event=='Mr.'){ $titel_plaats='voor'; }
				if ($naamDb->event_event=='Drs.'){ $titel_plaats='voor'; }
				if ($naamDb->event_event=='Lic.'){ $titel_plaats='voor'; }
				if ($naamDb->event_event=='Kand.'){ $titel_plaats='voor'; }
				if ($naamDb->event_event=='Bacc.'){ $titel_plaats='voor'; }
				if ($naamDb->event_event=='Ing.'){ $titel_plaats='voor'; }
				if ($naamDb->event_event=='Bc.'){ $titel_plaats='voor'; }
				if ($naamDb->event_event=='em.'){ $titel_plaats='voor'; }
				if ($naamDb->event_event=='Ds.'){ $titel_plaats='voor'; }

				if ($naamDb->event_event=='prins'){ $titel_plaats='tussen'; }
				if ($naamDb->event_event=='prinses'){ $titel_plaats='tussen'; }
				if ($naamDb->event_event=='hertog'){ $titel_plaats='tussen'; }
				if ($naamDb->event_event=='hertogin'){ $titel_plaats='tussen'; }
				if ($naamDb->event_event=='markies'){ $titel_plaats='tussen'; }
				if ($naamDb->event_event=='markiezin'){ $titel_plaats='tussen'; }
				if ($naamDb->event_event=='markgraaf'){ $titel_plaats='tussen'; }
				if ($naamDb->event_event=='markgravin'){ $titel_plaats='tussen'; }
				if ($naamDb->event_event=='graaf'){ $titel_plaats='tussen'; }
				if ($naamDb->event_event=='gravin'){ $titel_plaats='tussen'; }
				if ($naamDb->event_event=='burggraaf'){ $titel_plaats='tussen'; }
				if ($naamDb->event_event=='burggravin'){ $titel_plaats='tussen'; }
				if ($naamDb->event_event=='baron'){ $titel_plaats='tussen'; }
				if ($naamDb->event_event=='barones'){ $titel_plaats='tussen'; }
				if ($naamDb->event_event=='ridder'){ $titel_plaats='tussen'; }
				
				if ($titel_plaats=='voor'){ $titel_voor[]=$naamDb->event_event; }
				if ($titel_plaats=='tussen'){ $titel_tussen[]=$naamDb->event_event; }
				if ($titel_plaats=='na'){ $titel_na[]=$naamDb->event_event; }
			}

		}

		if(isset($titel_voor)){
			for ($i=0; $i<=(count($titel_voor)-1); $i++){
				$tekst.=' '.$titel_voor[$i].' ';
			}
		}

		$tekst.=$persoon->pers_firstname." ";
		if ($persoon->pers_patronym){$tekst.=" ".$persoon->pers_patronym." ";}

		if(isset($titel_tussen)){
			for ($i=0; $i<=(count($titel_tussen)-1); $i++){
				$tekst.=' '.$titel_tussen[$i].' ';
			}
		}

		$tekst.=str_replace("_", " ", $persoon->pers_prefix);
		$tekst.=$persoon->pers_lastname;

		if(isset($titel_na)){
			for ($i=0; $i<=(count($titel_na)-1); $i++){
				$tekst.=', '.$titel_na[$i];
			}
		}

		// *** Aldfaer: heerlijkheid na naam ***
		$naamqry=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."events
			WHERE event_person_id='$persoon->pers_gedcomnumber' AND event_kind='heerlijkheid' ORDER BY event_order",$db);
		while($naamDb=mysql_fetch_object($naamqry)){
			//if ($naamDb->datum){ $uitvoer.=datumplaats($naamDb->datum,'').' '; } //standaard weergave, plaats is er niet..
			$tekst.=', '.$naamDb->event_event;
			//if ($naamDb->bron){ $uitvoer.=bronweergave($naamDb->bron); }
			//if ($naamDb->tekst) { $uitvoer.=' '.$naamDb->tekst; }
		}

	}

	// *** Privacy filter opnieuw berekenen i.v.m. namen getuigen en ouders ***
	$levend=$this->set_privacy($persoon); // Privacy instellen

	if ($levend AND $user['group_filter_name']=='n'){ $tekst=$language["privacy_name"]; }

	// *** Deze persoon volledig filteren ***
	if ($user["group_pers_hide_totally_act"]=='j'
		AND strpos(' '.$persoon->pers_own_code,$user["group_pers_hide_totally"])>0){ $tekst=$language["privacy_name"]; }

	return $tekst;
}

// *************************************************************
// *** Show person popup menu                                ***
// *************************************************************
function person_popup_menu($persoon){
	global $bot_visit, $db, $humo_option, $uri_pad, $user, $language;
	global $screen_mode, $dirmark1, $dirmark2, $rtlmarker;
	global $Taalkeuze, $cms;

	//$persoon=$this->persoon;
	$levend=$this->privacy;

	// *** Show pop-up menu ***
	if (!$bot_visit AND $screen_mode!="PDF") {

		// *** Family tree for search in multiple family trees ***
		$stamboom=veilig($persoon->pers_tree_prefix);

		if ($cms['cms_name']=='Joomla'){
			$start_url='index.php?option=com_humo-gen&amp;task=family&amp;database='.$stamboom.
				'&amp;id='.$persoon->pers_indexnr.'&amp;hoofdpersoon='.$persoon->pers_gedcomnumber;
		}
		elseif ($humo_option["url_rewrite"]=="j"){
			// *** $uri_pad is gemaakt in header.php ***
			$start_url=$uri_pad.'gezin/'.$stamboom.'/'.$persoon->pers_indexnr.'/'.$persoon->pers_gedcomnumber.'/';
		}
		else{
			$start_url='gezin.php?database='.$stamboom.
			'&amp;id='.$persoon->pers_indexnr.'&amp;hoofdpersoon='.$persoon->pers_gedcomnumber;	
		}

		//echo '<span class="'.$rtlmarker.'sddm">'."\n";	
		echo '<div class="'.$rtlmarker.'sddm" style="display:inline;">'."\n";	
			echo '<a href="'.$start_url.'"';
			$idmark=rand(); // *** Generate a random number to avoid double numbers ***
			echo ' onmouseover="mopen(event,\'m1'.$idmark.$persoon->pers_gedcomnumber.'\',0,0)"';
			echo ' onmouseout="mclosetime()"><img src="'.$cms['cms_path'].'images/reports.gif" border="0" alt="reports"></a>';
			echo '<div id="m1'.$idmark.$persoon->pers_gedcomnumber.
				'" class="sddm_fixed" onmouseover="mcancelclosetime()" onmouseout="mclosetime()">';
				echo $dirmark2.$this->naam($persoon).'<br>';
				echo '<b>'.$language["main_text_report"].':</b>';
				echo $dirmark1.'<a href="'.$start_url.'"><img src="'.$cms['cms_path'].'images/gezin.gif" border="0" alt="'.$language["main_family_sheet"].'"> '.$language["main_family_sheet"].'</a>';

				if  ($user['group_gen_protection']=='n' AND $persoon->pers_fams!='') {
					// *** Alleen een parenteel icoon weergeven als er kinderen zijn ***
					$controle_kinderen=false;
					$controle_gezin=explode(";",$persoon->pers_fams);
					for ($i=0; $i<=substr_count($persoon->pers_fams, ";"); $i++){
						//$controle_kinderen_sql=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."family
					$controle_kinderen_sql=mysql_query("SELECT * FROM ".$stamboom."family
							WHERE fam_gedcomnumber='".$controle_gezin[$i]."'",$db);
						@$controle_kinderenDb=mysql_fetch_object($controle_kinderen_sql);
						if ($controle_kinderenDb->fam_children){ $controle_kinderen=true; }
					}
					if ($controle_kinderen){

						if ($cms['cms_name']=='Joomla'){
							$path_tmp='index.php?option=com_humo-gen&amp;task=family&amp;database='.$stamboom.
								'&amp;id='.$persoon->pers_indexnr.'&amp;hoofdpersoon='.$persoon->pers_gedcomnumber.'&amp;parenteel=1';
						}
						else{
							$path_tmp='gezin.php?database='.$stamboom.'&amp;id='.$persoon->pers_indexnr.'&amp;hoofdpersoon='.$persoon->pers_gedcomnumber.'&amp;parenteel=1';
						}
						echo '<a href="'.$path_tmp.'"><img src="'.$cms['cms_path'].'images/par.gif" border="0" alt="'.$language["main_descendant_report"].'"> '.$language["main_descendant_report"].'</a>';

						if ($cms['cms_name']=='Joomla'){
							$path_tmp='index.php?option=com_humo-gen&amp;task=outline&amp;database='.$stamboom.
								'&amp;id='.$persoon->pers_indexnr.'&amp;hoofdpersoon='.$persoon->pers_gedcomnumber.'&amp;parenteel=1';
						}
						else{
							$path_tmp='report_outline.php?database='.$stamboom.
				'&amp;id='.$persoon->pers_indexnr.'&amp;hoofdpersoon='.$persoon->pers_gedcomnumber;
						}
						echo '<a href="'.$path_tmp.'"><img src="'.$cms['cms_path'].'images/outline.gif" border="0" alt="'.$language["outline_name"].'"> '.$language["outline_name"].'</a>';
					}
				}

				if  ($user['group_gen_protection']=='n' AND $persoon->pers_famc!='') {
					// == Kwartierstaat: uitvoer & icoontjes met dank aan Klaas de Winkel (www.dewinkelwaar.tk) =================

					if ($cms['cms_name']=='Joomla'){
						$path_tmp='index.php?option=com_humo-gen&amp;task=ancestor&amp;database='.$stamboom.'&amp;id='.$persoon->pers_gedcomnumber;
					}
					else{
						$path_tmp='report_ancestor.php?database='.$stamboom.'&amp;id='.$persoon->pers_gedcomnumber;
					}
					echo '<a href="'.$path_tmp.'"><img src="'.$cms['cms_path'].'images/kws.gif" border="0" alt="'.$language["main_ancestor_report"].'"> '.$language["main_ancestor_report"].'</a>';
					
					echo '<a href="'.$path_tmp.'&amp;screen_mode=KWBLAD"><img src="'.$cms['cms_path'].'images/kwb.gif" border="0" alt="'.$language["kwartierblad"].'"> '.$language["kwartierblad"].'</a>';
				}

				if  ($user['group_gen_protection']=='n' AND ($persoon->pers_famc!='' OR $persoon->pers_fams!='')) {
					echo '<b>'.$language["main_graph_report"].':</b>';
				}
				if  ($user['group_gen_protection']=='n' AND $persoon->pers_famc!='') {
					// == toevoeging YossiBeck - FANCHART

					if ($cms['cms_name']=='Joomla'){
						$path_tmp='index.php?option=com_humo-gen&amp;task=fanchart&amp;database='.$stamboom.'&amp;id='.$persoon->pers_gedcomnumber;
					}
					else{
						$path_tmp='fanchart.php?database='.$stamboom.'&amp;id='.$persoon->pers_gedcomnumber;
					}
					//echo '<a href="fanchart.php?database='.$stamboom.'&amp;id='.$persoon->pers_gedcomnumber.'"><img src="'.$cms['cms_path'].'images/fan.gif" border="0"> Fanchart</a>';
					echo '<a href="'.$path_tmp.'"><img src="'.$cms['cms_path'].'images/fan.gif" border="0" alt="Fanchart"> '.$language["main_fanchart"].'</a>';

					if ($cms['cms_name']=='Joomla'){
						$path_tmp='index.php?option=com_humo-gen&amp;task=ancestor&amp;database='.$stamboom.'&amp;id='.$persoon->pers_gedcomnumber.'&amp;screen_mode=GRAFISCH';
					}
					else{
						$path_tmp='report_ancestor.php?database='.$stamboom.'&amp;id='.$persoon->pers_gedcomnumber.'&amp;screen_mode=GRAFISCH';
					}
					//echo '<a href="report_ancestor.php?database='.$stamboom.'&amp;id='.$persoon->pers_gedcomnumber.'&amp;screen_mode=GRAFISCH"><img src="'.$cms['cms_path'].'images/kws.gif" border="0"> '.$language["main_ancestor_chart"].'</a>';
					echo '<a href="'.$path_tmp.'"><img src="'.$cms['cms_path'].'images/kws.gif" border="0" alt="'.$language["main_ancestor_chart"].'"> '.$language["main_ancestor_chart"].'</a>';
				}
				if  ($user['group_gen_protection']=='n' AND $persoon->pers_fams!='') {
					if ($controle_kinderen){

						if ($cms['cms_name']=='Joomla'){
							$path_tmp='index.php?option=com_humo-gen&amp;task=family&amp;database='.$stamboom.'&amp;id='.$persoon->pers_indexnr.'&amp;hoofdpersoon='.$persoon->pers_gedcomnumber.'&amp;screen_mode=STAR';
						}
						else{
							$path_tmp='gezin.php?database='.$stamboom.'&amp;id='.$persoon->pers_indexnr.'&amp;hoofdpersoon='.$persoon->pers_gedcomnumber.'&amp;screen_mode=STAR';
						}
						echo '<a href="'.$path_tmp.'"><img src="'.$cms['cms_path'].'images/par.gif" border="0" alt="'.$language["main_descendant_chart"].'"> '.$language["main_descendant_chart"].'</a>';
					}
				}

				// check for timeline folder and tml files
				if ($levend==''){
					$tmlcounter=0;
					$tmldir=$cms['cms_path']."languages/".$Taalkeuze."/timelines";
					if(file_exists($tmldir)) {
						$dh  = opendir($cms['cms_path']."languages/".$Taalkeuze."/timelines");
						while (false !== ($filename = readdir($dh))) {
							if (strtolower(substr($filename, -3)) == "txt"){
								$tmlcounter++;
							}
						}
					}
					$tmldates=0;
					if($persoon->pers_birth_date OR $persoon->pers_bapt_date
						OR $persoon->pers_death_date OR $persoon->pers_buried_date OR $persoon->pers_fams) {
						$tmldates=1;
					}
					if  ($user['group_gen_protection']=='n' AND $tmlcounter>0 AND $tmldates==1) {
						if ($cms['cms_name']=='Joomla'){
							$path_tmp='index.php?option=com_humo-gen&amp;task=timelines&amp;database='.$stamboom.'&amp;id='.$persoon->pers_gedcomnumber;
						}
						else{
							$path_tmp='timelines.php?database='.$stamboom.'&amp;id='.$persoon->pers_gedcomnumber;
						}
						//echo '<a href="timelines.php?database='.$stamboom.'&amp;id='.$persoon->pers_gedcomnumber.'">';
						echo '<a href="'.$path_tmp.'">';
						echo '<img src="'.$cms['cms_path'].'images/tml.gif" border="0" alt="'.$language["tml_timeline"].'"> '.$language["tml_timeline"].'</a>';
					}
				}

				// *** Editor link ***
				if  ($user['group_editor']=='j' OR $user['beheer']=='j') {
					echo '<b>'.$language["main_admin"].':</b>';
					$path_tmp='admin/index.php?page=editor&tree='.$stamboom.'&amp;person='.$persoon->pers_gedcomnumber;
					echo '<a href="'.$path_tmp.'" target="_blank">';
					echo '<img src="'.$cms['cms_path'].'images/person_edit.gif" border="0" alt="'.$language["tml_timeline"].'"> '.$language["main_editor"].'</a>';
				}
					
			echo $dirmark1.'</div>';
		//echo '</span>'."\n";
		echo '</div>'."\n";
	}  // end "if not pdf"
	
}

// *************************************************************
// *** Show person name                                      ***
// *** $soortpersoon = 'Kind' maakt link naar gezin van kind ***
// *************************************************************
//function persoonsnaam($personDb, $soortpersoon, $levend){
function naam_uitgebreid($soortpersoon){
	global $db, $humo_option, $uri_pad, $user, $language;
	global $screen_mode, $dirmark1, $dirmark2, $rtlmarker;
	global $Taalkeuze, $cms;

	$persoon=$this->persoon;
	$levend=$this->privacy;

	$tekst='';
	if (!$persoon){
		// *** Onbekend persoon N.N. weergeven ***
		$tekst= $language["nn"];
	}
	else{

		// *** Show pop-up menu ***
		$this->person_popup_menu($persoon);

		// *** Check privacy filter ***
		if ($levend AND $user['group_filter_name']=='n'){
			//dummy
		}
		else{
			// *** Man of vrouw afbeelding weergeven ***
			if($screen_mode!="PDF") {  //  pdf does this elsewhere
				echo $dirmark1;
				if ($persoon->pers_sexe=="M"){
					echo '<img src="'.$cms['cms_path'].'images/man.gif" alt="man">';
				}
				elseif ($persoon->pers_sexe=="F"){
					echo '<img src="'.$cms['cms_path'].'images/woman.gif" alt="woman">';
				}
				else{
					echo '<img src="'.$cms['cms_path'].'images/unknown.gif" alt="unknown">';
				}
			}
		}

		$tekst= $this->naam($persoon).$dirmark2;

		// *** Gedcomnummer #I5 weergeven als #5 ***
		if ($user["gedcomnummer"]=='j'){
			$weergave_gedcomnummer=$persoon->pers_gedcomnumber;
			if (substr($weergave_gedcomnummer, 0, 1)=='I'){
				$weergave_gedcomnummer=substr($weergave_gedcomnummer, 1);
			}
			$tekst.= $dirmark1." #".$weergave_gedcomnummer;
		}

		// *** Roepnaam alleen weergeven als er geen privacy is ***
		if (($levend AND $user['group_filter_name']=='n')
			OR ($user["group_pers_hide_totally_act"]=='j' AND strpos($persoon->pers_own_code,$user["group_pers_hide_totally"])>0)){
			//
		}
		else{
			if ($persoon->pers_callname){$tekst.= ', '.$language["name_GERN"].': '.$persoon->pers_callname;}
		}

		// *** Bij Gen_protectie geen linken weergeven ***
		if ($user["group_gen_protection"]=='j'){ $soortpersoon=''; }
		if ($soortpersoon=='Kind' AND $persoon->pers_fams){
			$linkkind=explode(";",$persoon->pers_fams);
			// *** Link naar 1e eigen gezin ***
			if ($humo_option["url_rewrite"]=="j"){
				// *** $uri_pad is gemaakt in header.php ***
				$tekst='<a href="'.$uri_pad.'gezin/'.$_SESSION['tree_prefix'].'/'.
				$linkkind[0].'/'.$persoon->pers_gedcomnumber.'/">'.$tekst;
			}
			else{
				$tekst='<a href="gezin.php?database='.$_SESSION['tree_prefix'].
				'&amp;id='.$linkkind[0].'&amp;hoofdpersoon='.
				$persoon->pers_gedcomnumber.'">'.$tekst; //Link naar 1e eigen gezin 
			}
			$tekst.= "</a>";
		}
	}
	$tekst= '<span class="naam">'.$tekst.$dirmark1.'</span>';

	if($screen_mode!="PDF") {
		echo $tekst;
	}
	else {
		return (pdf_convert($tekst));
	}

}

// ************************************************************************
// *** Show person                                                      ***
// *** $personDb = data persoon                                        ***
// *** $soortpersoon = Vrouw (maakt linken naar meerdere huwelijken)    ***
// *** $id = gezinsnummer voor link bij vrouw naar meerdere huwelijken. ***
// *** $levend = privacyfilter                                          ***
// ************************************************************************
//function persoongegevens($personDb, $soortpersoon, $id, $levend){
function gegevens($soortpersoon, $id){
	global $db, $user, $language, $humo_option, $gezin_id, $uri_pad;
	global $gezin_uitgebreid, $wissel_hoofdpersoon;
	global $teller;
	global $screen_mode, $dirmark1, $dirmark2;
	global $dataDb, $cms;

	$persoon=$this->persoon;
	$levend=$this->privacy;

	// *** $persoon is leeg bij een N.N. persoon ***
	if ($persoon){

	$uitvoer='';  $temp='';

	//*** PRIVACY DEEL ***
	if ($levend){
		if($screen_mode!="PDF") {
			echo $language["privacy"];  //Tekst privacy weergeven
		}
		else {
			return;  // makes no sense to ask for login in a pdf report.....
		}
	}
	else{
		if ($user["group_texts_pers"]=='j'){
			$werktekst=werktekstomzet($persoon->pers_name_text);
			if ($werktekst){ 
				$uitvoer.=", ".$werktekst;
				$pdfstr["name_text"]=", ".pdf_convert($werktekst);
			}
		}

		if ($persoon->pers_name_source){ 
				$uitvoer.=bronweergave($persoon->pers_name_source); 
				$pdfstr["name_source"]=pdf_convert(bronweergave($persoon->pers_name_source)); 
				$temp="name_source";
		}

		// *** Extra namen van BK weergeven ***
		if ($persoon->pers_gedcomnumber){
			$naamqry=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."events
				WHERE event_person_id='$persoon->pers_gedcomnumber' AND event_kind='naam' ORDER BY event_order",$db);
			while($naamDb=mysql_fetch_object($naamqry)){
				$uitvoer.=', ';
				$pdfstr["bk_names"]=", ";
				if ($naamDb->event_gedcom=='_AKAN'){ $uitvoer.=$language["name_AKAN"].': '; $pdfstr["bk_names"].=$language["name_AKAN"].': '; }
				if ($naamDb->event_gedcom=='NICK'){ $uitvoer.=$language["name_NICK"].': '; $pdfstr["bk_names"].=$language["name_NICK"].': ';    }
				if ($naamDb->event_gedcom=='_ALIA'){ $uitvoer.=$language["name_ALIA"].': '; $pdfstr["bk_names"].=$language["name_ALIA"].': '; }   // Voor Pro-Gen
				if ($naamDb->event_gedcom=='_SHON'){ $uitvoer.=$language["name_SHON"].': '; $pdfstr["bk_names"].=$language["name_SHON"].': '; }
				if ($naamDb->event_gedcom=='_ADPN'){ $uitvoer.=$language["name_ADPN"].': '; $pdfstr["bk_names"].=$language["name_ADPN"].': '; }
				if ($naamDb->event_gedcom=='_HEBN'){ $uitvoer.=$language["name_HEBN"].': '; $pdfstr["bk_names"].=$language["name_HEBN"].': '; }
				if ($naamDb->event_gedcom=='_CENN'){ $uitvoer.=$language["name_CENN"].': '; $pdfstr["bk_names"].=$language["name_CENN"].': '; }
				if ($naamDb->event_gedcom=='_MARN'){ $uitvoer.=$language["name_MARN"].': '; $pdfstr["bk_names"].=$language["name_MARN"].': '; }
				if ($naamDb->event_gedcom=='_GERN'){ $uitvoer.=$language["name_GERN"].': '; $pdfstr["bk_names"].=$language["name_GERN"].': '; }
				if ($naamDb->event_gedcom=='_FARN'){ $uitvoer.=$language["name_FARN"].': '; $pdfstr["bk_names"].=$language["name_FARN"].': '; }
				if ($naamDb->event_gedcom=='_BIRN'){ $uitvoer.=$language["name_BIRN"].': '; $pdfstr["bk_names"].=$language["name_BIRN"].': '; }
				if ($naamDb->event_gedcom=='_INDN'){ $uitvoer.=$language["name_INDN"].': '; $pdfstr["bk_names"].=$language["name_INDN"].': '; }
				if ($naamDb->event_gedcom=='_FKAN'){ $uitvoer.=$language["name_FKAN"].': '; $pdfstr["bk_names"].=$language["name_FKAN"].': '; }
				if ($naamDb->event_gedcom=='_CURN'){ $uitvoer.=$language["name_CURN"].': '; $pdfstr["bk_names"].=$language["name_CURN"].': '; }
				if ($naamDb->event_gedcom=='_SLDN'){ $uitvoer.=$language["name_SLDN"].': '; $pdfstr["bk_names"].=$language["name_SLDN"].': '; }
				if ($naamDb->event_gedcom=='_FRKA'){ $uitvoer.=$language["name_FRKA"].': '; $pdfstr["bk_names"].=$language["name_FRKA"].': '; }
				if ($naamDb->event_gedcom=='_RELN'){ $uitvoer.=$language["name_RELN"].': '; $pdfstr["bk_names"].=$language["name_RELN"].': '; }
				if ($naamDb->event_gedcom=='_OTHN'){ $uitvoer.=$language["name_OTHN"].': '; $pdfstr["bk_names"].=$language["name_OTHN"].': '; }
				$temp="bk_names";
				if ($naamDb->event_date){ 
					$uitvoer.=datumplaats($naamDb->event_date,'').' '; 
					$pdfstr["bk_date"]=pdf_convert(datumplaats($naamDb->event_date,'')).' ';
					$temp="bk_date";
				} //standaard weergave, plaats is er niet..
				$uitvoer.=$naamDb->event_event;
				$pdfstr["bk_event"]=$naamDb->event_event;
				$temp="bk_event";
				if ($naamDb->event_source){ 
					$uitvoer.=bronweergave($naamDb->event_source);
					$pdfstr["bk_source"]=pdf_convert(bronweergave($naamDb->event_source));
					$temp="bk_source";
				}
				if ($naamDb->event_text) { 
					$uitvoer.=' '.$naamDb->event_text;
					$pdfstr["bk_text"]=' '.$naamDb->event_text;
					$temp="bk_text";
				}
			}
		}

		// *** Own code ***
		if ($user["eigencode"]=='j' AND $persoon->pers_own_code){
			$uitvoer.=', <span class="pers_own_code">('.$persoon->pers_own_code.')</span>';
			if($temp) { $pdfstr[$temp].=", "; }
			$pdfstr["own_code"]='('.$persoon->pers_own_code.')';
			$temp="own_code";
		}

		// ****************
		// *** BIRTH    ***
		// ****************
		$tekst='';

		if ($persoon->pers_birth_date OR $persoon->pers_birth_place){
			$tekst=datumplaats($persoon->pers_birth_date,$persoon->pers_birth_place);
			$pdfstr["born_dateplacetime"]=pdf_convert($tekst);
			$temp="born_dateplacetime";
		}
		// *** Birth time ***
		if (isset($persoon->pers_birth_time) AND $persoon->pers_birth_time){
			//$tekst.=' '.$persoon->pers_birth_time;
			$tekst.=$language["pers_at"].$persoon->pers_birth_time.$language["pers_hour"];
			$pdfstr["born_dateplacetime"]=pdf_convert($tekst);
			$temp="born_dateplacetime";
		}
		if ($user["group_texts_pers"]=='j'){
			$werktekst=werktekstomzet($persoon->pers_birth_text);
			if ($werktekst){ 
				$tekst.=", ".$werktekst;
				$pdfstr["born_text"]=", ".pdf_convert($werktekst); 
				$temp="born_text";
			}
		}

		// *** bron bij geboorte ***
		if ($persoon->pers_birth_source){ 
			$tekst.=$dirmark1.bronweergave($persoon->pers_birth_source);
			$pdfstr["born_source"]=pdf_convert(bronweergave($persoon->pers_birth_source));
			$temp="born_source";
		}

		// *** Geboorte aangifte/ registratie ***
		if ($persoon->pers_gedcomnumber){
			$temp_text=witness($persoon->pers_gedcomnumber, 'geboorteaangifte');
			if ($temp_text){
				$tekst.= ', '.$language["pers_birth_declaration"].' '.$temp_text; 
				if($temp) { $pdfstr[$temp].=", "; }
				$pdfstr["born_witn"]= $language["pers_birth_declaration"].' '.pdf_convert($temp_text); 
				$temp="born_witn";
			}
		}

		// *** Controle of er geboorte items zijn, en deze eventueel op een nieuwe regel weergeven. ***
		if ($tekst){
			if ($gezin_uitgebreid==true){ $uitvoer.='<br>'.ucfirst($language["pers_born"]).$tekst; }
				else{ $uitvoer.=', '.$language["pers_born"].$tekst; }
		}

		// ***************
		// *** BAPTISE ***
		// ***************
		$tekst='';

		if ($persoon->pers_bapt_date OR $persoon->pers_bapt_place){
			$tekst=datumplaats($persoon->pers_bapt_date,$persoon->pers_bapt_place);
			$pdfstr["bapt_dateplacetime"]=pdf_convert($tekst);
			$temp="bapt_dateplacetime";
		}
		if ($user["group_texts_pers"]=='j'){
			$werktekst=werktekstomzet($persoon->pers_bapt_text);
			if ($werktekst){ 
				$tekst.=", ".$werktekst; 
				if($temp) { $pdfstr[$temp].=", "; }
				$pdfstr["bapt_text"]=pdf_convert($werktekst);  
				$temp="bapt_text";
			}
		}

		if ($user["religie"]=='j' AND $persoon->pers_religion){
			$tekst.= ' <span class="religie">'.$language["pers_religion"].$persoon->pers_religion.'</span>';
			$pdfstr["bapt_reli"]=" ".$language["pers_religion"].$persoon->pers_religion;
			$temp="bapt_reli";
		}

		// *** Bron bij doop ***
		if ($persoon->pers_bapt_source){ 
				$tekst.=bronweergave($persoon->pers_bapt_source); 
				$pdfstr["bapt_source"]=pdf_convert(bronweergave($persoon->pers_bapt_source));
				$temp="bapt_source";
		}

		// *** Getuigen weergeven ***
		if ($persoon->pers_gedcomnumber){
			$temp_text=witness($persoon->pers_gedcomnumber, 'doopgetuige');
			if ($temp_text){ 
				$tekst.= ', '.$language["pers_baptise_witness"].' '.$temp_text;
				if($temp) { $pdfstr[$temp].=", "; }
				$pdfstr["bapt_witn"]=$language["pers_baptise_witness"].' '.pdf_convert($temp_text);
				$temp="bapt_witn";
			}
		}

		// *** Controle of er doop items zijn, en deze eventueel op een nieuwe regel weergeven. ***
		if ($tekst){
			if ($gezin_uitgebreid==true){ $uitvoer.='<br>'.ucfirst($language["pers_baptised"]).$tekst; }
				else{ $uitvoer.=', '.$language["pers_baptised"].$tekst; }
		}

		// *** Leeftijd levend persoon weergeven ***
		if (($persoon->pers_bapt_date OR $persoon->pers_birth_date) AND !$persoon->pers_death_date) {
			$leeftijd = New berekening_jaar_cls;
			$age=$leeftijd->leeftijd_berekenen($persoon->pers_bapt_date,$persoon->pers_birth_date,'');
			$uitvoer.=$dirmark1.$age;  //comma en spatie komen al met $age mee
			$pdfstr["age_liv"]=$age;
			$temp="age_liv";
		}

		// ******************
		// *** DEATH      ***
		// ******************
		$tekst='';

		if ($persoon->pers_death_date OR $persoon->pers_death_place){
			$tekst=datumplaats($persoon->pers_death_date,$persoon->pers_death_place);
			$pdfstr["dead_dateplacetime"]=pdf_convert($tekst);
			$temp="dead_dateplacetime";
		}
		// *** Overlijdenstijd ***
		if (isset($persoon->pers_death_time) AND $persoon->pers_death_time){
			$tekst.=' '.$persoon->pers_death_time;
			$pdfstr["dead_dateplacetime"]=pdf_convert($tekst);
			$temp="dead_dateplacetime";
		}
		if ($user["group_texts_pers"]=='j'){
			$werktekst=werktekstomzet($persoon->pers_death_text);
			if ($werktekst){ 
				$tekst.=", ".$werktekst; 
				if($temp) { $pdfstr[$temp].=", "; }
				$pdfstr["dead_text"]=pdf_convert($werktekst);
				$temp="dead_text";
			}
		}

		// *** Leeftijd weergeven, door Yossi Beck ***
		if (($persoon->pers_bapt_date OR $persoon->pers_birth_date) AND $persoon->pers_death_date) {
			$leeftijd = New berekening_jaar_cls;
			$age=$leeftijd->leeftijd_berekenen($persoon->pers_bapt_date,$persoon->pers_birth_date,$persoon->pers_death_date);
			$tekst.=$dirmark1.$age;  //comma en spatie komen al met $age mee
			$pdfstr["dead_age"]=$age;
			$temp="dead_age";
		}

		$pers_death_cause='';
		If ($persoon->pers_death_cause=='murdered'){ $pers_death_cause=', '.$language["pers_death_cause"].' '.$language["pers_murdered"]; }
		If ($persoon->pers_death_cause=='drowned'){ $pers_death_cause=', '.$language["pers_death_cause"].' '.$language["pers_drowned"]; }
		If ($persoon->pers_death_cause=='perished'){ $pers_death_cause=', '.$language["pers_death_cause"].' '.$language["pers_perished"]; }
		If ($persoon->pers_death_cause=='killed in action'){ $pers_death_cause=', '.$language["pers_killed_in_action"]; }
		If ($persoon->pers_death_cause=='being missed'){ $pers_death_cause=', '.$language["pers_being_missed"]; }
		If ($persoon->pers_death_cause=='committed suicide'){ $pers_death_cause=', '.$language["pers_death_cause"].' '.$language["pers_committed_suicide"]; }
		If ($persoon->pers_death_cause=='executed'){ $pers_death_cause=', '.$language["pers_death_cause"].' '.$language["pers_executed"]; }
		If ($persoon->pers_death_cause=='died young'){ $pers_death_cause=', '.$language["pers_died_young"]; }
		If ($persoon->pers_death_cause=='died unmarried'){ $pers_death_cause=', '.$language["pers_died_unmarried"]; }
		If ($persoon->pers_death_cause=='registration'){ $pers_death_cause=', '.$language["pers_death_registration"]; } //2 TYPE registration?
		If ($persoon->pers_death_cause=='declared death'){ $pers_death_cause=', '.$language["pers_declared_death"]; }
		if ($pers_death_cause){
			$tekst.=$pers_death_cause;
			$pdfstr["dead_cause"]=$pers_death_cause;
			$temp="dead_cause";
		}
		else{
			if ($persoon->pers_death_cause){ 
				$tekst.=', '.$language["pers_death_cause"].' '.$persoon->pers_death_cause;
				if($temp) { $pdfstr[$temp].=", "; }
				$pdfstr["dead_cause"]=$language["pers_death_cause"].' '.$persoon->pers_death_cause;
				$temp="dead_cause";
			}
		}

		// *** Bron bij overlijden ***
		if ($persoon->pers_death_source){ 
				$tekst.=bronweergave($persoon->pers_death_source);
				$pdfstr["dead_source"]=pdf_convert(bronweergave($persoon->pers_death_source));
				$temp="dead_source";
		}

		// *** Aangifte weergeven ***
		if ($persoon->pers_gedcomnumber){
			$temp_text=witness($persoon->pers_gedcomnumber, 'overlijdensaangifte');
			if ($temp_text){ 
				$tekst.= ', '.$language["pers_death_declaration"].' '.$temp_text;
				if($temp) { $pdfstr[$temp].=", "; }
				$pdfstr["dead_witn"]= $language["pers_death_declaration"].' '.pdf_convert($temp_text);
				$temp="dead_witn";
			}
		}

		// *** Controle of er overlijden items zijn, en deze eventueel op een nieuwe regel weergeven. ***
		if ($tekst){
			if ($gezin_uitgebreid==true){ $uitvoer.='<br>'.ucfirst($language["pers_died"]).$tekst; }
				else{ $uitvoer.=', '.$language["pers_died"].$tekst; }
		}

		// ****************
		// *** BURIED   ***
		// ****************
		$tekst='';

		if ($persoon->pers_buried_date OR $persoon->pers_buried_place){
			$tekst=datumplaats($persoon->pers_buried_date,$persoon->pers_buried_place);
			$pdfstr["buri_dateplacetime"]=pdf_convert($tekst);
			$temp="buri_dateplacetime";
		}
		if ($user["group_texts_pers"]=='j'){
			$werktekst=werktekstomzet($persoon->pers_buried_text);
			if ($werktekst){ 
				$tekst.=", ".$werktekst;
				if($temp) { $pdfstr[$temp].=", "; }
				$pdfstr["buri_text"]=pdf_convert($werktekst); 
				$temp="buri_text";
			}
		}

		// *** HZ-21 ash dispersion (asverstrooiing) ***
		$naamqry=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."events
			WHERE event_person_id='$persoon->pers_gedcomnumber' AND event_kind='ash dispersion' ORDER BY event_order",$db);
		while($naamDb=mysql_fetch_object($naamqry)){
			//if ($naamDb->datum){ $uitvoer.=datumplaats($naamDb->datum,'').' '; } //standaard weergave, plaats is er niet..
			$tekst.=' '.$language["pers_ash_dispersion"].' '.$naamDb->event_event.' ';
			//if ($naamDb->bron){ $uitvoer.=bronweergave($naamDb->bron); }
			//if ($naamDb->tekst) { $uitvoer.=' '.$naamDb->tekst; }
			if($temp) { $pdfstr[$temp].=' asverstrooiing '.$naamDb->event_event; }
			$pdfstr["buri_text"]=pdf_convert($werktekst); 
			$temp="buri_text";
		}

		// *** Bron bij begraven ***
		if ($persoon->pers_buried_source){ 
			$tekst.=bronweergave($persoon->pers_buried_source);
			$pdfstr["buri_source"]=pdf_convert(bronweergave($persoon->pers_buried_source));
			$temp="buri_source";
		}

		// *** Getuigen weergeven ***
		if ($persoon->pers_gedcomnumber){
			$temp_text=witness($persoon->pers_gedcomnumber, 'begrafenisgetuige');
			if ($temp_text){ 
				$tekst.= ', '.$language["pers_burial_witness"].' '.$temp_text;
				$pdfstr[$temp].=", ";
				$pdfstr["buri_witn"]= $language["pers_burial_witness"].' '.pdf_convert($temp_text); 
				$temp="buri_witn";
			}
		}

		// *** Controle of er begrafenis items zijn, en deze eventueel op een nieuwe regel weergeven. ***
		if ($tekst){
			if ($gezin_uitgebreid==true){
				$uitvoer.='<br>';
				if ($persoon->pers_cremation){ $uitvoer.=ucfirst($language["pers_cremation"]); }
				else{ $uitvoer.=ucfirst($language["pers_buried"]); }
			}
			else{
				$uitvoer.=', ';
				if ($persoon->pers_cremation){ 
					$uitvoer.=$language["pers_cremation"]; 
					$pdfstr["flag_buri"]=1;
				} 
				else { 
					$uitvoer.=$language["pers_buried"]; 
					$pdfstr["flag_buri"]=0;
				}
			}
			$uitvoer.=$tekst;
		}

		// **************************
		// *** Show professions   ***
		// **************************
		if ($persoon->pers_gedcomnumber){
			$aantal=0;
			$beroepqry=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."events
				WHERE event_person_id='$persoon->pers_gedcomnumber' AND event_kind='beroep' ORDER BY event_order",$db);
			while($beroepDb=mysql_fetch_object($beroepqry)){
				$aantal++;
				if ($aantal=='1'){
				$uitvoer.='<span class="beroep">';
				if ($gezin_uitgebreid==true){ $uitvoer.='<br>'.ucfirst($language["pers_occupation"]); }
				else{
					if ($uitvoer){ $uitvoer.='. '; }
					if($temp) { $pdfstr[$temp].=". "; }
					$uitvoer.=ucfirst($language["pers_occupation"]);
					$pdfstr["prof_exist"]=ucfirst($language["pers_occupation"]);
					$temp="prof_exist";
				}
				}
				if ($aantal>1){ 
					$uitvoer.=', ';
					if($temp) { $pdfstr[$temp].=", "; }
				}
				if ($beroepDb->event_date){ 
					$uitvoer.=datumplaats($beroepDb->event_date,'').' '; 
					//standaard weergave, plaats is er niet...
					$pdfstr["prof_date".$aantal]=pdf_convert(datumplaats($beroepDb->event_date,'').' ');
					$temp="prof_date".$aantal;
				}

				$uitvoer.=$beroepDb->event_event;
				$pdfstr["prof_prof".$aantal]=$beroepDb->event_event;
				$temp="prof_prof".$aantal;

				if ($beroepDb->event_text) {
				$werktekst=werktekstomzet($beroepDb->event_text);
				if ($werktekst){ 
					$uitvoer.=", ".$werktekst;
					if($temp) { $pdfstr[$temp].=", "; }
					$pdfstr["prof_text".$aantal]=pdf_convert($werktekst);
					$temp="prof_text".$aantal;
				}
				}
				// *** Bron bij beroep weergeven ***
				if ($beroepDb->event_source){
					$uitvoer.=bronweergave($beroepDb->event_source);
					$pdfstr["prof_source".$aantal]=pdf_convert(bronweergave($beroepDb->event_source)); 
					$temp="prof_source".$aantal;
				}
			}
			if ($aantal>0){ $uitvoer.='</span>'; }
		}

		// *** Show adresses ***
		if ($persoon->pers_gedcomnumber AND $user["woonplaats"]=='j'){
			$tekst='';
			$aantal=0;
			$adresqry=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."addresses
				WHERE address_person_id='$persoon->pers_gedcomnumber' ORDER BY address_order",$db);
			while($adresDb=mysql_fetch_object($adresqry)){
				$aantal++;
				if ($aantal=='1'){
					if ($uitvoer){
						if ($gezin_uitgebreid==true){ $tekst.='<br>'; } else{ $tekst.='. '; }
					}
					if($temp) {$pdfstr[$temp].=". "; }
					$tekst.=ucfirst($language["pers_living_place"]);
					$pdfstr["adres_exist"]=ucfirst($language["pers_living_place"]);
					$temp="adres_exist";
				}
				if ($aantal>1){ 
					$tekst.=', '; 
					if($temp) { $pdfstr[$temp].=", "; }
				}
				if ($adresDb->address_date){ 
					$tekst.=datumplaats($adresDb->address_date,'').' '; 
					//standaard weergave, plaats is er niet...
					$pdfstr["adres_date".$aantal]=pdf_convert(datumplaats($adresDb->address_date,'').' ');
					$temp="adres_date".$aantal;
				}

				$tekst.=$adresDb->address_place;
				$pdfstr["adres_adres".$aantal]=$adresDb->address_place;
				$temp="adres_adres".$aantal;

				// *** Bron bij adres weergeven ***
				if ($adresDb->address_text) {
					$werktekst=werktekstomzet($adresDb->address_text);
					if ($werktekst){ 
						$tekst.=", ".$werktekst; 
						if($temp) { $pdfstr[$temp].=", "; }
						$pdfstr["adres_text".$aantal]=pdf_convert($werktekst);
						$temp="adres_text".$aantal;
					}
				}
				if ($adresDb->address_source){ 
					$tekst.=bronweergave($adresDb->address_source); 
					$pdfstr["adres_source".$aantal]=pdf_convert(bronweergave($adresDb->address_source));
					$temp="adres_source".$aantal;
				}
			}
			if ($tekst){
				$uitvoer.='<span class=woonplaats>'.$tekst.'</span>';
			}
		}

		// *** Person source ***
		$bronnen='';
		$bronqry=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."events
			WHERE event_person_id='$persoon->pers_gedcomnumber' AND event_kind='bron' ORDER BY event_order",$db);
		while($bronDb=mysql_fetch_object($bronqry)){
			if ($bronnen!=''){
				$bronnen.=';'.$bronDb->event_source;
			}
			else {
				$bronnen=$bronDb->event_source;
			}
		}
		if ($bronnen!=''){
			$uitvoer.=bronweergave($bronnen);
			$pdfstr["pers_source"]=pdf_convert(bronweergave($bronnen));
			$temp="pers_source";
		}

		// Adressen voor Haza-data (Haza-data plus versie)
		if ($user["adressen"]=='j'){
			$adresqry=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."events
				WHERE event_person_id='$persoon->pers_gedcomnumber' AND event_kind='adres'",$db);
			$aantal=0;
			while($adresDb=mysql_fetch_object($adresqry)){
				$aantal++;
				$uitvoer.=', <a href="'.$uri_pad.'address.php?gedcomnummer='.substr($adresDb->event_source,1,-1).'">'.$language["address_address"];
				if($temp) { $pdfstr[$temp].=", "; }
				$pdfstr["HDadres_exist".$aantal]=$language["address_address"];
				$temp="HDadres_exist".$aantal;

				$adres=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."addresses WHERE address_gedcomnr='".substr($adresDb->event_source,1,-1)."' ORDER BY address_order",$db);
				$adresDb2=mysql_fetch_object($adres);
				if ($adresDb2->address_address){
					//$uitvoer.=" ".trim($adresDb->adres)." ".datumplaats($bronDb->datum, $bronDb->plaats);
					$uitvoer.=" ".trim($adresDb2->address_address);
					$pdfstr["HDadres_adres".$aantal]=" ".trim($adresDb2->address_address);
					$temp="HDadres_adres".$aantal;
				}
				if ($adresDb2->address_place){
					$uitvoer.=" ".trim($adresDb2->address_place);
					$pdfstr["HDadres_place".$aantal]=" ".trim($adresDb2->address_place);
					$temp="HDadres_place".$aantal;
				}
				$uitvoer.="</a>";
			}
		}

	} //*** EINDE PRIVACY DEEL ***

	// *** Bij ouder2 worden meerdere huwelijken met een link weergegeven ***
	if ($soortpersoon=='ouder2'){
		$aantalhuw=explode(";",$persoon->pers_fams);
		if (isset($aantalhuw[1])){
			for ($i=0; $i<=substr_count($persoon->pers_fams, ";"); $i++){
				$nummer=$i+1;

				$sql="SELECT * FROM ".veilig($_SESSION['tree_prefix'])."family WHERE fam_gedcomnumber='$aantalhuw[$i]'";
				$gezinvrouw=mysql_query($sql,$db);
				$gezinvrouwDb=mysql_fetch_object($gezinvrouw);

				// *** Huwelijk verwerken met een class ***
				$huwvr_cls = New huwelijk_cls;

				// *** Standaard huwelijkstekst weergeven ***
				if($screen_mode!="PDF") {
					$huwtaal=$huwvr_cls->huwelijk($gezinvrouwDb,$nummer,'kort');
				}
				else {
					$pdfhuw=$huwvr_cls->huwelijk($gezinvrouwDb,$nummer,'kort');
				}
				if ($wissel_hoofdpersoon==true){
					$persoonman=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."person
					WHERE pers_gedcomnumber='$gezinvrouwDb->fam_woman'",$db);
				}
				else{
					$persoonman=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."person
					WHERE pers_gedcomnumber='$gezinvrouwDb->fam_man'",$db);
				}
				$persoonmanDb=mysql_fetch_object($persoonman);

				if ($id==$aantalhuw[$i]){
					$uitvoer.=',';

					if(isset($huwtaal)) {$uitvoer.=' <b>'.$dirmark1.$huwtaal.' ';}
					// *** $persoonmanDb is leeg bij een N.N. persoon ***
					if ($persoonmanDb){
						$uitvoer.=$this->naam($persoonmanDb);
					}
					else{
						$uitvoer.=$language["nn"];
					}
					$uitvoer.='</b>';
				}
				else{
					$uitvoer.=', <b>';
					// *** url_rewrite ***
					if ($humo_option["url_rewrite"]=="j"){
						// *** $uri_pad is gemaakt in header.php ***
						$uitvoer.='<a href="'.$uri_pad.'gezin/'.$_SESSION['tree_prefix'].'/'.$aantalhuw[$i].'/'.$persoon->pers_gedcomnumber.'/">';
					}
					else{
						$uitvoer.='<a href="gezin.php?database='.$_SESSION['tree_prefix'].'&amp;id='.$aantalhuw[$i].'&amp;hoofdpersoon='.$persoon->pers_gedcomnumber.'">';
					}
					//$uitvoer.=$huwtaal.' '.$language["fam_to"].' ';
					if(isset($huwtaal)) {$uitvoer.=$dirmark1.$huwtaal.' ';}
					// *** $persoonmanDb is leeg bij een N.N. persoon ***
					if ($persoonmanDb){
						$uitvoer.=$this->naam($persoonmanDb);
					}
					else{
						$uitvoer.=$language["nn"];
					}
					$uitvoer.='</a></b>';
				}
				if($screen_mode=="PDF") {
					if ($persoonmanDb){
						if($temp) { $pdfstr[$temp].=", "; }
						$pdfstr["marr_more".$nummer]=$pdfhuw["relnr_rel"].$pdfhuw["rel_add"]." ".$this->naam($persoonmanDb);
						$temp="marr_more".$nummer;
					}
					else{
						if($temp) { $pdfstr[$temp].=", "; }
						$pdfstr["marr_more".$nummer]=$pdfhuw["relnr_rel"]." ".$language["nn"];
						$temp="marr_more".$nummer;
					}
				}
			}
		}
	}

	// *** zoon van/ dochter van/ kind van naam-vader & naam-moeder ***
	if ($soortpersoon=='ouder1' OR $soortpersoon=='ouder2'){
		if ($persoon->pers_famc){
			$tekst='';
			if ($persoon->pers_sexe=='M'){ $tekst=$language["pers_son"]; }
			if ($persoon->pers_sexe=='F'){ $tekst=$language["pers_daughter"]; }
			if ($persoon->pers_sexe==''){ $tekst=$language["pers_child"]; }
			if ($gezin_uitgebreid==true){
				$uitvoer.='<br>'.ucfirst($tekst);
			}
			else{
				//$uitvoer.=', '.$tekst;
				if ($uitvoer){
					$uitvoer.='. ';
				if($temp) { $pdfstr[$temp].=". "; }
				}
				$uitvoer.=ucfirst($tekst);
				$pdfstr["parent_childof"]=ucfirst($tekst);
				$temp="parent_childof";
			}

			// *** Voor de zekerheid $tekst even leeg maken ***
			$tekst='';

			// *** ID ouders zoeken ***
			$gezinouders=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."family WHERE fam_gedcomnumber='$persoon->pers_famc'",$db);
			$gezinoudersDb=mysql_fetch_object($gezinouders);

			//*** Father ***
			if ($gezinoudersDb->fam_man){
				$vader=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."person WHERE pers_gedcomnumber='$gezinoudersDb->fam_man'",$db);
				$vaderDb=mysql_fetch_object($vader);
				$tekst=$this->naam($vaderDb);
				$pdfstr["parents"]=$this->naam($vaderDb);
				$temp="parents";
			}
			else{
				$tekst=$language["nn"];
				$pdfstr["parents"]=$language["nn"];
				$temp="parents";
			}

			$tekst.=$language["pers_and"];
			$pdfstr["parents"].=$language["pers_and"];
			$temp="parents";


			//*** Mother ***
			if ($gezinoudersDb->fam_woman){
				$vrouw=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."person WHERE pers_gedcomnumber='$gezinoudersDb->fam_woman'",$db);
				$vrouwDb=mysql_fetch_object($vrouw);
				$tekst.=$this->naam($vrouwDb);
				$pdfstr["parents"].=$this->naam($vrouwDb); 
				$temp="parents";
			}
			else{ $tekst.=$language["nn"]; }

			if ($humo_option["url_rewrite"]=="j"){
				// *** $uri_pad is gemaakt in header.php ***
				$tekst2='<a href="'.$uri_pad.'gezin/'.$_SESSION['tree_prefix'].'/'.$persoon->pers_famc;
				// *** Dit nummer toegevoegd, anders krijgt Google heel veel te indexeren gezinnen ***
				if (isset($vaderDb->pers_gedcomnumber)){ $tekst2.= '/'.$vaderDb->pers_gedcomnumber; }
				$tekst2.='/">';
			}
			else{
				$tekst2='<a href="'.$uri_pad.'gezin.php?database='.$_SESSION['tree_prefix'].'&amp;id='.$persoon->pers_famc;
				if (isset($vaderDb->pers_gedcomnumber)){ $tekst2.='&amp;hoofdpersoon='.$vaderDb->pers_gedcomnumber; }
				$tekst2.='">';
			}

			// *** Link toevoegen ***
			if ($user['group_gen_protection']=='n'){ $tekst=$tekst2.$tekst.'</a>'; }

			$uitvoer.='<span class="ouders">'.$tekst.$dirmark2.' </span>';
		}
	}

	if ($levend){
		//
	}
	else{

		// *** Pictures ***
		if ($user["afbeeldingen"]=='j'){
			$PAD=$cms['cms_path'].$dataDb->tree_pict_path;
			$afbqry=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."events
				WHERE event_person_id='$persoon->pers_gedcomnumber' AND event_kind='afbeelding' ORDER BY event_order",$db);
			$afb_nr=mysql_num_rows($afbqry);
			if ($afb_nr > 0){ $uitvoer.='<br>'; }
			$aantal=0;
			while($afbDb=mysql_fetch_object($afbqry)){
				// *** Eventueel een thumb weergeven ***
				$aantal++;

				// *** Don't use entities in a picture ***
				//$event_event = html_entity_decode($afbDb->event_event, ENT_NOQUOTES, 'ISO-8859-15');
				$event_event = $afbDb->event_event;

				// *** In some cases the picture name must be converted to lower case ***
				if (file_exists($PAD.strtolower($event_event))){
					$event_event=strtolower($event_event); }

				// *** Show PDF file ***
				if(substr($PAD.$event_event,-3,3)=="pdf") {
					$picture='<a href="'.$PAD.$event_event.'"><img src="'.$uri_pad.'/images/pdf.jpeg" alt="PDF"></a>';
				}
				// *** Show AVI Video file ***
				elseif(substr($PAD.$event_event,-3,3)=="avi") {
					$picture='<a href="'.$PAD.$event_event.'" target="_blank"><img src="'.$uri_pad.'/images/video-file.png" alt="AVI"></a>';
				}
				// *** Show WMV Video file ***
				elseif(substr($PAD.$event_event,-3,3)=="wmv") {
					$picture='<a href="'.$PAD.$event_event.'" target="_blank"><img src="'.$uri_pad.'/images/video-file.png" alt="WMV"></a>';
				}
				// *** Show MPG Video file ***
				elseif(substr($PAD.$event_event,-3,3)=="mpg") {
					$picture='<a href="'.$PAD.$event_event.'" target="_blank"><img src="'.$uri_pad.'/images/video-file.png" alt="MPG"></a>';
				}
				// *** Show MOV Video file ***
				elseif(substr($PAD.$event_event,-3,3)=="mov") {
					$picture='<a href="'.$PAD.$event_event.'" target="_blank"><img src="'.$uri_pad.'/images/video-file.png" alt="MOV"></a>';
				}
				else{
					// *** Show photo using the lightbox effect ***
					$picture='<a href="'.$PAD.$event_event.'" rel="lightbox" title="'.str_replace("&", "&amp;", $afbDb->event_text).'">';

					$duim='';
					//if (file_exists($PAD.'thumb_'.strtolower($afbDb->event_event))){ $duim='thumb_'; }
					if (file_exists($PAD.'thumb_'.$event_event)){ $duim='thumb_'; }

					//$picture.='<img src="'.$PAD.$duim.strtolower($afbDb->event_event).'"></a>';
					// *** If photo is too wide, correct the size ***
					@list($width, $height) = getimagesize($PAD.$duim.$event_event); 
					if ($width>190){ $width=190; }
					$picture.='<img src="'.$PAD.$duim.$event_event.'" width="'.$width.'" alt="'.$event_event.'"></a>';

					//$pdfstr["pic_path".$aantal]=$PAD."thumb_".strtolower($afbDb->event_event); //for the time being pdf only with thumbs
					$pdfstr["pic_path".$aantal]=$PAD."thumb_".$event_event; //for the time being pdf only with thumbs
					// *** Remove spaces ***
					$pdfstr["pic_path".$aantal]=trim($pdfstr["pic_path".$aantal]);
				}

				// *** Show picture date ***
				$picture_date='';
				if ($afbDb->event_date){
					$picture_date=' '.datumplaats($afbDb->event_date,'').' '; //standaard weergave, plaats is er niet...
					$pdfstr["pic_text".$aantal]=pdf_convert(datumplaats($afbDb->event_date,''));
				}

				// *** Tekst bij afbeelding weergeven of stukje ruimte ertussen ***
				$picture_text='';
				if (isset($afbDb->event_text) AND $afbDb->event_text){
					//$picture_text=$picture_date.' '.$afbDb->event_text;
					$picture_text=$picture_date.' '.str_replace("&", "&amp;", $afbDb->event_text);
					if(isset($pdfstr["pic_text".$aantal])){
						$pdfstr["pic_text".$aantal].=pdf_convert(' '.$afbDb->event_text);}
					else {$pdfstr["pic_text".$aantal]=pdf_convert(' '.$afbDb->event_text);}
				}

				if ($afbDb->event_source){
					$picture_text.=bronweergave($afbDb->event_source); 
				}

				$uitvoer.='<div class="photo">';
				$uitvoer.=$picture;
				if(isset($picture_text)) {$uitvoer.='<div class="phototext">'.$picture_text.'</div>';}
				$uitvoer.= '</div>'."\n";
			}
			if ($afb_nr > 0){
				$uitvoer.='<br clear="All">';
				$pdfstr["got_pics"]=1;
			}
		}

		//******** Person text **************
		if ($user["group_text_pers"]=='j'){
			$werktekst=werktekstomzet($persoon->pers_text);

			// *** BK: Source by person text ***
			if (isset($persoon->pers_text_source) AND $persoon->pers_text_source){
				$werktekst.=bronweergave($persoon->pers_text_source); 
			}

			if ($werktekst){ 
				$uitvoer.='<br>'.$werktekst; 
				$pdfstr["pers_text"]="\n".pdf_convert($werktekst);
				$temp="pers_text";
			}
		}

		// *** Show events ***
		if ($user["gebeurtenis"]=='j'){
			if ($persoon->pers_gedcomnumber){
				$geb=mysql_query("SELECT * FROM ".veilig($_SESSION['tree_prefix'])."events
				WHERE event_person_id='$persoon->pers_gedcomnumber' AND event_kind='gebeurtenis' ORDER BY event_order",$db);
				$num_rows = mysql_num_rows($geb);
				if ($num_rows>0){ $uitvoer.='<span class="gebeurtenis">'."\n"; }
				$aantal=0; 
				while($gebDb=mysql_fetch_object($geb)){
				$aantal++;
				$uitvoer.="<br>\n";
				$pdfstr["event_start".$aantal]="\n";

				// *** Check if NCHI is 0 or higher ***
				$event_gedcom=$gebDb->event_gedcom;
				//$event_text=$gebDb->event_text;
				if ($event_gedcom=='NCHI' AND trim($gebDb->event_event)==''){
					$event_gedcom='NCHI0';
					//$event_text='';
				}

				$uitvoer.=taalgebeurtenis($event_gedcom);
				$pdfstr["event_ged".$aantal]=pdf_convert(taalgebeurtenis($event_gedcom));
				$temp="event_ged".$aantal;

				if ($gebDb->event_event){
					$uitvoer.=' '.$gebDb->event_event;
					$pdfstr["event_event".$aantal]=' '.$gebDb->event_event;  
					$temp="event_event".$aantal;
				}
				$uitvoer.=' '.datumplaats($gebDb->event_date, $gebDb->event_place);
				$pdfstr["event_dateplace".$aantal]=pdf_convert(' '.datumplaats($gebDb->event_date, $gebDb->event_place));
				$temp="event_dateplace".$aantal;

				if ($gebDb->event_text){
					$werktekst=werktekstomzet($gebDb->event_text);
					if ($werktekst){ 
						$uitvoer.=", ".$werktekst;
						if($temp) { $pdfstr[$temp].=", "; }
						$pdfstr["event_text".$aantal]=pdf_convert($werktekst); 
						$temp="event_text".$aantal; 
					}
				}
				if ($gebDb->event_source){ 
						$uitvoer.=bronweergave($gebDb->event_source); 
						$pdfstr["event_source".$aantal]=pdf_convert(bronweergave($gebDb->event_source)); 
						$temp="event_source".$aantal;
				}
				}
				if ($num_rows>0){ $uitvoer.="</span>\n"; }
			}
		}

	} //einde privacy

	// *** Inspringen gegevens van persoon ***
	if($screen_mode!="PDF") {
		if ($uitvoer){
			if ($soortpersoon=='Kind'){
				if ($teller<10){ echo '<div class="kind_inspringen">'; }
				else{ echo '<div class="kind_inspringen2">'; }
			}
			else{
				echo '<div class="persoon_inspringen">';
			}
			// *** Remove first ", " ***
			if (substr($uitvoer,0,2)==', '){ $uitvoer=ucfirst(substr($uitvoer,2)); }

			// *** Bij uitgebreide uitvoer de eerste <br> verwijderen ***
			if ($gezin_uitgebreid==true AND substr($uitvoer,0,4)=='<br>'){
				$uitvoer=ucfirst(substr($uitvoer,4));
			}
			echo $uitvoer;
			echo '</div>';
		}
	}
	else {   // return array with pdf values
		if(isset($pdfstr)) {return $pdfstr;}
	}

	} // einde controle $persoon

} //Einde functie gegevens persoon.

} // Einde persoon_cls
?>
Return current item: HuMo-gen