mirror of
https://github.com/moodle/moodle.git
synced 2025-02-13 20:36:42 +01:00
38e179a4ed
This check-in removes about 400 lines of code. I hope I have not screwed anything up. I would be grateful if people could review this change, and keep an eye on the navigation bar in modules. Any navigation bar bugs you find in the near future, feel free to file them in the tracker and assign them to me. Thanks. If not to many problems are found, I think I would like to backport this to 1.9 stable, but I am not sure that is a good idea. Opinions to the General Developer Forum please. I am about to start a thread there.
1175 lines
52 KiB
PHP
1175 lines
52 KiB
PHP
<?php // $Id$
|
|
|
|
/*************************************************
|
|
ACTIONS handled are:
|
|
|
|
adminamendgradinggrading
|
|
adminconfirmdelete
|
|
admindelete
|
|
adminedit
|
|
adminlist
|
|
adminlistbystudent
|
|
assessresubmission
|
|
assesssubmission
|
|
displaygradingform
|
|
editelements (teachers only)
|
|
insertelements (for teachers)
|
|
listungradedstudentsubmissions (for teachers)
|
|
listungradedstudentassessments (for teachers)
|
|
listteachersubmissions
|
|
regradestudentassessments (for teachers)
|
|
teacherassessment (for teachers)
|
|
teachertable
|
|
updateassessment
|
|
updateteacherassessment
|
|
userconfirmdelete
|
|
userdelete
|
|
viewassessment
|
|
|
|
************************************************/
|
|
|
|
require_once("../../config.php");
|
|
require_once("lib.php");
|
|
require_once("locallib.php");
|
|
|
|
$id = required_param('id', PARAM_INT); // Course Module ID
|
|
$action = required_param('action', PARAM_ALPHA);
|
|
$aid = optional_param('aid', 0, PARAM_INT);
|
|
$sid = optional_param('sid', 0, PARAM_INT);
|
|
$userid = optional_param('userid', 0, PARAM_INT);
|
|
|
|
// get some esential stuff...
|
|
if (! $cm = get_coursemodule_from_id('exercise', $id)) {
|
|
error("Course Module ID was incorrect");
|
|
}
|
|
|
|
if (! $course = get_record("course", "id", $cm->course)) {
|
|
error("Course is misconfigured");
|
|
}
|
|
|
|
if (! $exercise = get_record("exercise", "id", $cm->instance)) {
|
|
error("Course module is incorrect");
|
|
}
|
|
|
|
exercise_add_custom_scales($exercise);
|
|
|
|
require_login($course->id, false, $cm);
|
|
|
|
$context = get_context_instance(CONTEXT_MODULE, $cm->id);
|
|
|
|
$strexercises = get_string("modulenameplural", "exercise");
|
|
$strexercise = get_string("modulename", "exercise");
|
|
$strassessments = get_string("assessments", "exercise");
|
|
|
|
// ... print the header and...
|
|
$navigation = build_navigation($strassessments, $cm);
|
|
print_header_simple(format_string($exercise->name), "", $navigation,
|
|
"", "", true);
|
|
|
|
//...get the action
|
|
|
|
|
|
/******************* admin amend Grading Grade ************************************/
|
|
if ($action == 'adminamendgradinggrade' ) {
|
|
|
|
if (!has_capability('mod/exercise:assess', $context)) {
|
|
error("Only teachers can look at this page");
|
|
}
|
|
if (empty($aid)) {
|
|
error("Admin Amend Grading grade: assessment id missing");
|
|
}
|
|
|
|
if (!$assessment = get_record("exercise_assessments", "id", $aid)) {
|
|
error("Amin Amend Grading grade: assessment not found");
|
|
}
|
|
print_heading(get_string("amend", "exercise")." ".get_string("gradeforstudentsassessment",
|
|
"exercise", $course->student));
|
|
echo "<form id=\"amendgrade\" method=\"post\" action=\"assessments.php\">\n";
|
|
echo "<input type=\"hidden\" name=\"aid\" value=\"$aid\" />\n";
|
|
echo "<input type=\"hidden\" name=\"action\" value=\"updategradinggrade\" />\n";
|
|
echo "<input type=\"hidden\" name=\"id\" value=\"$cm->id\" />\n";
|
|
echo "<table width=\"50%\" align=\"center\" border=\"1\" />\n";
|
|
echo "<tr><td align=\"right\"><b>".get_string("gradeforstudentsassessment", "exercise",
|
|
$course->student)." :</td><td>\n";
|
|
// set up coment scale
|
|
for ($i=$exercise->gradinggrade; $i>=0; $i--) {
|
|
$num[$i] = $i;
|
|
}
|
|
choose_from_menu($num, "gradinggrade",
|
|
number_format($exercise->gradinggrade * $assessment->gradinggrade / 100, 0), "");
|
|
echo "</td></tr>\n";
|
|
echo "<tr><td colspan=\"2\" align=\"center\">";
|
|
echo "<input type=\"submit\" value=\"".get_string("amend", "exercise")."\" />\n";
|
|
echo "</td></tr>\n";
|
|
echo "</table>\n";
|
|
echo "</center>";
|
|
echo "</form>\n";
|
|
}
|
|
|
|
|
|
/******************* admin confirm delete ************************************/
|
|
elseif ($action == 'adminconfirmdelete' ) {
|
|
|
|
if (!has_capability('mod/exercise:assess', $context)) {
|
|
error("Only teachers can look at this page");
|
|
}
|
|
if (empty($aid)) {
|
|
error("Admin confirm delete: assessment id missing");
|
|
}
|
|
|
|
notice_yesno(get_string("confirmdeletionofthisitem","exercise", get_string("assessment", "exercise")),
|
|
"assessments.php?action=admindelete&id=$cm->id&aid=$aid",
|
|
"submissions.php?action=adminlist&id=$cm->id");
|
|
}
|
|
|
|
|
|
/******************* admin delete ************************************/
|
|
elseif ($action == 'admindelete' ) {
|
|
|
|
if (!has_capability('mod/exercise:assess', $context)) {
|
|
error("Only teachers can look at this page");
|
|
}
|
|
if (empty($aid)) {
|
|
error("Admin delete: submission id missing");
|
|
}
|
|
|
|
print_string("deleting", "exercise");
|
|
// first delete all the associated records...
|
|
delete_records("exercise_grades", "assessmentid", $aid);
|
|
// ...now delete the assessment...
|
|
delete_records("exercise_assessments", "id", $aid);
|
|
|
|
print_continue("submissions.php?id=$cm->id&action=adminlist");
|
|
}
|
|
|
|
|
|
/*********************** admin list of asssessments (of a submission) (by teachers)**************/
|
|
elseif ($action == 'adminlist') {
|
|
|
|
if (!has_capability('mod/exercise:assess', $context)) {
|
|
error("Only teachers can look at this page");
|
|
}
|
|
|
|
if (empty($sid)) {
|
|
error ("exercise asssessments: adminlist called with no sid");
|
|
}
|
|
$submission = get_record("exercise_submissions", "id", $sid);
|
|
exercise_print_assessments_for_admin($exercise, $submission);
|
|
print_continue("submissions.php?action=adminlist&id=$cm->id");
|
|
}
|
|
|
|
|
|
/****************** admin list of asssessments by a student (used by teachers only )******************/
|
|
elseif ($action == 'adminlistbystudent') {
|
|
|
|
if (!has_capability('mod/exercise:assess', $context)) {
|
|
error("Only teachers can look at this page");
|
|
}
|
|
|
|
if (empty($userid)) {
|
|
error ("exercise asssessments: adminlistbystudent called with no userid");
|
|
}
|
|
$user = get_record("user", "id", $userid);
|
|
exercise_print_assessments_by_user_for_admin($exercise, $user);
|
|
print_continue("submissions.php?action=adminlist&id=$cm->id");
|
|
}
|
|
|
|
|
|
/****************** Assess resubmission (by teacher) ***************************/
|
|
elseif ($action == 'assessresubmission') {
|
|
|
|
if (empty($sid)) {
|
|
error ("exercise asssessments: assessresubmission called with no sid");
|
|
}
|
|
|
|
if (! $submission = get_record("exercise_submissions", "id", $sid)) {
|
|
error("Assess submission is misconfigured - no submission record!");
|
|
}
|
|
if (!$submissionowner = get_record("user", "id", $submission->userid)) {
|
|
error("Assess resubmission: user record not found");
|
|
}
|
|
|
|
// there can be an assessment record, if there isn't...
|
|
if (!$assessment = exercise_get_submission_assessment($submission, $USER)) {
|
|
if (!$submissions = exercise_get_user_submissions($exercise, $submissionowner)) {
|
|
error("Assess resubmission: submission records not found");
|
|
}
|
|
$lastone= '';
|
|
// just the last but one submission
|
|
foreach ($submissions as $submission) {
|
|
$prevsubmission = $lastone;
|
|
$lastone = $submission;
|
|
}
|
|
// get the teacher's assessment of the student's previous submission
|
|
if (!$prevassessment = exercise_get_submission_assessment($prevsubmission, $USER)) {
|
|
error("Assess resubmission: Previous assessment record not found");
|
|
}
|
|
// copy this assessment with comments...
|
|
$assessment = exercise_copy_assessment($prevassessment, $submission, true);
|
|
}
|
|
|
|
print_heading(get_string("thisisaresubmission", "exercise",
|
|
fullname($submissionowner)));
|
|
// show assessment and allow changes
|
|
exercise_print_assessment_form($exercise, $assessment, true, $_SERVER["HTTP_REFERER"]);
|
|
}
|
|
|
|
|
|
/****************** Assess submission (by teacher or student) ***************************/
|
|
elseif ($action == 'assesssubmission') {
|
|
|
|
if (empty($sid)) {
|
|
error ("exercise asssessments: assesssubmission called with no sid");
|
|
}
|
|
|
|
if (! $submission = get_record("exercise_submissions", "id", $sid)) {
|
|
error("Assess submission is misconfigured - no submission record!");
|
|
}
|
|
|
|
// there can be an assessment record (for teacher submissions), if there isn't...
|
|
if (!$assessment = exercise_get_submission_assessment($submission, $USER)) {
|
|
$yearfromnow = time() + 365 * 86400;
|
|
// ...create one and set timecreated way in the future, this is reset when record is updated
|
|
$assessment->exerciseid = $exercise->id;
|
|
$assessment->submissionid = $submission->id;
|
|
$assessment->userid = $USER->id;
|
|
$assessment->grade = -1; // set impossible grade
|
|
$assessment->timecreated = $yearfromnow;
|
|
$assessment->timegraded = 0;
|
|
if (!$assessment->id = insert_record("exercise_assessments", $assessment)) {
|
|
error("Could not insert exercise assessment!");
|
|
}
|
|
}
|
|
|
|
// show assessment and allow changes
|
|
exercise_print_assessment_form($exercise, $assessment, true, $_SERVER["HTTP_REFERER"]);
|
|
}
|
|
|
|
|
|
/****************** display grading form (viewed by student) *********************************/
|
|
elseif ($action == 'displaygradingform') {
|
|
|
|
print_heading_with_help(get_string("specimenassessmentform", "exercise"), "specimen", "exercise");
|
|
|
|
exercise_print_assessment_form($exercise); // called with no assessment
|
|
print_continue("view.php?id=$cm->id");
|
|
}
|
|
|
|
|
|
/****************** edit assessment elements (for teachers) ***********************/
|
|
elseif ($action == 'editelements') {
|
|
|
|
if (!has_capability('mod/exercise:assess', $context)) {
|
|
error("Only teachers can look at this page");
|
|
}
|
|
|
|
$count = count_records("exercise_grades", "exerciseid", $exercise->id);
|
|
if ($exercise->phase > 1 and $count) {
|
|
notify(get_string("warningonamendingelements", "exercise"));
|
|
}
|
|
// set up heading, form and table
|
|
print_heading_with_help(get_string("editingassessmentelements", "exercise"), "elements", "exercise");
|
|
?>
|
|
<form id="form" method="post" action="assessments.php">
|
|
<input type="hidden" name="id" value="<?php echo $cm->id ?>" />
|
|
<input type="hidden" name="action" value="insertelements" />
|
|
<center><table cellpadding="5" border="1">
|
|
<?php
|
|
|
|
// get existing elements, if none set up appropriate default ones
|
|
if ($elementsraw = get_records("exercise_elements", "exerciseid", $exercise->id, "elementno ASC" )) {
|
|
foreach ($elementsraw as $element) {
|
|
$elements[] = $element; // to renumber index 0,1,2...
|
|
}
|
|
}
|
|
// check for missing elements (this happens either the first time round or when the number
|
|
// of elements is icreased)
|
|
for ($i=0; $i<$exercise->nelements; $i++) {
|
|
if (!isset($elements[$i])) {
|
|
$elements[$i]->description = '';
|
|
$elements[$i]->scale =0;
|
|
$elements[$i]->maxscore = 0;
|
|
$elements[$i]->weight = 11;
|
|
}
|
|
}
|
|
switch ($exercise->gradingstrategy) {
|
|
case 0: // no grading
|
|
for ($i=0; $i<$exercise->nelements; $i++) {
|
|
$iplus1 = $i+1;
|
|
echo "<tr valign=\"top\">\n";
|
|
echo " <td align=\"right\"><p><b>". get_string("element","exercise")." $iplus1:</b></p></td>\n";
|
|
echo "<td><textarea name=\"description[]\" rows=\"3\" cols=\"75\" wrap=\"virtual\">".
|
|
$elements[$i]->description."</textarea>\n";
|
|
echo " </td></tr>\n";
|
|
echo "<tr valign=\"top\">\n";
|
|
echo " <td colspan=\"2\"> </td>\n";
|
|
echo "</tr>\n";
|
|
}
|
|
break;
|
|
|
|
case 1: // accumulative grading
|
|
// set up scales name
|
|
foreach ($EXERCISE_SCALES as $KEY => $SCALE) {
|
|
$SCALES[] = $SCALE['name'];
|
|
}
|
|
|
|
for ($i=0; $i<$exercise->nelements; $i++) {
|
|
$iplus1 = $i+1;
|
|
echo "<tr valign=\"top\">\n";
|
|
echo " <td align=\"right\"><p><b>". get_string("element","exercise")." $iplus1:</b></p></td>\n";
|
|
echo "<td><textarea name=\"description[]\" rows=\"3\" cols=\"75\" wrap=\"virtual\">".
|
|
$elements[$i]->description."</textarea>\n";
|
|
echo " </td></tr>\n";
|
|
echo "<tr valign=\"top\">\n";
|
|
echo " <td align=\"right\"><p><b>". get_string("typeofscale", "exercise"). ":</b></p></td>\n";
|
|
echo "<td valign=\"top\">\n";
|
|
choose_from_menu($SCALES, "scale[]", $elements[$i]->scale, "");
|
|
if ($elements[$i]->weight == '') { // not set
|
|
$elements[$i]->weight = 11; // unity
|
|
}
|
|
echo "</td></tr>\n";
|
|
echo "<tr valign=\"top\"><td align=\"right\"><b>".get_string("elementweight", "exercise").
|
|
":</b></td><td>\n";
|
|
exercise_choose_from_menu($EXERCISE_EWEIGHTS, "weight[]", $elements[$i]->weight, "");
|
|
echo " </td>\n";
|
|
echo "</tr>\n";
|
|
echo "<tr valign=\"top\">\n";
|
|
echo " <td colspan=\"2\"> </td>\n";
|
|
echo "</tr>\n";
|
|
}
|
|
break;
|
|
|
|
case 2: // error banded grading
|
|
for ($i=0; $i<$exercise->nelements; $i++) {
|
|
$iplus1 = $i+1;
|
|
echo "<tr valign=\"top\">\n";
|
|
echo " <td align=\"right\"><p><b>". get_string("element","exercise")." $iplus1:</b></p></td>\n";
|
|
echo "<td><textarea name=\"description[$i]\" rows=\"3\" cols=\"75\" wrap=\"virtual\">".
|
|
$elements[$i]->description."</textarea>\n";
|
|
echo " </td></tr>\n";
|
|
if ($elements[$i]->weight == '') { // not set
|
|
$elements[$i]->weight = 11; // unity
|
|
}
|
|
echo "</tr>\n";
|
|
echo "<tr valign=\"top\"><td align=\"right\"><b>".get_string("elementweight", "exercise").
|
|
":</b></td><td>\n";
|
|
exercise_choose_from_menu($EXERCISE_EWEIGHTS, "weight[]", $elements[$i]->weight, "");
|
|
echo " </td>\n";
|
|
echo "</tr>\n";
|
|
echo "<tr valign=\"top\">\n";
|
|
echo " <td colspan=\"2\"> </td>\n";
|
|
echo "</tr>\n";
|
|
}
|
|
echo "</center></table><br />\n";
|
|
echo "<p><center><b>".get_string("gradetable","exercise")."</b></p></center>\n";
|
|
echo "<center><table cellpadding=\"5\" border=\"1\"><tr><td align=\"CENTER\">".
|
|
get_string("numberofnegativeresponses", "exercise");
|
|
echo "</td><td>". get_string("suggestedgrade", "exercise")."</td></tr>\n";
|
|
for ($j = $exercise->grade; $j >= 0; $j--) {
|
|
$numbers[$j] = $j;
|
|
}
|
|
for ($i=0; $i<=$exercise->nelements; $i++) {
|
|
echo "<tr><td align=\"CENTER\">$i</td><td align=\"CENTER\">";
|
|
if (!isset($elements[$i])) { // the "last one" will be!
|
|
$elements[$i]->description = "";
|
|
$elements[$i]->maxscore = 0;
|
|
}
|
|
choose_from_menu($numbers, "maxscore[$i]", $elements[$i]->maxscore, "");
|
|
echo "</td></tr>\n";
|
|
}
|
|
break;
|
|
|
|
case 3: // criterion grading
|
|
for ($j = $exercise->grade; $j >= 0; $j--) {
|
|
$numbers[$j] = $j;
|
|
}
|
|
for ($i=0; $i<$exercise->nelements; $i++) {
|
|
$iplus1 = $i+1;
|
|
echo "<tr valign=\"top\">\n";
|
|
|
|
echo " <td align=\"right\"><p><b>". get_string("criterion","exercise")." $iplus1:</b></p></td>\n";
|
|
echo "<td><textarea name=\"description[$i]\" rows=\"3\" cols=\"75\" wrap=\"virtual\">".
|
|
$elements[$i]->description."</textarea>\n";
|
|
echo " </td></tr>\n";
|
|
echo "<tr><td><b>". get_string("suggestedgrade", "exercise").":</b></td><td>\n";
|
|
choose_from_menu($numbers, "maxscore[$i]", $elements[$i]->maxscore, "");
|
|
echo "</td></tr>\n";
|
|
echo "<tr valign=\"top\">\n";
|
|
|
|
echo " <td colspan=\"2\"> </td>\n";
|
|
echo "</tr>\n";
|
|
}
|
|
break;
|
|
|
|
case 4: // rubric
|
|
for ($j = 100; $j >= 0; $j--) {
|
|
$numbers[$j] = $j;
|
|
}
|
|
if ($rubricsraw = get_records("exercise_rubrics", "exerciseid", $exercise->id)) {
|
|
foreach ($rubricsraw as $rubric) {
|
|
$rubrics[$rubric->elementno][$rubric->rubricno] = $rubric->description; // reindex 0,1,2...
|
|
}
|
|
}
|
|
for ($i=0; $i<$exercise->nelements; $i++) {
|
|
$iplus1 = $i+1;
|
|
echo "<tr valign=\"top\">\n";
|
|
echo " <td align=\"right\"><p><b>". get_string("element","exercise")." $iplus1:</b></p></td>\n";
|
|
echo "<td><textarea name=\"description[$i]\" rows=\"3\" cols=\"75\" wrap=\"virtual\">".
|
|
$elements[$i]->description."</textarea>\n";
|
|
echo " </td></tr>\n";
|
|
echo "<tr valign=\"top\"><td align=\"right\"><b>".get_string("elementweight", "exercise").
|
|
":</b></td><td>\n";
|
|
exercise_choose_from_menu($EXERCISE_EWEIGHTS, "weight[]", $elements[$i]->weight, "");
|
|
echo " </td>\n";
|
|
echo "</tr>\n";
|
|
|
|
for ($j=0; $j<5; $j++) {
|
|
$jplus1 = $j+1;
|
|
if (empty($rubrics[$i][$j])) {
|
|
$rubrics[$i][$j] = "";
|
|
}
|
|
echo "<tr valign=\"top\">\n";
|
|
echo " <td align=\"right\"><p><b>". get_string("grade")." $j:</b></p></td>\n";
|
|
echo "<td><textarea name=\"rubric[$i][$j]\" rows=\"3\" cols=\"75\" wrap=\"virtual\">".
|
|
$rubrics[$i][$j]."</textarea>\n";
|
|
echo " </td></tr>\n";
|
|
}
|
|
echo "<tr valign=\"top\">\n";
|
|
echo " <td colspan=\"2\"> </td>\n";
|
|
echo "</tr>\n";
|
|
}
|
|
break;
|
|
}
|
|
// close table and form
|
|
|
|
?>
|
|
</table><br />
|
|
<input type="submit" value="<?php print_string("savechanges") ?>" />
|
|
<input type="submit" name="cancel" value="<?php print_string("cancel") ?>" />
|
|
</center>
|
|
|
|
</form>
|
|
<?php
|
|
}
|
|
|
|
|
|
/****************** insert/update assignment elements (for teachers)***********************/
|
|
elseif ($action == 'insertelements') {
|
|
|
|
if (!has_capability('mod/exercise:assess', $context)) {
|
|
error("Only teachers can look at this page");
|
|
}
|
|
|
|
$form = data_submitted();
|
|
|
|
// let's not fool around here, dump the junk!
|
|
delete_records("exercise_elements", "exerciseid", $exercise->id);
|
|
|
|
// determine wich type of grading
|
|
switch ($exercise->gradingstrategy) {
|
|
case 0: // no grading
|
|
// Insert all the elements that contain something
|
|
foreach ($form->description as $key => $description) {
|
|
if ($description) {
|
|
unset($element);
|
|
$element->description = $description;
|
|
$element->exerciseid = $exercise->id;
|
|
$element->elementno = clean_param($key, PARAM_INT);
|
|
if (!$element->id = insert_record("exercise_elements", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 1: // accumulative grading
|
|
// Insert all the elements that contain something
|
|
foreach ($form->description as $key => $description) {
|
|
if ($description) {
|
|
unset($element);
|
|
$element->description = $description;
|
|
$element->exerciseid = $exercise->id;
|
|
$element->elementno = clean_param($key, PARAM_INT);
|
|
if (isset($form->scale[$key])) {
|
|
$element->scale = $form->scale[$key];
|
|
switch ($EXERCISE_SCALES[$form->scale[$key]]['type']) {
|
|
case 'radio' : $element->maxscore = $EXERCISE_SCALES[$form->scale[$key]]['size'] - 1;
|
|
break;
|
|
case 'selection' : $element->maxscore = $EXERCISE_SCALES[$form->scale[$key]]['size'];
|
|
break;
|
|
}
|
|
}
|
|
if (isset($form->weight[$key])) {
|
|
$element->weight = $form->weight[$key];
|
|
}
|
|
if (!$element->id = insert_record("exercise_elements", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 2: // error banded grading...
|
|
case 3: // ...and criterion grading
|
|
// Insert all the elements that contain something, the number of descriptions is
|
|
// one less than the number of grades
|
|
foreach ($form->maxscore as $key => $themaxscore) {
|
|
unset($element);
|
|
$element->exerciseid = $exercise->id;
|
|
$element->elementno = clean_param($key, PARAM_INT);
|
|
$element->maxscore = $themaxscore;
|
|
if (isset($form->description[$key])) {
|
|
$element->description = $form->description[$key];
|
|
}
|
|
if (isset($form->weight[$key])) {
|
|
$element->weight = $form->weight[$key];
|
|
}
|
|
if (!$element->id = insert_record("exercise_elements", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 4: // ...and criteria grading
|
|
// Insert all the elements that contain something
|
|
foreach ($form->description as $key => $description) {
|
|
unset($element);
|
|
$element->exerciseid = $exercise->id;
|
|
$element->elementno = clean_param($key, PARAM_INT);
|
|
$element->description = $description;
|
|
$element->weight = $form->weight[$key];
|
|
for ($j=0;$j<5;$j++) {
|
|
if (empty($form->rubric[$key][$j]))
|
|
break;
|
|
}
|
|
$element->maxscore = $j - 1;
|
|
if (!$element->id = insert_record("exercise_elements", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
}
|
|
// let's not fool around here, dump the junk!
|
|
delete_records("exercise_rubrics", "exerciseid", $exercise->id);
|
|
for ($i=0;$i<$exercise->nelements;$i++) {
|
|
for ($j=0;$j<5;$j++) {
|
|
unset($element);
|
|
if (empty($form->rubric[$i][$j])) { // OK to have an element with fewer than 5 items
|
|
break;
|
|
}
|
|
$element->exerciseid = $exercise->id;
|
|
$element->elementno = $i;
|
|
$element->rubricno = $j;
|
|
$element->description = $form->rubric[$i][$j];
|
|
if (!$element->id = insert_record("exercise_rubrics", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
} // end of switch
|
|
redirect("view.php?id=$cm->id", get_string("savedok", "exercise"));
|
|
}
|
|
|
|
|
|
/****************** list assessments for grading (Student submissions)(by teachers)*********************/
|
|
elseif ($action == 'listungradedstudentsubmissions') {
|
|
|
|
if (!has_capability('mod/exercise:assess', $context)) {
|
|
error("Only teachers can look at this page");
|
|
}
|
|
exercise_list_ungraded_assessments($exercise, "student");
|
|
print_continue("view.php?id=$cm->id");
|
|
}
|
|
|
|
|
|
/***************** list assessments for grading student assessments ( linked to the
|
|
******************Teacher's submissions) (by teachers)****/
|
|
elseif ($action == 'listungradedstudentassessments') {
|
|
|
|
if (!has_capability('mod/exercise:assess', $context)) {
|
|
error("Only teachers can look at this page");
|
|
}
|
|
exercise_list_ungraded_assessments($exercise, "teacher");
|
|
print_continue("view.php?id=$cm->id");
|
|
}
|
|
|
|
|
|
/****************** list teacher submissions ***********************/
|
|
elseif ($action == 'listteachersubmissions') {
|
|
|
|
exercise_list_teacher_submissions($exercise, $USER);
|
|
print_continue("view.php?id=$cm->id");
|
|
}
|
|
|
|
|
|
/******************* regrade student assessments ************************************/
|
|
elseif ($action == 'regradestudentassessments' ) {
|
|
|
|
if (!has_capability('mod/exercise:assess', $context)) {
|
|
error("Only teachers can look at this page");
|
|
}
|
|
// get all the student assessments
|
|
if ($assessments = exercise_get_teacher_submission_assessments($exercise)) {
|
|
foreach ($assessments as $studentassessment) {
|
|
if ($studentassessment->timegraded > 0) {
|
|
if (!$submissions = get_records_select("exercise_submissions",
|
|
"userid = $studentassessment->userid AND exerciseid = $exercise->id", "timecreated ASC")) {
|
|
error("Regrade student assessments: student submission not found");
|
|
}
|
|
foreach ($submissions as $submission) { // only the first one is relavant
|
|
if (!$teacherassessments = get_records("exercise_assessments", "submissionid",
|
|
$submission->id, "timecreated ASC")) {
|
|
error("Regrade student assessments: teacher assessment(s) not found");
|
|
}
|
|
foreach ($teacherassessments as $teacherassessment) { // only the first one is relavent
|
|
$newgrade = exercise_compare_assessments($exercise, $studentassessment, $teacherassessment);
|
|
set_field("exercise_assessments", "gradinggrade", $newgrade, "id", $studentassessment->id);
|
|
break;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
redirect("submissions.php?id=$cm->id&action=adminlist");
|
|
}
|
|
|
|
|
|
/****************** teacher assessment : grading of assessment and submission (from student) ************/
|
|
elseif ($action == 'teacherassessment') {
|
|
|
|
if (!has_capability('mod/exercise:assess', $context)) {
|
|
error("Only teachers can look at this page");
|
|
}
|
|
|
|
if (empty($aid)) {
|
|
error("assessment id missing");
|
|
}
|
|
if (empty($sid)) {
|
|
error ("no sid");
|
|
}
|
|
if (!$assessment = get_record("exercise_assessments", "id", $aid)) {
|
|
error("Teacher assessment: User's assessment record not found");
|
|
}
|
|
if (!$submission = get_record("exercise_submissions", "id", $sid)) {
|
|
error("Teacher assessment: User's submission record not found");
|
|
}
|
|
exercise_print_teacher_assessment_form($exercise, $assessment, $submission, $_SERVER["HTTP_REFERER"]);
|
|
}
|
|
|
|
|
|
/****************** teacher table : show assessments by exercise and teacher ************/
|
|
elseif ($action == 'teachertable') {
|
|
|
|
if (!has_capability('mod/exercise:assess', $context)) {
|
|
error("Only teachers can look at this page");
|
|
}
|
|
|
|
exercise_print_teacher_table($course);
|
|
print_continue("index.php?id=$course->id");
|
|
}
|
|
|
|
|
|
/****************** update assessment (by teacher or student) ***************************/
|
|
elseif ($action == 'updateassessment') {
|
|
|
|
$timenow = time();
|
|
$form = data_submitted();
|
|
|
|
if (empty($aid)) {
|
|
error("assessment id missing");
|
|
}
|
|
if (! $assessment = get_record("exercise_assessments", "id", $aid)) {
|
|
error("exercise assessment is misconfigured");
|
|
}
|
|
|
|
// first get the assignment elements for maxscores and weights...
|
|
if (!$elementsraw = get_records("exercise_elements", "exerciseid", $exercise->id, "elementno ASC")) {
|
|
print_string("noteonassignmentelements", "exercise");
|
|
}
|
|
else {
|
|
foreach ($elementsraw as $element) {
|
|
$elements[] = $element; // to renumber index 0,1,2...
|
|
}
|
|
}
|
|
|
|
// don't fiddle about, delete all the old and then add the new!
|
|
delete_records("exercise_grades", "assessmentid", $assessment->id);
|
|
|
|
//determine what kind of grading we have
|
|
switch ($exercise->gradingstrategy) {
|
|
case 0: // no grading
|
|
// Insert all the elements that contain something
|
|
foreach ($form->feedback as $key => $thefeedback) {
|
|
unset($element);
|
|
$element->exerciseid = $exercise->id;
|
|
$element->assessmentid = $assessment->id;
|
|
$element->elementno = clean_param($key, PARAM_INT);
|
|
$element->feedback = clean_param($thefeedback, PARAM_CLEAN);
|
|
if (!$element->id = insert_record("exercise_grades", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
}
|
|
$grade = 0; // set to satisfy save to db
|
|
break;
|
|
|
|
case 1: // accumulative grading
|
|
// Insert all the elements that contain something
|
|
foreach ($form->grade as $key => $thegrade) {
|
|
unset($element);
|
|
$element->exerciseid = $exercise->id;
|
|
$element->assessmentid = $assessment->id;
|
|
$element->elementno = clean_param($key, PARAM_INT);
|
|
$element->feedback = clean_param($form->feedback[$key], PARAM_CLEAN);
|
|
$element->grade = $thegrade;
|
|
if (!$element->id = insert_record("exercise_grades", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
}
|
|
// now work out the grade...
|
|
$rawgrade=0;
|
|
$totalweight=0;
|
|
foreach ($form->grade as $key => $grade) {
|
|
$maxscore = $elements[$key]->maxscore;
|
|
$weight = $EXERCISE_EWEIGHTS[$elements[$key]->weight];
|
|
if ($weight > 0) {
|
|
$totalweight += $weight;
|
|
}
|
|
$rawgrade += ($grade / $maxscore) * $weight;
|
|
// echo "\$key, \$maxscore, \$weight, \$totalweight, \$grade, \$rawgrade : $key, $maxscore, $weight, $totalweight, $grade, $rawgrade<br />";
|
|
}
|
|
$grade = 100.0 * ($rawgrade / $totalweight);
|
|
break;
|
|
|
|
case 2: // error banded graded
|
|
// Insert all the elements that contain something
|
|
$error = 0.0;
|
|
for ($i =0; $i < $exercise->nelements; $i++) {
|
|
unset($element);
|
|
$element->exerciseid = $exercise->id;
|
|
$element->assessmentid = $assessment->id;
|
|
$element->elementno = $i;
|
|
$element->feedback = clean_param($form->feedback[$i], PARAM_CLEAN);
|
|
$element->grade = $form->grade[$i];
|
|
if (!$element->id = insert_record("exercise_grades", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
if (empty($form->grade[$i])){
|
|
$error += $EXERCISE_EWEIGHTS[$elements[$i]->weight];
|
|
}
|
|
}
|
|
// now save the adjustment
|
|
unset($element);
|
|
$i = $exercise->nelements;
|
|
$element->exerciseid = $exercise->id;
|
|
$element->assessmentid = $assessment->id;
|
|
$element->elementno = $i;
|
|
$element->grade = $form->grade[$i];
|
|
if (!$element->id = insert_record("exercise_grades", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
$grade = ($elements[intval($error + 0.5)]->maxscore + $form->grade[$i])
|
|
* 100.0 / $exercise->grade;
|
|
// echo "<p><b>".get_string("weightederrorcount", "exercise", intval($error + 0.5)).
|
|
// " ".get_string("adjustment", "exercise").": ".$form->grade[$i]."</b>\n";
|
|
// check the grade for sanity!
|
|
if ($grade > 100.0) {
|
|
$grade = 100.0;
|
|
}
|
|
if ($grade < 0.0) {
|
|
$grade = 0.0;
|
|
}
|
|
break;
|
|
|
|
case 3: // criteria grading
|
|
// save in the selected criteria value in element zero,
|
|
unset($element);
|
|
$element->exerciseid = $exercise->id;
|
|
$element->assessmentid = $assessment->id;
|
|
$element->elementno = 0;
|
|
$element->grade = $form->grade[0];
|
|
if (!$element->id = insert_record("exercise_grades", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
// now save the adjustment in element one
|
|
unset($element);
|
|
$element->exerciseid = $exercise->id;
|
|
$element->assessmentid = $assessment->id;
|
|
$element->elementno = 1;
|
|
$element->grade = $form->grade[1];
|
|
if (!$element->id = insert_record("exercise_grades", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
$grade = ($elements[$form->grade[0]]->maxscore + $form->grade[1]) * 100 / $exercise->grade;
|
|
// check the grade for sanity!
|
|
if ($grade >100.0) {
|
|
$grade = 100.0;
|
|
}
|
|
if ($grade < 0.0) {
|
|
$grade = 0.0;
|
|
}
|
|
break;
|
|
|
|
case 4: // rubric grading (identical to accumulative grading)
|
|
// Insert all the elements that contain something
|
|
foreach ($form->grade as $key => $thegrade) {
|
|
unset($element);
|
|
$element->exerciseid = $exercise->id;
|
|
$element->assessmentid = $assessment->id;
|
|
$element->elementno = clean_param($key, PARAM_INT);
|
|
$element->feedback = clean_param($form->feedback[$key], PARAM_CLEAN);
|
|
$element->grade = $thegrade;
|
|
if (!$element->id = insert_record("exercise_grades", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
}
|
|
// now work out the grade...
|
|
$rawgrade=0;
|
|
$totalweight=0;
|
|
foreach ($form->grade as $key => $grade) {
|
|
$maxscore = $elements[$key]->maxscore;
|
|
$weight = $EXERCISE_EWEIGHTS[$elements[$key]->weight];
|
|
if ($weight > 0) {
|
|
$totalweight += $weight;
|
|
}
|
|
$rawgrade += ($grade / $maxscore) * $weight;
|
|
}
|
|
$grade = 100.0 * ($rawgrade / $totalweight);
|
|
break;
|
|
|
|
} // end of switch
|
|
|
|
// update the time of the assessment record (may be re-edited)...
|
|
set_field("exercise_assessments", "timecreated", $timenow, "id", $assessment->id);
|
|
set_field("exercise_assessments", "grade", $grade, "id", $assessment->id);
|
|
// ...and clear any grading of this assessment (these assessments are never graded but...)
|
|
set_field("exercise_assessments", "timegraded", 0, "id", $assessment->id);
|
|
set_field("exercise_assessments", "gradinggrade", 0, "id", $assessment->id);
|
|
|
|
// any comment?
|
|
if (!empty($form->generalcomment)) {
|
|
set_field("exercise_assessments", "generalcomment", clean_param($form->generalcomment, PARAM_CLEAN), "id", $assessment->id);
|
|
}
|
|
|
|
// is user allowed to resubmit?
|
|
if (has_capability('mod/exercise:assess', $context)) {
|
|
if (!$submission = get_record("exercise_submissions", "id", $assessment->submissionid)) {
|
|
error ("Updateassessment: submission record not found");
|
|
}
|
|
if ($form->resubmit == 1) {
|
|
set_field("exercise_submissions", "resubmit", 1, "id", $submission->id);
|
|
}
|
|
else {
|
|
// clear resubmit flag
|
|
set_field("exercise_submissions", "resubmit", 0, "id", $submission->id);
|
|
}
|
|
}
|
|
|
|
add_to_log($course->id, "exercise", "assess", "view.php?id=$cm->id", "$assessment->id");
|
|
|
|
// set up return address
|
|
if (!$returnto = $form->returnto) {
|
|
$returnto = "view.php?id=$cm->id";
|
|
}
|
|
|
|
// show grade if grading strategy is not zero
|
|
if ($exercise->gradingstrategy) {
|
|
redirect($returnto, "<p align=\"center\"><b>".get_string("thegradeis", "exercise").": ".
|
|
number_format($grade * $exercise->grade / 100.0, 1)." (".get_string("maximumgrade").
|
|
" ".number_format($exercise->grade).")</b></p>", 1);
|
|
}
|
|
else {
|
|
redirect($returnto);
|
|
}
|
|
}
|
|
|
|
|
|
/****************** update teacher assessment (by teacher only) ***************************/
|
|
elseif ($action == 'updateteacherassessment') {
|
|
|
|
if (!has_capability('mod/exercise:assess', $context)) {
|
|
error("Only teachers can look at this page");
|
|
}
|
|
|
|
$timenow = time();
|
|
$form = data_submitted();
|
|
|
|
// first do the (teacher's) assessment of the student's submission
|
|
if (! $submission = get_record("exercise_submissions", "id", $form->sid)) {
|
|
error("Update teacher assessment: student's submission record not found");
|
|
}
|
|
if (!$assessment = exercise_get_submission_assessment($submission, $USER)) {
|
|
error("Update teacher assessment: teacher's assessment record not found");
|
|
}
|
|
|
|
// first get the assignment elements for maxscores and weights...
|
|
if (!$elementsraw = get_records("exercise_elements", "exerciseid", $exercise->id, "elementno ASC")) {
|
|
print_string("noteonassignmentelements", "exercise");
|
|
}
|
|
else {
|
|
foreach ($elementsraw as $element) {
|
|
$elements[] = $element; // to renumber index 0,1,2...
|
|
}
|
|
}
|
|
|
|
// don't fiddle about, delete all the old and then add the new!
|
|
delete_records("exercise_grades", "assessmentid", $assessment->id);
|
|
|
|
//determine what kind of grading we have
|
|
switch ($exercise->gradingstrategy) {
|
|
case 0: // no grading
|
|
// Insert all the elements that contain something
|
|
foreach ($form->feedback as $key => $thefeedback) {
|
|
unset($element);
|
|
$element->exerciseid = $exercise->id;
|
|
$element->assessmentid = $assessment->id;
|
|
$element->elementno = clean_param($key, PARAM_INT);
|
|
$element->feedback = clean_param($thefeedback, PARAM_CLEAN);
|
|
if (!$element->id = insert_record("exercise_grades", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
}
|
|
$grade = 0; // set to satisfy save to db
|
|
break;
|
|
|
|
case 1: // accumulative grading
|
|
// Insert all the elements that contain something
|
|
foreach ($form->grade as $key => $thegrade) {
|
|
unset($element);
|
|
$element->exerciseid = $exercise->id;
|
|
$element->assessmentid = $assessment->id;
|
|
$element->elementno = clean_param($key, PARAM_INT);
|
|
$element->feedback = clean_param($form->feedback[$key], PARAM_CLEAN);
|
|
$element->grade = $thegrade;
|
|
if (!$element->id = insert_record("exercise_grades", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
}
|
|
// now work out the grade...
|
|
$rawgrade=0;
|
|
$totalweight=0;
|
|
foreach ($form->grade as $key => $grade) {
|
|
$maxscore = $elements[$key]->maxscore;
|
|
$weight = $EXERCISE_EWEIGHTS[$elements[$key]->weight];
|
|
if ($weight > 0) {
|
|
$totalweight += $weight;
|
|
}
|
|
$rawgrade += ($grade / $maxscore) * $weight;
|
|
// echo "\$key, \$maxscore, \$weight, \$totalweight, \$grade, \$rawgrade : $key, $maxscore, $weight, $totalweight, $grade, $rawgrade<br />";
|
|
}
|
|
$grade = 100.0 * ($rawgrade / $totalweight);
|
|
break;
|
|
|
|
case 2: // error banded graded
|
|
// Insert all the elements that contain something
|
|
$error = 0.0;
|
|
for ($i =0; $i < $exercise->nelements; $i++) {
|
|
unset($element);
|
|
$element->exerciseid = $exercise->id;
|
|
$element->assessmentid = $assessment->id;
|
|
$element->elementno = $i;
|
|
$element->feedback = clean_param($form->feedback[$i], PARAM_CLEAN);
|
|
$element->grade = $form->grade[$i];
|
|
if (!$element->id = insert_record("exercise_grades", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
if (empty($form->grade[$i])){
|
|
$error += $EXERCISE_EWEIGHTS[$elements[$i]->weight];
|
|
}
|
|
}
|
|
// now save the adjustment
|
|
unset($element);
|
|
$i = $exercise->nelements;
|
|
$element->exerciseid = $exercise->id;
|
|
$element->assessmentid = $assessment->id;
|
|
$element->elementno = $i;
|
|
$element->grade = $form->grade[$i];
|
|
if (!$element->id = insert_record("exercise_grades", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
$grade = ($elements[intval($error + 0.5)]->maxscore + $form->grade[$i]) * 100 / $exercise->grade;
|
|
echo "<p><b>".get_string("weightederrorcount", "exercise", intval($error + 0.5))."</b></p>\n";
|
|
break;
|
|
|
|
case 3: // criteria grading
|
|
// save in the selected criteria value in element zero,
|
|
unset($element);
|
|
$element->exerciseid = $exercise->id;
|
|
$element->assessmentid = $assessment->id;
|
|
$element->elementno = 0;
|
|
$element->grade = $form->grade[0];
|
|
if (!$element->id = insert_record("exercise_grades", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
// now save the adjustment in element one
|
|
unset($element);
|
|
$element->exerciseid = $exercise->id;
|
|
$element->assessmentid = $assessment->id;
|
|
$element->elementno = 1;
|
|
$element->grade = $form->grade[1];
|
|
if (!$element->id = insert_record("exercise_grades", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
$grade = ($elements[$form->grade[0]]->maxscore + $form->grade[1]) * 100 / $exercise->grade;
|
|
break;
|
|
|
|
case 4: // rubric grading (identical to accumulative grading)
|
|
// Insert all the elements that contain something
|
|
foreach ($form->grade as $key => $thegrade) {
|
|
unset($element);
|
|
$element->exerciseid = $exercise->id;
|
|
$element->assessmentid = $assessment->id;
|
|
$element->elementno = clean_param($key, PARAM_INT);
|
|
$element->feedback = clean_param($form->feedback[$key], PARAM_CLEAN);
|
|
$element->grade = $thegrade;
|
|
if (!$element->id = insert_record("exercise_grades", $element)) {
|
|
error("Could not insert exercise element!");
|
|
}
|
|
}
|
|
// now work out the grade...
|
|
$rawgrade=0;
|
|
$totalweight=0;
|
|
foreach ($form->grade as $key => $grade) {
|
|
$maxscore = $elements[$key]->maxscore;
|
|
$weight = $EXERCISE_EWEIGHTS[$elements[$key]->weight];
|
|
if ($weight > 0) {
|
|
$totalweight += $weight;
|
|
}
|
|
$rawgrade += ($grade / $maxscore) * $weight;
|
|
}
|
|
$grade = 100.0 * ($rawgrade / $totalweight);
|
|
break;
|
|
|
|
} // end of switch
|
|
|
|
// update the time of the assessment record (may be re-edited)...
|
|
set_field("exercise_assessments", "timecreated", $timenow, "id", $assessment->id);
|
|
set_field("exercise_assessments", "grade", $grade, "id", $assessment->id);
|
|
// ...and clear any grading of this assessment (never needed but...)
|
|
set_field("exercise_assessments", "timegraded", 0, "id", $assessment->id);
|
|
set_field("exercise_assessments", "gradinggrade", 0, "id", $assessment->id);
|
|
|
|
// any comment?
|
|
if (!empty($form->generalcomment)) {
|
|
set_field("exercise_assessments", "generalcomment", clean_param($form->generalcomment, PARAM_CLEAN), "id", $assessment->id);
|
|
}
|
|
|
|
// now calculate the (grading) grade of the student's assessment...
|
|
if (!$stassessment = get_record("exercise_assessments", "id", $form->said)) {
|
|
error("Update teacher assessment: student's assessment record not found");
|
|
}
|
|
$gradinggrade = exercise_compare_assessments($exercise, $assessment, $stassessment);
|
|
// ...and save the grade for the assessment
|
|
set_field("exercise_assessments", "gradinggrade", $gradinggrade, "id", $stassessment->id);
|
|
set_field("exercise_assessments", "timegraded", $timenow, "id", $stassessment->id);
|
|
set_field("exercise_assessments", "mailed", 0, "id", $stassessment->id);
|
|
echo "<centre><b>".get_string("savedok", "exercise")."</b></centre><br />\n";
|
|
|
|
add_to_log($course->id, "exercise", "grade", "view.php?id=$cm->id", "$stassessment->id");
|
|
|
|
// is user allowed to resubmit?
|
|
if ($form->resubmit == 1) {
|
|
set_field("exercise_submissions", "resubmit", 1, "id", $submission->id);
|
|
}
|
|
else {
|
|
// clear resubmit flag
|
|
set_field("exercise_submissions", "resubmit", 0, "id", $submission->id);
|
|
}
|
|
|
|
add_to_log($course->id, "exercise", "assess", "view.php?id=$cm->id", "$assessment->id");
|
|
|
|
// set up return address
|
|
if (!$returnto = $form->returnto) {
|
|
$returnto = "view.php?id=$cm->id";
|
|
}
|
|
|
|
// show grade if grading strategy is not zero
|
|
if ($exercise->gradingstrategy) {
|
|
redirect($returnto, "<p align=\"center\"><b>".get_string("gradeforstudentsassessment",
|
|
"exercise", $course->student).": ".number_format($gradinggrade * $exercise->gradinggrade / 100.0, 1).
|
|
" (".get_string("maximumgrade")." ".number_format($exercise->gradinggrade, 1).")</b></p><p><b>".
|
|
get_string("thegradeis", "exercise").": ".number_format($grade * $exercise->grade / 100.0, 1).
|
|
" (".get_string("maximumgrade")." ".number_format($exercise->grade, 1).")</b></p>");
|
|
}
|
|
else {
|
|
redirect($returnto);
|
|
}
|
|
}
|
|
|
|
|
|
/****************** update grading grade(by teacher) ***************************/
|
|
elseif ($action == 'updategradinggrade') {
|
|
|
|
if (!has_capability('mod/exercise:assess', $context)) {
|
|
error("Only teachers can look at this page");
|
|
}
|
|
|
|
if (empty($aid)) {
|
|
error("submission id missing");
|
|
}
|
|
// normalise gradinggrade
|
|
$gradinggrade = $_POST['gradinggrade'] * 100 / $exercise->gradinggrade;
|
|
if (!set_field("exercise_assessments", "gradinggrade", $gradinggrade, "id",
|
|
$aid)) {
|
|
error("Update grading grade: asseesment not updated");
|
|
}
|
|
redirect("submissions.php?id=$cm->id&action=adminlist", get_string("savedok", "exercise"), 1);
|
|
}
|
|
|
|
|
|
/****************** user confirm delete ************************************/
|
|
elseif ($action == 'userconfirmdelete' ) {
|
|
|
|
if (empty($aid)) {
|
|
error("User confirm delete: assessment id missing");
|
|
}
|
|
|
|
notice_yesno(get_string("confirmdeletionofthisitem","exercise", get_string("assessment", "exercise")),
|
|
"assessments.php?action=userdelete&id=$cm->id&aid=$aid", "view.php?id=$cm->id");
|
|
}
|
|
|
|
|
|
/****************** user delete ************************************/
|
|
elseif ($action == 'userdelete' ) {
|
|
|
|
if (empty($aid)) {
|
|
error("User delete: assessment id missing");
|
|
}
|
|
|
|
print_string("deleting", "exercise");
|
|
// first delete all the associated records...
|
|
delete_records("exercise_grades", "assessmentid", $aid);
|
|
// ...now delete the assessment...
|
|
delete_records("exercise_assessments", "id", $aid);
|
|
|
|
print_continue("view.php?id=$cm->id");
|
|
}
|
|
|
|
|
|
/****************** view assessment ***********************/
|
|
elseif ($action == 'viewassessment') {
|
|
|
|
if (empty($aid)) {
|
|
error("assessment id missing");
|
|
}
|
|
|
|
// get the assessment record
|
|
if (!$assessment = get_record("exercise_assessments", "id", $aid)) {
|
|
error("Assessment record not found");
|
|
}
|
|
|
|
// show assessment but don't allow changes
|
|
exercise_print_assessment_form($exercise, $assessment);
|
|
|
|
print_continue("view.php?id=$cm->id");
|
|
}
|
|
|
|
|
|
/*************** no man's land **************************************/
|
|
else {
|
|
error("Fatal Error: Unknown Action: ".$action."\n");
|
|
}
|
|
|
|
print_footer($course);
|
|
|
|
?>
|