if (POST) {
lovd_errorClean();
// Mandatory fields.
if (empty($_POST['password'])) {
lovd_errorAdd('password', 'Please fill in the \'Enter your password for authorization\' field.');
} elseif (!lovd_verifyPassword($_POST['password'], $_AUTH['password'])) {
lovd_errorAdd('password', 'Please enter your correct password for authorization.');
} else {
$bValidPassword = true;
}
// Remove password from default values shown in confirmation form.
unset($_POST['password']);
}
if ($bValidPassword && $bConfirmation) {
// This also deletes the entries in gen2dis and transcripts.
$_DATA->deleteEntry($sID);
// Write to log...
lovd_writeLog('Event', LOG_EVENT, 'Deleted gene information entry ' . $sID . ' - ' . $zData['id'] . ' (' . $zData['name'] . ')');
// Thank the user...
header('Refresh: 3; url=' . lovd_getInstallURL() . $_PE[0]);
$_T->printHeader();
$_T->printTitle();
lovd_showInfoTable('Successfully deleted the gene information entry!', 'success');
$_T->printFooter();
exit;
}
$_T->printHeader();
$_T->printTitle();
lovd_showInfoTable('This will delete the ' . $zData['id'] . ' gene, all transcripts of this gene, and all annotations on variants specific for ' . $zData['id'] . '. The genomic variants and all individual-related information, including screenings, phenotypes and diseases, will not be deleted, so these might be left without a curator able to manage the data.<BR>
<B>If you also wish to remove all information on individuals with variants in ' . $zData['id'] . ', first <A href="' . $_PE[0] . '/' . $sID . '?empty">empty</A> the gene database.</B>', 'warning');
if ($bValidPassword) {
