$_T->printFooter();
exit;
}
if (PATH_COUNT == 2 && ctype_digit($_PE[1]) && ACTION == 'delete') {
// URL: /phenotypes/0000000001?delete
// Drop specific entry.
$nID = sprintf('%010d', $_PE[1]);
define('PAGE_TITLE', 'Delete phenotype #' . $nID);
define('LOG_EVENT', 'PhenotypeDelete');
// FIXME; hier moet een goede controle komen, wanneer lager is toegestaan.
// Load appropriate user level for this phenotype entry.
lovd_isAuthorized('phenotype', $nID);
lovd_requireAUTH(LEVEL_CURATOR);
require ROOT_PATH . 'class/object_phenotypes.php';
$_DATA = new LOVD_Phenotype('', $nID);
$zData = $_DATA->loadEntry($nID);
require ROOT_PATH . 'inc-lib-form.php';
if (!empty($_POST)) {
lovd_errorClean();
// Mandatory fields.
if (empty($_POST['password'])) {
lovd_errorAdd('password', 'Please fill in the \'Enter your password for authorization\' field.');
}
// User had to enter his/her password for authorization.
if ($_POST['password'] && !lovd_verifyPassword($_POST['password'], $_AUTH['password'])) {
lovd_errorAdd('password', 'Please enter your correct password for authorization.');
}
if (!lovd_error()) {
// Get genes which are modified before we delete the entry.
// Only when phenotype, individual and variant are marked or public.
if ($zData['statusid'] >= STATUS_MARKED) {
