', WT_I18N::translate('Merge records'), '
';
if ($GEDCOM==$ged2) {
//-- replace all the records that linked to gid2
$ids=fetch_all_links($gid2, WT_GED_ID);
foreach ($ids as $id) {
$record=WT_GedcomRecord::getInstance($id);
if (!$record->isOld()) {
echo WT_I18N::translate('Updating linked record'), ' ', $id, '
';
$gedcom=str_replace("@$gid2@", "@$gid1@", $record->getGedcom());
$gedcom=preg_replace(
'/(\n1.*@.+@.*(?:(?:\n[2-9].*)*))((?:\n1.*(?:\n[2-9].*)*)*\1)/',
'$2',
$gedcom
);
$record->updateRecord($gedcom, true);
}
}
// Update any linked user-accounts
WT_DB::prepare(
"UPDATE `##user_gedcom_setting`".
" SET setting_value=?".
" WHERE gedcom_id=? AND setting_name='gedcomid' AND setting_value=?"
)->execute(array($gid2, WT_GED_ID, $gid1));
// Merge hit counters
$hits=WT_DB::prepare(
"SELECT page_name, SUM(page_count)".
" FROM `##hit_counter`".
" WHERE gedcom_id=? AND page_parameter IN (?, ?)".
" GROUP BY page_name"
)->execute(array(WT_GED_ID, $gid1, $gid2))->fetchAssoc();
foreach ($hits as $page_name=>$page_count) {
WT_DB::prepare(
"UPDATE `##hit_counter` SET page_count=?".
" WHERE gedcom_id=? AND page_name=? AND page_parameter=?"
)->execute(array($page_count, WT_GED_ID, $page_name, $gid1));
}
WT_DB::prepare(
"DELETE FROM `##hit_counter`".
" WHERE gedcom_id=? AND page_parameter=?"
)->execute(array(WT_GED_ID, $gid2));
}
$gedcom = "0 @" . $rec1->getXref() . "@ " . $rec1::RECORD_TYPE;
foreach ($facts1 as $fact_id=>$fact) {
if (in_array($fact_id, $keep1)) {
$gedcom .= "\n" . $fact->getGedcom();
echo WT_I18N::translate('Adding'), " ", $fact->getTag(), ' ', WT_I18N::translate('from'), ' ', $rec1->getXref(), '
';
}
}
foreach ($facts2 as $fact_id=>$fact) {
if (in_array($fact_id, $keep2)) {
$gedcom .= "\n" . $fact->getGedcom();
echo WT_I18N::translate('Adding'), " ", $fact->getTag(), ' ', WT_I18N::translate('from'), ' ', $rec2->getXref(), '
';
}
}
$rec1->updateRecord($gedcom, true);
$rec2->deleteRecord();
echo WT_I18N::translate('GEDCOM record successfully deleted.'), '
';
echo
'
',
WT_I18N::translate(
'Record %s successfully updated.',
''.$rec1->getXref().''
),
' 0) {
echo '
', $fav_count, ' ', WT_I18N::translate('favorites updated.'), '
';
}
echo '