xXx

Hexid M1n1 5h3ll MobiLe

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

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

%name:Add Person Siblings Row%
%version:V10.1.0.2%
%description:Adds a 'Siblings' row to the info (top) section on a person's page.<br />
An option is available in Mod Manager after installation to collapse or not.<br />
An option is available in Mod Manager after installation to include the current individual.<br />
Mod by Jeff Robison.
%
%wikipage:Add_Person_Siblings_Row%

%target:languages/English/cust_text.php%
%fileoptional:%
%location:%
?>
%end:%

%insert:before%
$text['infosibling'] = "Sibling";
$text['infosiblings'] = "Siblings";
%end:%

%target:languages/English-UTF8/cust_text.php%
%fileoptional:%
%location:%
?>
%end:%

%insert:before%
$text['infosibling'] = "Sibling";
$text['infosiblings'] = "Siblings";
%end:%

%target:getperson.php%

%parameter:$collapsesibs:false%
%desc:<b>Collapse siblings?</b><br />
true = YES<br />
false = NO<br />
Do do not use quotes!<br />
Default is (true)%

%parameter:$includecurind:false%
%desc:<b>Include current individual in siblings list?</b><br />
true = YES<br />
false = NO<br />
Do do not use quotes!<br />
Default is (true)%
%end:%

%location:%
	ksort( $events );
	foreach( $events as $event )
		$persontext .= showEvent( $event );
%end:%

%insert:after%
$collapsesibs = false;
$includecurind = false;
$personparentsID = getChildParentsFamily($tree, $personID);
$PersonParID = tng_fetch_assoc( $personparentsID );
tng_free_result($personparentsID);
$PersonSiblings = getPersonSiblings($personID, $PersonParID['familyID']);
$collapsesibs2 = $sibcount > 1 ? $collapsesibs : false;

if ($sibcount)
	$persontext .= showEvent( array( "text"=>$text['infosiblings'], "fact"=>$PersonSiblings, "event"=>"NAME", "collapse"=>$collapsesibs2, "entity"=>$PersonParID['familyID'], "type"=>"F" ));
%end:%

%target:personlib.php%

%location:%	
?>
%end:%

%insert:before%

function getPersonSiblings( $PersonID, $familyID ) {

	global $tree, $righttree, $getperson_url, $descend_url, $includecurind, $text, $ismobile2, $tngconfig, $sibcount;

        $popsib2 = "";
	$prntchildcount = 0;
	$sibcount = 0;
	$prntchildren = array();
	$prntchilddata = getChildrenData($tree, $familyID);
        $childrows = tng_num_rows( $prntchilddata );
	
	if( $prntchilddata && $childrows ) {
                $prntchildren[0] = "<table style=\"margin-bottom:-15px;\" cellpadding = \"0\" cellspacing = \"0\" width=\"100%\">";
		while( $prntchild = tng_fetch_assoc($prntchilddata) ) {
				$prntchildID = $prntchild['personID'];
				$prntchild['gedcom'] = $tree;
				$ifkids = $prntchild['haskids'] ? "<a href=\"$descend_url" . "personID=$prntchildID&amp;tree=$tree\" title=\"{$text['descendants']}\" class=\"descindicator\"><strong>+</strong></a>" : "&nbsp;";
				$birthinfo = getBirthInfo( $prntchild );
				$pcrights = determineLivingPrivateRights($prntchild, $righttree);
				$prntchild['allow_living'] = $pcrights['living'];
				$prntchild['allow_private'] = $pcrights['private'];
				if (($prntchildID == $PersonID && $includecurind) || $prntchildID != $PersonID) {
				if( $prntchild['firstname'] || $prntchild['lastname'] ) {
				if ($prntchildID != $PersonID)
                                     $sibcount++;
                                     $prntchildcount++;
				     $prntchildname = getName( $prntchild );
				if (!$ismobile2 && file_exists($cms['tngpath'] . "js/popup_2.js")) {
					$personstr = getPersonPrev($tree, $prntchildID, $hiliteperson);
					$popsib2 = "ppopup($('#{$prntchild['personID']}1').html());";
					echo "<div id=\"{$prntchild['personID']}1\" style=\"display:none;\">$personstr</div>";
                                 }
				if (file_exists($cms['tngpath'] . "js/popup.js") || file_exists($cms['tngpath'] . "js/popup_1.js")) {
					if ( $ifkids != "&nbsp;" ) $ifkids = "<a href=\"$descendant_url" . "personID=$prntchildID&amp;tree=$tree\" title=\"{$text['descendants']}\" class=\"descendicon\" style=\"font-size: 14px;\">+</a>";
                                         $rugratmd = getSpouseFamilyFullUnion($tree, $prntchildID);
                                         $rugratmarried = tng_fetch_assoc( $rugratmd );
                                         $marrtot2 = tng_num_rows($rugratmd);
                                         $marriedx = $text['married'] . ": " . $marrtot2 . "x";
					if ( $marrtot2 && $ifkids == "&nbsp;" ) $ifkids = "<a href=\"$descend_url" . "personID=$prntchildID&amp;tree=$tree&amp;dummy=$tree\"><img src=\"img/ArrowRight_sm.gif\" class=\"marriedicon2\" title=\"$marriedx\" alt=\"$marriedx\" /></a>";
                                         $marriageind = "";
					if ( $marrtot2 > 1 && $tngconfig['dispmarrcount'] ) {
                                         $marriageind = "&nbsp;<a style=\"text-decoration:none; cursor:context-menu;\" title=\"$marriedx\"><img src=\"{$cms['tngpath']}img/ArrowRight_sm.gif\" class=\"descendicon\" style=\"margin-bottom:1px;\" title=\"$marriedx\" alt=\"$marriedx\" /><span class=\"smaller\" />$marrtot2</span>x</a>&nbsp;";
                                        }
                                 }
                                          $prntchildren[0] .= "<tr><td valign=\"top\" width=\"10\">$ifkids</td><td onmouseover=\"highlightChild(1,'".$prntchildID."');\" onmouseout=\"highlightChild(0,'".$prntchildID."');\" class=\"unhighlightedchild\" id=\"child".$prntchildID."\"><span class=\"normal\">";

//                                        $prntchildcount = ($prntchildcount < 10) ? "<a style=\"visibility: hidden;\">0</a>" . $prntchildcount : $prntchildcount;
                                	$prntchildren[0] .= ($prntchildID == $PersonID) ? $prntchildcount . ". <a onmouseover=\"$popsib2\">$prntchildname</a>$marriageind" : $prntchildcount . ". <a href=\"$getperson_url" . "personID=$prntchildID&amp;tree=$tree\" onmouseover=\"$popsib2\">$prntchildname</a>$marriageind";

					if( $pcrights['both'] ) {
						$prntchildren[0] .= $birthinfo;
						$age = age($prntchild);
						if($age) $prntchildren[0] .= " &nbsp;({$text['age']} $age)";
					}
					$prntchildren[0] .= "</span></td></tr>";
				}
                         }
		}
			$prntchildren[0] .= "</table>";
		tng_free_result($prntchilddata);
	}

        $siborsibs = ($sibcount > 1) ? $text['infosiblings'] : $text['infosibling'];
	$label2 = $sibcount . " " . $siborsibs;
	$prntchildrenPlus = strtolower($label2);
	if ($sibcount) array_unshift($prntchildren, $prntchildrenPlus);

	return $prntchildren;
}
%end:%

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