function long_answer_score_form_submit in Quiz 6.6

Same name and namespace in other branches

1. 8.4 question_types/long_answer/long_answer.admin.inc \long_answer_score_form_submit()
2. 6.3 question_types/long_answer/long_answer.admin.inc \long_answer_score_form_submit()
3. 6.4 question_types/long_answer/long_answer.admin.inc \long_answer_score_form_submit()
4. 6.5 question_types/long_answer/long_answer.admin.inc \long_answer_score_form_submit()
5. 7.6 question_types/long_answer/long_answer.admin.inc \long_answer_score_form_submit()
6. 7 question_types/long_answer/long_answer.admin.inc \long_answer_score_form_submit()
7. 7.4 question_types/long_answer/long_answer.admin.inc \long_answer_score_form_submit()

File

question_types/long_answer/long_answer.admin.inc, line 153

Administration pages for the long answer questions module.

Code

function long_answer_score_form_submit($form, &$form_state) {
  $sql = 'SELECT nid, vid FROM {quiz_node_results} WHERE result_id = %d';
  $result = db_fetch_object(db_query($sql, $form_state['values']['result_id']));
  $quiz = node_load($result->nid, $result->vid);
  $nid = $form_state['values']['question_nid'];
  $vid = $form_state['values']['question_vid'];
  $rid = $form_state['values']['result_id'];
  $score = $form_state['values']['score'];
  $result = long_answer_score_an_answer($quiz, $nid, $vid, $rid, $score);
  if ($result == 1) {
    drupal_set_message("The score has been saved.");
    $form_state['redirect'] = 'admin/quiz/score-long-answer';
  }
  else {
    drupal_set_message('Error saving the score. The selected answer was not scored.', 'error');
  }
}