<?
require_once('phplib/phplib.php');
require_once('common.php');

check_personeel();

$db = mdb2_open($dsn);
$herinfo = get_better_herinfo($db, $_GET);

if ($_SESSION['admin']) $herinfo['expired'] = 0;

$toets_name = mdb2_single_val($db, "SELECT PTA(%i)", $_GET['pta_id']);
$leerling = mdb2_single_val($db, "SELECT ppl_login FROM $kldv.ppl WHERE ppl_id = %i", $_GET['ppl_id']);
$grp_name = mdb2_single_val($db, "SELECT grp_name FROM $kldv.grp WHERE grp_id = %i", $_GET['grp_id']);

if (!$toets_name || !$leerling || !$grp_name) {
	error_user("Niet gevonden", "Leerling, toets of groep niet gevonden", 'vakdocentgt.php?pta_id='.$_GET['pta_id'].'&grp_id='.$_GET['grp_id']);
}

if ($herinfo['expired']) {
	error_user("Deadline verstreken", "Opgave kan niet meer worden gewijzigd, omdat de deadline verstreken is", 'vakdocentgt.php?pta_id='.$_GET['pta_id'].'&grp_id='.$_GET['grp_id']);
}

$status = mdb2_single_assoc($db, <<<EOQ
SELECT ppl_id, pta_id, grp_id, subj_id,
	CASE
	WHEN weight = 0 AND fixed = 1 THEN 'OK'
	ELSE 'ERROR'
	END AS status
FROM (
	SELECT grp2subj_id
	FROM $kldv.ppl2grp2subj
	WHERE ppl2grp2subj.ppl_enter <= {$herinfo['period_deadline']}
	AND ppl2grp2subj.ppl_exit > {$herinfo['period_deadline']}
	AND ppl_id = {$_SESSION['ppl_id']}
) AS ppl2grp2subj 
JOIN (
        SELECT * FROM $kldv.year2grp2subj WHERE grp2subj_enter <= {$herinfo['period_deadline']} AND grp2subj_exit > {$herinfo['period_deadline']}
) AS actualgrp2subj USING (grp2subj_id)
JOIN $kldv.grp2subj USING (grp2subj_id)
JOIN $kldv.subj USING (subj_id)
JOIN (
        SELECT grp_id, grp_name, SUBSTRING(grp_name, 1, 1) pta_leerjr,
                        SUBSTRING(grp_name, 2, 1) pta_target
        FROM $kldv.grp
) AS grpinfo USING (grp_id)
JOIN (
        SELECT * FROM ptas
        JOIN (
                SELECT * FROM period2selectable WHERE period_id = {$herinfo['period_id']} AND doc = 1
        ) AS bla USING (pta_id)
) AS filteredptas USING (pta_leerjr, pta_target, year_id, subj_id)
JOIN (
	SELECT * FROM $kldv.ppl2grp
	WHERE ppl2grp.ppl_enter <= {$herinfo['period_deadline']}
	AND ppl2grp.ppl_exit > {$herinfo['period_deadline']}
) AS ppl2grp USING (grp_id)
JOIN $kldv.ppl USING (ppl_id)
LEFT JOIN (
	SELECT rex_id, pta_id, ppl_id, weight, fixed FROM rex WHERE period_id = {$herinfo['period_id']}
) AS filteredrex USING (pta_id, ppl_id)
WHERE year_id = {$herinfo['year_id']} AND pta_id = %i AND grp_id = %i AND ppl_id = %i
EOQ
, $_GET['pta_id'], $_GET['grp_id'], $_GET['ppl_id']);

if (!$status) error_user("Permission denied", "Geen rechten van {$_SESSION['username']} op $leerling in $grp_name voor $toets_name", 'vakdocentgt.php?pta_id='.$_GET['pta_id'].'&grp_id='.$_GET['grp_id']);

if ($status['status'] != 'OK') error_user("Onmogelijk", "Kan leerling niet afmelden, omdat de leerling niet (op een goede manier) is aangemeld", 'vakdocentgt.php?pta_id='.$_GET['pta_id'].'&grp_id='.$_GET['grp_id']);

$ret = mdb2_exec($db, "DELETE FROM rex WHERE ppl_id = {$status['ppl_id']} AND period_id = {$herinfo['period_id']} AND pta_id = {$status['pta_id']} AND fixed = 1 AND weight = 0");

if (!$ret) {
	error_user("Verwijderen niet gelukt", 'Poging aanmelding te verwijderen mislukt!');
}

apache_note('phplib_action', "toets verwijderd voor ppl_id={$status['ppl_id']}, grp_id={$status['ppl_id']}, pta_id={$status['pta_id']}");
notice_user("Succes", "Leerling $leerling uit $grp_name afgemeld voor inhalen $toets_name", 'vakdocentgt.php?pta_id='.$_GET['pta_id'].'&grp_id='.$_GET['grp_id']);
?>