xXx

Hexid M1n1 5h3ll MobiLe

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

File:C:/www/dummy/familytree/admin_update_dna_test.php

<?php
include("begin.php");
include("adminlib.php");
include("datelib.php");
$textpart = "dna";
include("$mylanguage/admintext.php");

$admin_login = 1;
include("checklogin.php");

if( !$allow_edit && !$allow_add ) {
	$message = $admtext['norights'];
	header( "Location: admin_login.php?message=" . urlencode($message) );
	exit;
}

require("adminlog.php");

if (get_magic_quotes_gpc() == 0) {
	$test_number = addslashes($test_number);
	$notes = addslashes($notes);
	$vendor = addslashes($vendor);
	$y_results = addslashes($y_results);
	$hvr1_results = addslashes($hvr1_results);
	$hvr2_results = addslashes($hvr2_results);
	$person_name = addslashes($person_name);
	$dna_group = addslashes($dna_group);
	 $descquery = "SELECT description FROM $dna_groups_table WHERE dna_group=\"$dna_group\"";
	 $descresult = tng_query($descquery);
         $descrow = tng_fetch_assoc( $descresult );
         tng_free_result($descresult);
	 $group = $dna_group ? $descrow['description'] : "";
	$dna_group_desc = addslashes($group);
	$surnames = addslashes($surnames);
	$MD_ancestorID = addslashes($MD_ancestorID);
	$MRC_ancestorID = addslashes($MRC_ancestorID);
	$ref_seq = addslashes($ref_seq);
	$xtra_mut = addslashes($xtra_mut);
	$coding_reg = str_replace(', ',',',$coding_reg);
	$coding_reg = str_replace(',',', ',$coding_reg);
	$coding_reg = addslashes($coding_reg);
	$admin_notes = addslashes($admin_notes);
	$admin_notes = addslashes($admin_notes);
	$personID = addslashes($personID);
	$urls = addslashes($urls);
	$markers = addslashes($markers);
	$haplogroup = addslashes($haplogroup);
	$signsnp = addslashes($signsnp);
	$termsnp = addslashes($termsnp);
}
$test_date = convertDate( $test_date );
if(!$personID && !$person_name)
	$mynewgedcom = "";

$query = "UPDATE $dna_tests_table SET test_type=\"$test_type\", test_number=\"$test_number\", notes=\"$notes\", vendor=\"$vendor\", test_date=\"$test_date\", personID=\"$personID\", 
	gedcom=\"$mynewgedcom\", urls=\"$urls\", markers=\"$markers\", y_results=\"$y_results\", hvr1_results=\"$hvr1_results\", hvr2_results=\"$hvr2_results\", person_name = \"$person_name\", confirmed = \"$confirmed\", markeropt = \"$markeropt\", notesopt = \"$notesopt\", linksopt = \"$linksopt\", surnamesopt = \"$surnamesopt\", private_dna = \"$private_dna\", dna_group = \"$dna_group\", dna_group_desc = \"$dna_group_desc\", surnames = \"$surnames\", MD_ancestorID = \"$MD_ancestorID\", MRC_ancestorID = \"$MRC_ancestorID\", admin_notes = \"$admin_notes\", medialinks = \"$medialinks\", ref_seq = \"$ref_seq\", xtra_mut = \"$xtra_mut\", coding_reg = \"$coding_reg\", haplogroup=\"$haplogroup\", significant_snp=\"$signsnp\", terminal_snp=\"$termsnp\"  WHERE testID=\"$testID\"";
$result = tng_query($query);

$query = "UPDATE $dna_links_table SET dna_group=\"$dna_group\"  WHERE testID=\"$testID\"";
$result = tng_query($query);
if( $personID && $personID != $personID_org ) {
	$query = "INSERT IGNORE INTO $dna_links_table (testID,personID,gedcom,dna_group) VALUES (\"$testID\",\"$personID\",\"$mynewgedcom\",\"$dna_group\")";
	$result = @tng_query($query);
}

adminwritelog( "<a href=\"admin_edit_dna_test.php?testID=$testID\">{$admtext['modifydna']}: $testID</a>" );

if( $newtest == "return" )
	header( "Location: admin_edit_dna_test.php?testID=$testID&cw=$cw" );
else if( $newtest == "close" ) {
?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<body>
<script type="text/javascript">
	top.close();
</script>
</body>
</html>
<?php
}
else  {
	$message = $admtext['changestotest'] . " $test_number {$admtext['succsaved']}.";
	header( "Location: admin_dna_tests.php?message=" . urlencode($message) );
}
?>

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