Surname Spelling Variants
";
$query = "SELECT count(*) FROM ind WHERE stid = '$stid' AND inds_surname = '$name'";
/*echo $query; */
$result = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid query");
$array = mysql_fetch_array($result);
echo "There are ",$array[0]," persons in the database with the surname $name or one of its variants
";
$query = "SELECT distinct ind_surname FROM ind WHERE stid = '$stid' AND inds_surname = '$name' ORDER BY ind_surname ";
/*echo $query;*/
$result = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid query");
$num = mysql_num_rows($result);
echo "There are $num spelling variants for $name currently in use in this study:
";
echo "
| Surname Spelling |
Number of Individuals |
Number of Trees |
";
while ($array = mysql_fetch_array($result)){
$nam = $array[0];
$query1 = "SELECT count(*) FROM ind WHERE stid = '$stid' AND ind_surname = '$nam'";
/*echo $query1;*/
$result1 = mysql_db_query ($dbname, $query1, $connection)
or die ("Invalid query");
$numinds = mysql_fetch_array($result1);
$numind = $numinds[0];
$query2 = "SELECT count(*) FROM ind WHERE ind_surname = '$nam' AND stid = '$stid' AND fam_id =0";
/*echo $query2;*/
$result2 = mysql_db_query ($dbname, $query2, $connection)
or die ("Invalid query");
$numfams = mysql_fetch_array($result2);
$numfam = $numfams[0];
echo "
| $nam |
$numind |
$numfam |
";
}
echo "
";
return ;
}
function rec_count( $name, $stid, $connection){
/*this function reports record counts and maximum id values*/
echo "Database Table Statistics for this Study
";
echo "The following table gives the numbers of records of some of the tables together with the maximum value used
by this study (other studies share the same table so maximum values might be larger than record counts)
";
/*get individual table data*/
$query = "SELECT count(*) FROM ind WHERE stid = \"$stid\"";
/*echo $query; */
$result = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid query");
$array = mysql_fetch_array($result);
$ind_cnt = $array[0];
$query = "SELECT max(ind_id) FROM ind WHERE stid = \"$stid\"";
/*echo $query; */
$result = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid query");
$array = mysql_fetch_array($result);
$ind_max = $array[0];
$query = "SELECT count(*) FROM fam WHERE stid = \"$stid\"";
/*echo $query; */
$result = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid query");
$array = mysql_fetch_array($result);
$fam_cnt = $array[0];
$query = "SELECT max(fam_id) FROM fam WHERE stid = \"$stid\"";
/*echo $query; */
$result = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid query");
$array = mysql_fetch_array($result);
$fam_max = $array[0];
$query = "SELECT count(*) FROM events WHERE stid = \"$stid\"";
/*echo $query; */
$result = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid query");
$array = mysql_fetch_array($result);
$evt_cnt = $array[0];
$query = "SELECT max(event_id) FROM events WHERE stid = \"$stid\"";
/*echo $query; */
$result = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid query");
$array = mysql_fetch_array($result);
$evt_max = $array[0];
$query = "SELECT count(*) FROM contrib WHERE stid = \"$stid\"";
/*echo $query; */
$result = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid query");
$array = mysql_fetch_array($result);
$con_cnt = $array[0];
$query = "SELECT max(cont_id) FROM contrib WHERE stid = \"$stid\"";
/*echo $query; */
$result = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid query");
$array = mysql_fetch_array($result);
$con_max = $array[0];
$query = "SELECT count(*) FROM dat_file WHERE stid = \"$stid\"";
/*echo $query; */
$result = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid query");
$array = mysql_fetch_array($result);
$fil_cnt = $array[0];
$query = "SELECT max(df_id) FROM dat_file WHERE stid = \"$stid\"";
/*echo $query; */
$result = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid query");
$array = mysql_fetch_array($result);
$fil_max = $array[0];
/*output section */
echo "
| Table |
Count |
Maximum id Value |
| Individuals |
$ind_cnt |
$ind_max |
| Families |
$fam_cnt |
$fam_max |
| Events |
$evt_cnt |
$evt_max |
| Contributors |
$con_cnt |
$con_max |
| Files Included |
$fil_cnt |
$fil_max |
";
return ;
}
function filcontr($name, $stid, $connection){
/*This function provides a table of source files and contributers for the build*/
echo "The following table shows the names of the source files and the contributors
of those files, for the database used in this study.";
echo "
Contributed Files included in this Study
";
echo "
| File |
Contributor |
Individuals |
Families |
Description |
";
$nfiles = 0;
$famtot = 0;
$indtot = 0;
$query = "SELECT DISTINCT filename FROM buildlog WHERE stid = \"$stid\" ORDER BY filename";
/*echo $query; */
$result = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid filename query");
while ($array = mysql_fetch_array($result)){
$file = $array["filename"];
$nfiles = $nfiles + 1;
$query = "SELECT * FROM dat_file WHERE df_filname = \"$file\" and stid = \"$stid\"";
/*echo $query;*/
$result1 = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid contributor query");
$array1= mysql_fetch_array($result1);
$desc = $array1["df_desc"];
$contid = $array1["df_cont_id"];
$query = "SELECT * FROM contrib WHERE cont_id = \"$contid\"";
/*echo $query;*/
$result2 = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid contrib query");
$array2 = mysql_fetch_array($result2);
$name = $array2["cont_fname"]." ".$array2["cont_sname"];
$query = "SELECT count(*) FROM ind WHERE cont_fil = \"$file\" and stid = \"$stid\"";
/*echo $query; */
$result9 = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid query");
$incnt = mysql_fetch_array($result9);
$indcnt1 = $incnt[0];
$indtot = $indtot + $indcnt1;
$query = "SELECT count(*) FROM fam WHERE cont_fil = \"$file\" and stid = \"$stid\"";
/*echo $query; */
$result0 = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid query");
$famcnt = mysql_fetch_array($result0);
$famcnt1 = $famcnt[0];
$famtot = $famtot + $famcnt1;
echo "
| $file |
$name |
$indcnt1 |
$famcnt1 |
$desc |
";
}
echo "
| totals |
$nfiles |
$indtot |
$famtot |
|
";
echo "
";
return ;
}
function onlcontr($stname, $stid, $connection){
$query = "Select distinct cont_id from ind where cont_fil='console' and stid ='$stid'";
#echo "$query
";
$result = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid contributor query");
echo "
On-line Data Entry Included in this Study
";
echo "
| Contributor |
Individuals |
Families |
";
$totind = 0;
$totfam = 0;
while($onldat = mysql_fetch_array($result)){
$indcount = 0;
$famcount = 0;
$contid = $onldat[cont_id];
$contdat = getcontdat($contid, $connection);
$where ="where cont_fil='console' and cont_id ='$contid' and stid='$stid'";
$indcount = getcount('ind', $where, $connection);
$famcount = getcount('fam', $where, $connection);
echo "
| $contdat[cont_fname] $contdat[cont_sname] |
$indcount |
$famcount |
";
$totind = $totind + $indcount;
$totfam = $totfam + $famcount;
}
echo "
| Totals |
$totind |
$totfam |
";
}
function auditfile($stid, $connection){
/* this is the function that reads an input gedcom file produces a count of
the individuals and families included in that file
paramters:
*/
$path = getpath($stid, $connection);
$query = "SELECT * FROM dat_file WHERE stid = \"$stid\" ORDER BY df_filname ";
/*echo $query;*/
$result = mysql_db_query ($dbname, $query, $connection)
or die ("Invalid dat_file query");
headz("Input File Data");
echo "
| File Name |
Individuals |
Child Individuals |
Families |
";
$totind = 0;
$totfam = 0;
while($array = mysql_fetch_array($result)){
$indcount = 0;
$famcount = 0;
$childcount = 0;
$dat_file = $array["df_filname"];
$dat1_file = $path."/".$dat_file;
/*echo "file to open for audit is ", $dat_file,"
";*/
$fd = fopen($dat1_file, "r");
/*echo "fd is ",$fd,"
";*/
/*$fam_offset = getmax("fam_id", "fam", $connection);
$ind_offset = getmax("ind_id", "ind", $connection);*/
/*echo "offsets", $ind_offset," ", $fam_offset," ", $event_offset;*/
if ($fd != 0){
while ($buffer = fgets($fd, 1024)){
$lin = chop($buffer);
$lin = ereg_replace("FAMILY\_CHILD", "FAMC", $lin);
/*echo $lin, "
";*/
/* extract the data */
if ((substr($lin, 2, 1))=="@"){
$ndpos = strrpos ($lin, "@");
if ((substr($lin, ($ndpos + 2), 4))=="INDI"){
$indcount ++;
}
if ((substr($lin, ($ndpos + 2), 3))=="FAM"){
$famcount ++;
}
}
if ((substr($lin, 2, 4))=="FAMC"){
$childcount ++;
}
}
fclose($fd);
$totfam = $totfam + $famcount;
$totind = $totind + $indcount;
$totchild = $totchild + $childcount;
/*echo $indcount," ",$famcount,"
";*/
echo "
| $dat_file |
$indcount |
$childcount |
$famcount |
";
}
}
echo "
| totals |
$totind |
$totchild |
$totfam |
";
}
/*processing starts here*/
#include("./header.php");
/*echo "mode is",$mode,"
";*/
$stid = $stdat[stid];
$color = $stdat[st_color];
$name = $stdat[st_name];
switch ($mode) {
case "":
$number = treestart($stdat, $connection);
alias_stat ($stdat[st_name], $stid, $connection);
rec_count ($stdat[st_name], $stid, $connection);
filcontr($stdat[st_name], $stid, $connection);
onlcontr($stdat[st_name], $stid, $connection);
break;
case "A":
auditfile($stid, $connection);
break;
}
newcrite('1','',$update);
?>