'; $return .= '

'; $return .= ' '; $return .= ' '; $return .= ' '; return $return; } /** * Render the question. In this case this starts with the form tag * * @param unknown_type $form_content * * @author Patrick Cool , Ghent University * @version January 2007 */ function render_question($form_content) { $this->html = '

'; echo $this->html; } } class ch_yesno extends survey_question { /** * This function creates the form elements for the yesno questions * * @author Patrick Cool , Ghent University * @version January 2007 */ function create_form($form_content) { $this->html = parent::create_form($form_content); // Horizontal or vertical $this->html .= '

'; $this->html .= '

'; $this->html .= get_lang('DisplayAnswersHorVert'); $this->html .= '

'; $this->html .= '

'; $this->html .= ' html .= 'checked="checked"'; } $this->html .= '/>'.get_lang('Horizontal').'
'; $this->html .= ' html .= 'checked="checked"'; } $this->html .= ' />'.get_lang('Vertical').''; $this->html .= '

'; $this->html .= '

'; // The options $this->html .= '

'; $this->html .= '

'; $this->html .= get_lang('AnswerOptions'); $this->html .= '

'; $this->html .= '

'; $this->html .= ' '; $this->html .= ' '; $this->html .= ' '; //$this->html .= ' '; $this->html .= ' '; $this->html .= ' '; $this->html .= ' '; $this->html .= ' '; $this->html .= ' '; //$this->html .= ' '; $this->html .= ' '; $this->html .= ' '; $this->html .= ' '; $this->html .= '

1		'.api_return_html_area('answers[0]', stripslashes($form_content['answers'][0]), '', '', null, array('ToolbarSet' => 'Survey', 'Width' => '100%', 'Height' => '120')).'
2		'.api_return_html_area('answers[1]', stripslashes($form_content['answers'][1]), '', '', null, array('ToolbarSet' => 'Survey', 'Width' => '100%', 'Height' => '120')).'

'; $this->html .= '

'; } /** * Render the yes not question type * * @param unknown_type $form_content * * @author Patrick Cool , Ghent University * @version January 2007 */ function render_question($form_content, $answers = array()) { if (is_array($form_content['options'])) { // Check if data is correct foreach ($form_content['options'] as $key => & $value) { $this->html .= 'html .= 'checked="checked"'; } } if (substr_count($value, '

') == 1) { $this->html .= '/>'.substr($value, 3, (strlen($value) - 7)).''; if ($form_content['display'] == 'vertical') { $this->html .= '
'; } } else { $this->html .= '/>'.$value.''; } } } echo '

'; echo '

'.$form_content['survey_question'].'

'; echo '

'; echo $this->html; echo '

'; echo '

'; } } class ch_multiplechoice extends survey_question { /** * This function creates the form elements for the multiple choice questions * * @author Patrick Cool , Ghent University * @version January 2007 */ function create_form($form_content) { $this->html = parent::create_form($form_content); // Horizontal or vertical $this->html .= '

'; $this->html .= '

'; $this->html .= get_lang('DisplayAnswersHorVert'); $this->html .= '

'; $this->html .= '

'; // The Options $this->html .= '

'; $this->html .= '

'; $this->html .= get_lang('AnswerOptions'); $this->html .= '

'; $this->html .= '

'; $total_number_of_answers = count($form_content['answers']); $this->html .= ' '; if (is_array($form_content['answers'])) { // Check if data is correct foreach ($form_content['answers'] as $key => $value) { $this->html .= ' '; $this->html .= ' '; //$this->html .= ' '; $this->html .= ' '; $this->html .= ' '; $this->html .= ' '; } } // The buttons for adding or removing $this->html .= '

'.($key+1).'

'.api_return_html_area('answers['.$key.']', api_html_entity_decode(stripslashes($form_content['answers'][$key]), ENT_QUOTES), '', '', null, array('ToolbarSet' => 'Survey', 'Width' => '100%', 'Height' => '120')).'

'; if ($key<$total_number_of_answers-1) { $this->html .= ' '; } if ($key>0) { $this->html .= ' '; } if ($total_number_of_answers> 2) { $this->html .= ' '; } $this->html .= '

'; $this->html .= '

'; $this->html .= parent :: add_remove_buttons($form_content); } /** * render the multiple choice question type * * @param unknown_type $form_content * * @todo it would make more sense to consider yesno as a special case of multiplechoice and not the other way around * * @author Patrick Cool , Ghent University * @version January 2007 */ function render_question($form_content, $answers = array()) { $question = new ch_yesno(); $question->render_question($form_content, $answers); } } class ch_personality extends survey_question { /** * This function creates the form elements for the multiple response questions * * @author Patrick Cool , Ghent University * @version January 2007 */ function create_form($form_content) { $this->html = parent::create_form($form_content); $this->html .= ' '; $this->html .= ' '.get_lang('DisplayAnswersHorVert').''; $this->html .= ' '; // Horizontal or vertical $this->html .= ' '; $this->html .= ' '; $this->html .= ' '; $this->html .= ' html .= 'checked="checked"'; } $this->html .= '/>'.get_lang('Horizontal').'
'; $this->html .= ' html .= 'checked="checked"'; } $this->html .= ' />'.get_lang('Vertical').''; $this->html .= ' '; $this->html .= ' '; $this->html .= ' '; $this->html .= ' '; // The options $this->html .= ' '; $this->html .= ' '.get_lang('AnswerOptions').''; $this->html .= ' '; $total_number_of_answers = count($form_content['answers']); $question_values = array(); // Values of question options if (is_array($form_content['values'])) { // Check if data is correct foreach ($form_content['values'] as $key => & $value) { $question_values [] = ''; } } $count = 0; if (is_array($form_content['answers'])) { foreach ($form_content['answers'] as $key => & $value) { $this->html .= ' '; $this->html .= ' '.($key+1).''; //$this->html .= ' '; $this->html .= ' '.api_return_html_area('answers['.$key.']', api_html_entity_decode(stripslashes($form_content['answers'][$key])), '', '', null, array('ToolbarSet' => 'Survey', 'Width' => '100%', 'Height' => '120')).''; $this->html .= ' '; if ($total_number_of_answers > 2) { $this->html .= $question_values[$count]; } if ($key < $total_number_of_answers - 1) { $this->html .= ' '; } if ($key > 0) { $this->html .= ' '; } if ($total_number_of_answers > 2) { $this->html .= ' '; } $this->html .= ' '; $this->html .= ' '; $count++; } } // The buttons for adding or removing //$this->html .= parent :: add_remove_buttons($form_content); } /** * Render the multiple response question type * * @param unknown_type $form_content * * @author Patrick Cool , Ghent University * @version January 2007 */ function render_question($form_content, $answers = array()) { $question = new ch_yesno(); $question->render_question($form_content, $answers); } } class ch_multipleresponse extends survey_question { /** * This function creates the form elements for the multiple response questions * * @author Patrick Cool , Ghent University * @version January 2007 */ function create_form($form_content) { $this->html = parent::create_form($form_content); // Horizontal or vertical $this->html .= '

'; $this->html .= '

'; $this->html .= get_lang('DisplayAnswersHorVert'); $this->html .= '

'; $this->html .= '

'; // The options $this->html .= '

'; $this->html .= '

'; $this->html .= get_lang('AnswerOptions'); $this->html .= '

'; $this->html .= '

'; $total_number_of_answers = count($form_content['answers']); $this->html .= ' '; if (is_array($form_content['answers'])) { // Values of question options foreach ($form_content['answers'] as $key => & $value) { $this->html .= ' '; $this->html .= ' '; //$this->html .= ' '; $this->html .= ' '; $this->html .= ' '; $this->html .= ' '; } } // The buttons for adding or removing $this->html .= '

'.($key + 1).'

'; if ($key<$total_number_of_answers - 1) { $this->html .= ' '; } if ($key > 0) { $this->html .= ' '; } if ($total_number_of_answers > 2) { $this->html .= ' '; } $this->html .= '

'; $this->html .= '

'; $this->html .= parent :: add_remove_buttons($form_content); } /** * Render the multiple response question type * * @param unknown_type $form_content * * @author Patrick Cool , Ghent University * @version January 2007 */ function render_question($form_content, $answers = array()) { foreach ($form_content['options'] as $key => & $value) { $this->html .= 'html .= 'checked="checked"'; } } if (substr_count($value, '

') == 1) { $this->html .= '/>'.substr($value, 3, (strlen($value) - 7)).''; if ($form_content['display'] == 'vertical') { $this->html .= '
'; } } else { $this->html .= '/>'.$value.''; } } echo '

'; echo '

'.$form_content['survey_question'].'

'; echo '

'; echo $this->html; echo '

'; echo '

'; } } class ch_dropdown extends survey_question { /** * This function creates the form elements for the dropdown questions * * @author Patrick Cool , Ghent University * @version January 2007 */ function create_form($form_content) { $this->html = parent::create_form($form_content); // The answers $this->html .= '

'; $this->html .= '

'; $this->html .= get_lang('AnswerOptions'); $this->html .= '

'; $this->html .= '

'; $total_number_of_answers = count($form_content['answers']); $this->html .= ' '; foreach ($form_content['answers'] as $key => & $value) { $this->html .= ' '; $this->html .= ' '; $this->html .= ' '; $this->html .= ' '; $this->html .= ' '; } // The buttons for adding or removing $this->html .= '

'.($key + 1).'

'; if ($key < $total_number_of_answers - 1) { $this->html .= ' '; } if ($key > 0) { $this->html .= ' '; } if ($total_number_of_answers> 2) { $this->html .= ' '; } $this->html .= '

'; $this->html .= '

'; $this->html .= parent :: add_remove_buttons($form_content); } /** * Render the dropdown question type * * @param unknown_type $form_content * * @author Patrick Cool , Ghent University * @version January 2007 */ function render_question($form_content, $answers = array()) { foreach ($form_content['options'] as $key => & $value) { $this->html .= ''; } echo '

'; echo '

'.$form_content['survey_question'].'

'; echo '

'; echo ''; echo '

'; echo '

'; /* */ } } class ch_open extends survey_question { /** * This function creates the form elements for the open questions * * @author Patrick Cool , Ghent University * @version January 2007 * * @todo add a limit for the number of characters that can be type * @todo add a checkbox weither the answer is a textarea or a wysiwyg editor */ function create_form($form_content) { $this->html = parent::create_form($form_content); } /** * render the open question type * * @param unknown_type $form_content * * @author Patrick Cool , Ghent University * @version January 2007 */ function render_question($form_content, $answers = array()) { echo '

'; echo '

'.$form_content['survey_question'].'

'; echo '

'; if (is_array($answers)) { $content = implode('', $answers); } else { $content = $answers; } echo ''; echo '

'; echo '

'; } } class ch_comment extends survey_question { /** * This function creates the form elements for a comment. * A comment is nothing more than a block of text that the user can read * * @author Patrick Cool , Ghent University * @version January 2007 * * @param array $form_content */ function create_form($form_content) { $this->html = parent::create_form($form_content); } /** * Render the comment "question" type * * @param unknown_type $form_content * * @author Patrick Cool , Ghent University * @version January 2007 */ function render_question($form_content) { echo '

'; echo '

'.$form_content['survey_question'].'

'; echo '

'; echo "\n"; } } class ch_pagebreak extends survey_question { /** * This function creates the form elements for a comment. * A comment is nothing more than a block of text that the user can read * * @author Patrick Cool , Ghent University * @version January 2007 * * @param array $form_content */ function create_form($form_content) { $this->html = parent::create_form($form_content); } } class ch_percentage extends survey_question { function create_form($form_content) { $this->html = parent::create_form($form_content); } function render_question($form_content, $answers = array()) { $this->html .= ''; foreach ($form_content['options'] as $key => & $value) { $this->html .= ''; } echo '

'; echo '

'.$form_content['survey_question'].'

'; echo '

'; echo ''; echo '

'; echo '

'; } } class ch_score extends survey_question { function create_form($form_content) { $this->html = parent::create_form($form_content); // The maximum score that can be given $this->html .= '

'; $this->html .= '

'; $this->html .= ' *'.get_lang('MaximumScore'); $this->html .= '

'; $this->html .= '

'; $this->html .= ' '; $this->html .= '

'; $this->html .= '

'; // The answers $this->html .= '

'; $this->html .= '

'; $this->html .= get_lang('AnswerOptions'); $this->html .= '

'; $this->html .= '

'; $total_number_of_answers = count($form_content['answers']); $this->html .= ' '; foreach ($form_content['answers'] as $key => & $value) { $this->html .= ' '; $this->html .= ' '; //$this->html .= ' '; $this->html .= ' '; $this->html .= ' '; $this->html .= ' '; } // The buttons for adding or removing $this->html .= '

'.($key+1).'

'.api_return_html_area('answers['.$key.']', stripslashes($form_content['answers'][$key]), '', '', null, array('ToolbarSet' => 'Survey', 'Width' => '100%', 'Height' => '120')).'

'; if ($key<$total_number_of_answers - 1) { $this->html .= ' '; } if ($key > 0) { $this->html .= ' '; } if ($total_number_of_answers > 2) { $this->html .= ' '; } $this->html .= '

'; $this->html .= '

'; $this->html .= parent :: add_remove_buttons($form_content); } function render_question($form_content, $answers = array()) { /* echo '

'; echo '

';
		print_r($answers);
		echo '

'; */ $this->html = ''; foreach ($form_content['options'] as $key => & $value) { $this->html .= ''; $this->html .= ' '; $this->html .= ''; } $this->html .= '

'.$value.'

'; $this->html .= ''; $this->html .= '

'; echo '

'.$form_content['survey_question'].'

'; echo '

'; //echo ''; echo '

'; echo '

'; } } /** * This class offers a series of general utility functions for survey querying and display * @package chamilo.survey */ class SurveyUtil { /** * Checks whether the given survey has a pagebreak question as the first or the last question. * If so, break the current process, displaying an error message * @param integer Survey ID (database ID) * @param boolean Optional. Whether to continue the current process or exit when breaking condition found. Defaults to true (do not break). * @return void */ function check_first_last_question($survey_id, $continue = true) { // Table definitions $tbl_survey_question = Database :: get_course_table(TABLE_SURVEY_QUESTION); $table_survey_question_option = Database :: get_course_table(TABLE_SURVEY_QUESTION_OPTION); $course_id = api_get_course_int_id(); // Getting the information of the question $sql = "SELECT * FROM $tbl_survey_question WHERE c_id = $course_id AND survey_id='".Database::escape_string($survey_id)."' ORDER BY sort ASC"; $result = Database::query($sql); $total = Database::num_rows($result); $counter = 1; $error = false; while ($row = Database::fetch_array($result, 'ASSOC')) { if ($counter == 1 && $row['type'] == 'pagebreak') { Display::display_error_message(get_lang('PagebreakNotFirst'), false); $error = true; } if ($counter == $total && $row['type'] == 'pagebreak') { Display::display_error_message(get_lang('PagebreakNotLast'), false); $error = true; } $counter++; } if (!$continue && $error) { Display::display_footer(); exit; } } /** * This function removes an (or multiple) answer(s) of a user on a question of a survey * * @param mixed The user id or email of the person who fills the survey * @param integer The survey id * @param integer The question id * @param integer The option id * * @author Patrick Cool , Ghent University * @version January 2007 */ function remove_answer($user, $survey_id, $question_id) { $course_id = api_get_course_int_id(); // table definition $table_survey_answer = Database :: get_course_table(TABLE_SURVEY_ANSWER); $sql = "DELETE FROM $table_survey_answer WHERE c_id = $course_id AND user = '".Database::escape_string($user)."' AND survey_id = '".Database::escape_string($survey_id)."' AND question_id = '".Database::escape_string($question_id)."'"; $result = Database::query($sql); } /** * This function stores an answer of a user on a question of a survey * * @param mixed The user id or email of the person who fills the survey * @param integer Survey id * @param integer Question id * @param integer Option id * @param string Option value * @param array Survey data settings * * @author Patrick Cool , Ghent University * @version January 2007 */ function store_answer($user, $survey_id, $question_id, $option_id, $option_value, $survey_data) { global $_course, $types; // Table definition $table_survey_answer = Database :: get_course_table(TABLE_SURVEY_ANSWER); // Make the survey anonymous if ($survey_data['anonymous'] == 1) { if (!$_SESSION['surveyuser']) { $user = md5($user.time()); $_SESSION['surveyuser'] = $user; } else { $user = $_SESSION['surveyuser']; } } $course_id = api_get_course_int_id(); $sql = "INSERT INTO $table_survey_answer (c_id, user, survey_id, question_id, option_id, value) VALUES ( $course_id, '".Database::escape_string($user)."', '".Database::escape_string($survey_id)."', '".Database::escape_string($question_id)."', '".Database::escape_string($option_id)."', '".Database::escape_string($option_value)."' )"; $result = Database::query($sql); } /** * This function checks the parameters that are used in this page * * @return string The header, an error and the footer if any parameter fails, else it returns true * @author Patrick Cool , Ghent University * @version February 2007 */ function check_parameters() { $error = false; // Getting the survey data $survey_data = survey_manager::get_survey($_GET['survey_id']); // $_GET['survey_id'] has to be numeric if (!is_numeric($_GET['survey_id'])) { $error = get_lang('IllegalSurveyId'); } // $_GET['action'] $allowed_actions = array('overview', 'questionreport', 'userreport', 'comparativereport', 'completereport','deleteuserreport'); if (isset($_GET['action']) && !in_array($_GET['action'], $allowed_actions)) { $error = get_lang('ActionNotAllowed'); } // User report if ($_GET['action'] == 'userreport') { global $people_filled; if ($survey_data['anonymous'] == 0) { $people_filled_full_data = true; } else { $people_filled_full_data = false; } $people_filled = survey_manager::get_people_who_filled_survey($_GET['survey_id'], $people_filled_full_data); if ($survey_data['anonymous'] == 0) { foreach ($people_filled as $key => & $value) { $people_filled_userids[] = $value['invited_user']; } } else { $people_filled_userids = $people_filled; } if (isset($_GET['user']) && !in_array($_GET['user'], $people_filled_userids)) { $error = get_lang('UnknowUser'); } } // Question report if ($_GET['action'] == 'questionreport') { if (isset($_GET['question']) && !is_numeric($_GET['question'])) { $error = get_lang('UnknowQuestion'); } } if ($error) { $tool_name = get_lang('Reporting'); Display::display_header($tool_name); Display::display_error_message(get_lang('Error').': '.$error, false); Display::display_footer(); exit; } else { return true; } } /** * This function deals with the action handling * @return void * @author Patrick Cool , Ghent University * @version February 2007 */ function handle_reporting_actions() { // Getting the number of question $temp_questions_data = survey_manager::get_questions($_GET['survey_id']); // Sorting like they should be displayed and removing the non-answer question types (comment and pagebreak) $my_temp_questions_data=($temp_questions_data==null) ? array() : $temp_questions_data; foreach ($my_temp_questions_data as $key => & $value) { if ($value['type'] != 'comment' && $value['type'] != 'pagebreak') { $questions_data[$value['sort']] = $value; } } // Counting the number of questions that are relevant for the reporting $survey_data['number_of_questions'] = count($questions_data); if ($_GET['action'] == 'questionreport') { SurveyUtil::display_question_report($survey_data); } if ($_GET['action'] == 'userreport') { SurveyUtil::display_user_report(); } if ($_GET['action'] == 'comparativereport') { SurveyUtil::display_comparative_report(); } if ($_GET['action'] == 'completereport') { SurveyUtil::display_complete_report(); } if ($_GET['action'] == 'deleteuserreport') { SurveyUtil::delete_user_report($_GET['survey_id'], $_GET['user']); //SurveyUtil::display_user_report(); //Could work but looks a bit clunky } } /** * This function deletes the report of an user who wants to retake the survey * @param integer survey_id * @param integer user_id * @return void * @author Christian Fasanando Flores * @version November 2008 */ function delete_user_report($survey_id, $user_id) { $table_survey_answer = Database :: get_course_table(TABLE_SURVEY_ANSWER); $table_survey_invitation = Database :: get_course_table(TABLE_SURVEY_INVITATION); $table_survey = Database :: get_course_table(TABLE_SURVEY); $course_id = api_get_course_int_id(); if (!empty($survey_id) && !empty($user_id)) { // delete data from survey_answer by user_id and survey_id $sql = "DELETE FROM $table_survey_answer WHERE c_id = $course_id AND survey_id = '".(int)$survey_id."' AND user = '".(int)$user_id."'"; $result = Database::query($sql); // update field answered from survey_invitation by user_id and survey_id $sql = "UPDATE $table_survey_invitation SET answered = '0' WHERE c_id = $course_id AND survey_code = (SELECT code FROM $table_survey WHERE c_id = $course_id AND survey_id = '".(int)$survey_id."') AND user = '".(int)$user_id."'"; $result = Database::query($sql); } if ($result !== false) { $message = get_lang('SurveyUserAnswersHaveBeenRemovedSuccessfully').'
'.get_lang('GoBack').''; Display::display_confirmation_message($message, false); } } /** * This function displays the user report which is basically nothing more than a one-page display of all the questions * of the survey that is filled with the answers of the person who filled the survey. * * @return string html code of the one-page survey with the answers of the selected user * @author Patrick Cool , Ghent University * @version February 2007 - Updated March 2008 */ function display_user_report() { $course_id = api_get_course_int_id(); global $people_filled, $survey_data; // Database table definitions $table_survey_question = Database :: get_course_table(TABLE_SURVEY_QUESTION); $table_survey_question_option = Database :: get_course_table(TABLE_SURVEY_QUESTION_OPTION); $table_survey_answer = Database :: get_course_table(TABLE_SURVEY_ANSWER); // Actions bar echo '

'; echo ''.Display::return_icon('back.png',get_lang('BackTo').' '.get_lang('ReportingOverview'),'',ICON_SIZE_MEDIUM).''; if (isset($_GET['user'])) { // The delete link echo ''.Display::return_icon('delete.png', get_lang('Delete'),'',ICON_SIZE_MEDIUM).''; // Export the user report echo ''.Display::return_icon('export_csv.png', get_lang('ExportAsCSV'),'',ICON_SIZE_MEDIUM).' '; echo ''.Display::return_icon('export_excel.png', get_lang('ExportAsXLS'),'',ICON_SIZE_MEDIUM).' '; echo ''; echo ''; echo ''; echo ''; echo ''; echo '

'; // Step 1: selection of the user echo ""; echo get_lang('SelectUserWhoFilledSurvey').'
'; echo ''; $course_id = api_get_course_int_id(); // Step 2: displaying the survey and the answer of the selected users if (isset($_GET['user'])) { Display::display_normal_message(get_lang('AllQuestionsOnOnePage'), false); // Getting all the questions and options $sql = "SELECT survey_question.question_id, survey_question.survey_id, survey_question.survey_question, survey_question.display, survey_question.max_value, survey_question.sort, survey_question.type, survey_question_option.question_option_id, survey_question_option.option_text, survey_question_option.sort as option_sort FROM $table_survey_question survey_question LEFT JOIN $table_survey_question_option survey_question_option ON survey_question.question_id = survey_question_option.question_id AND survey_question_option.c_id = $course_id WHERE survey_question.survey_id = '".Database::escape_string($_GET['survey_id'])."' AND survey_question.c_id = $course_id ORDER BY survey_question.sort, survey_question_option.sort ASC"; $result = Database::query($sql); while ($row = Database::fetch_array($result, 'ASSOC')) { if($row['type'] != 'pagebreak') { $questions[$row['sort']]['question_id'] = $row['question_id']; $questions[$row['sort']]['survey_id'] = $row['survey_id']; $questions[$row['sort']]['survey_question'] = $row['survey_question']; $questions[$row['sort']]['display'] = $row['display']; $questions[$row['sort']]['type'] = $row['type']; $questions[$row['sort']]['maximum_score'] = $row['max_value']; $questions[$row['sort']]['options'][$row['question_option_id']] = $row['option_text']; } } // Getting all the answers of the user $sql = "SELECT * FROM $table_survey_answer WHERE c_id = $course_id AND survey_id = '".Database::escape_string($_GET['survey_id'])."' AND user = '".Database::escape_string($_GET['user'])."'"; $result = Database::query($sql); while ($row = Database::fetch_array($result, 'ASSOC')) { $answers[$row['question_id']][] = $row['option_id']; $all_answers[$row['question_id']][] = $row; } // Displaying all the questions $second_parameter=array(); foreach ($questions as $key => & $question) { // If the question type is a scoring then we have to format the answers differently if ($question['type'] == 'score') { if (is_array($second_parameter) && is_array($question) && is_array($all_answers)) { foreach ($all_answers[$question['question_id']] as $key => & $answer_array) { $second_parameter[$answer_array['option_id']] = $answer_array['value']; } } } else { $second_parameter = $answers[$question['question_id']]; if ($question['type'] == 'open') { $second_parameter = array(); $second_parameter[] = $all_answers[$question['question_id']][0]['option_id']; } } $ch_type = 'ch_'.$question['type']; $display = new $ch_type; $display->render_question($question, $second_parameter); } } } /** * This function displays the report by question. * * It displays a table with all the options of the question and the number of users who have answered positively on the option. * The number of users who answered positive on a given option is expressed in an absolute number, in a percentage of the total * and graphically using bars * By clicking on the absolute number you get a list with the persons who have answered this. * You can then click on the name of the person and you will then go to the report by user where you see all the * answers of that user. * * @param array All the survey data * @return string html code that displays the report by question * @todo allow switching between horizontal and vertical. * @todo multiple response: percentage are probably not OK * @todo the question and option text have to be shortened and should expand when the user clicks on it. * @todo the pagebreak and comment question types should not be shown => removed from $survey_data before * @author Patrick Cool , Ghent University * @version February 2007 - Updated March 2008 */ function display_question_report($survey_data) { $course_id = api_get_course_int_id(); // Database table definitions $table_survey_question = Database :: get_course_table(TABLE_SURVEY_QUESTION); $table_survey_question_option = Database :: get_course_table(TABLE_SURVEY_QUESTION_OPTION); $table_survey_answer = Database :: get_course_table(TABLE_SURVEY_ANSWER); // Determining the offset of the sql statement (the n-th question of the survey) if (!isset($_GET['question'])) { $offset = 0; } else { $offset = Database::escape_string($_GET['question']); } echo '

'; echo ''.Display::return_icon('back.png',get_lang('BackTo').' '.get_lang('ReportingOverview'),'',ICON_SIZE_MEDIUM).''; echo '

'; if ($survey_data['number_of_questions'] > 0) { echo '

'.get_lang('GoToQuestion').': '; for ($i = 1; $i <= $survey_data['number_of_questions']; $i++) { if ($offset != $i - 1) { echo ''.$i.''; } else { echo $i; } if ($i < $survey_data['number_of_questions']) { echo ' | '; } } echo '

'; // Getting the question information $sql = "SELECT * FROM $table_survey_question WHERE c_id = $course_id AND survey_id='".Database::escape_string($_GET['survey_id'])."' AND type<>'pagebreak' AND type<>'comment' ORDER BY sort ASC LIMIT ".$offset.",1"; $result = Database::query($sql); $question = Database::fetch_array($result); // Navigate through the questions (next and previous) if ($_GET['question'] != 0) { echo ''.Display::return_icon('action_prev.png', get_lang('PreviousQuestion'), array('align' => 'middle')).' '.get_lang('PreviousQuestion').' '; } else { echo Display::return_icon('action_prev.png', get_lang('PreviousQuestion'), array('align' => 'middle')).' '.get_lang('PreviousQuestion').' '; } echo ' | '; if ($_GET['question'] < ($survey_data['number_of_questions'] - 1)) { echo ''.get_lang('NextQuestion').' '.Display::return_icon('action_next.png', get_lang('NextQuestion'), array('align' => 'middle')).''; } else { echo get_lang('NextQuestion').' '.Display::return_icon('action_next.png', get_lang('NextQuestion'), array('align' => 'middle')); } } echo $question['survey_question']; if ($question['type'] == 'score') { /** @todo This function should return the options as this is needed further in the code */ $options = SurveyUtil::display_question_report_score($survey_data, $question, $offset); } elseif ($question['type'] == 'open') { /** @todo Also get the user who has answered this */ $sql = "SELECT * FROM $table_survey_answer WHERE c_id = $course_id AND survey_id='".Database::escape_string($_GET['survey_id'])."' AND question_id = '".Database::escape_string($question['question_id'])."'"; $result = Database::query($sql); while ($row = Database::fetch_array($result)) { echo $row['option_id'].'

'; } } else { // Getting the options $sql = "SELECT * FROM $table_survey_question_option WHERE c_id = $course_id AND survey_id='".Database::escape_string($_GET['survey_id'])."' AND question_id = '".Database::escape_string($question['question_id'])."' ORDER BY sort ASC"; $result = Database::query($sql); while ($row = Database::fetch_array($result)) { $options[$row['question_option_id']] = $row; } // Getting the answers $sql = "SELECT *, count(answer_id) as total FROM $table_survey_answer WHERE c_id = $course_id AND survey_id='".Database::escape_string($_GET['survey_id'])."' AND question_id = '".Database::escape_string($question['question_id'])."' GROUP BY option_id, value"; $result = Database::query($sql); while ($row = Database::fetch_array($result)) { $number_of_answers += $row['total']; $data[$row['option_id']] = $row; } // displaying the table: headers echo ''; echo ' '; echo ' '; echo ' '; echo ' '; echo ' '; echo ' '; // Displaying the table: the content if (is_array($options)) { foreach ($options as $key => & $value) { $absolute_number = $data[$value['question_option_id']]['total']; if ($number_of_answers == 0) { $answers_number = 0; } else { $answers_number = $absolute_number/$number_of_answers*100; } echo ' '; echo ' '; echo ' '; echo ' '; echo ' '; echo ' '; } } // displaying the table: footer (totals) echo ' '; echo ' '; echo ' '; echo ' '; echo ' '; echo ' '; echo '

	'.get_lang('AbsoluteTotal').'	'.get_lang('Percentage').'	'.get_lang('VisualRepresentation').'
'.$value['option_text'].'	'.$absolute_number.'	'.round($answers_number, 2).' %	'; $size = $answers_number*2; if ($size > 0) { echo ' '; } echo '
'.get_lang('Total').'	'.($number_of_answers==0?'0':$number_of_answers).'

'; } if (isset($_GET['viewoption'])) { echo get_lang('PeopleWhoAnswered').': '.$options[Security::remove_XSS($_GET['viewoption'])]['option_text'].'
'; if (is_numeric($_GET['value'])) { $sql_restriction = "AND value='".Database::escape_string($_GET['value'])."'"; } $sql = "SELECT user FROM $table_survey_answer WHERE c_id = $course_id AND option_id = '".Database::escape_string($_GET['viewoption'])."' $sql_restriction"; $result = Database::query($sql); while ($row = Database::fetch_array($result)) { $user_info = api_get_user_info($row['user']); $user_info = $user_info['complete_name']; echo ''.$user_info.'
'; } } } /** * Display score data about a survey question * @param array Question info * @param integer The offset of results shown * @return void (direct output) */ function display_question_report_score($survey_data, $question, $offset) { $course_id = api_get_course_int_id(); // Database table definitions $table_survey_question = Database :: get_course_table(TABLE_SURVEY_QUESTION); $table_survey_question_option = Database :: get_course_table(TABLE_SURVEY_QUESTION_OPTION); $table_survey_answer = Database :: get_course_table(TABLE_SURVEY_ANSWER); $course_id = api_get_course_int_id(); // Getting the options $sql = "SELECT * FROM $table_survey_question_option WHERE c_id = $course_id AND survey_id='".Database::escape_string($_GET['survey_id'])."' AND question_id = '".Database::escape_string($question['question_id'])."' ORDER BY sort ASC"; $result = Database::query($sql); while ($row = Database::fetch_array($result)) { $options[$row['question_option_id']] = $row; } // Getting the answers $sql = "SELECT *, count(answer_id) as total FROM $table_survey_answer WHERE c_id = $course_id AND survey_id='".Database::escape_string($_GET['survey_id'])."' AND question_id = '".Database::escape_string($question['question_id'])."' GROUP BY option_id, value"; $result = Database::query($sql); while ($row = Database::fetch_array($result)) { $number_of_answers += $row['total']; $data[$row['option_id']][$row['value']] = $row; } // Displaying the table: headers echo ''; echo ' '; echo ' '; echo ' '; echo ' '; echo ' '; echo ' '; echo ' '; // Displaying the table: the content foreach ($options as $key => & $value) { for ($i = 1; $i <= $question['max_value']; $i++) { $absolute_number = $data[$value['question_option_id']][$i]['total']; echo ' '; echo ' '; echo ' '; echo ' '; echo ' '; echo ' '; echo ' '; } } // Displaying the table: footer (totals) echo ' '; echo ' '; echo ' '; echo ' '; echo ' '; echo ' '; echo ' '; echo '

	'.get_lang('Score').'	'.get_lang('AbsoluteTotal').'	'.get_lang('Percentage').'	'.get_lang('VisualRepresentation').'
'.$value['option_text'].'	'.$i.'	'.$absolute_number.'	'.round($absolute_number/$number_of_answers*100, 2).' %	'; $size = ($absolute_number/$number_of_answers1002); if ($size > 0) { echo ' '; } echo '
'.get_lang('Total').'		'.$number_of_answers.'

'; } /** * This functions displays the complete reporting * @return string HTML code * @todo open questions are not in the complete report yet. * @author Patrick Cool , Ghent University * @version February 2007 */ function display_complete_report() { // Database table definitions $table_survey_question = Database :: get_course_table(TABLE_SURVEY_QUESTION); $table_survey_question_option = Database :: get_course_table(TABLE_SURVEY_QUESTION_OPTION); $table_survey_answer = Database :: get_course_table(TABLE_SURVEY_ANSWER); // Actions bar echo '

'; echo ' '.Display::return_icon('back.png',get_lang('BackTo').' '.get_lang('ReportingOverview'),'',ICON_SIZE_MEDIUM).''; echo ' '.Display::return_icon('export_csv.png',get_lang('ExportAsCSV'),'',ICON_SIZE_MEDIUM).''; echo ' '.Display::return_icon('export_excel.png',get_lang('ExportAsXLS'),'',ICON_SIZE_MEDIUM).''; echo '

'; // The form echo ''; echo ''; echo ''; echo ''; echo ''; echo '

'; // The table echo '
'; // Getting the number of options per question echo ' '; echo ' '; $display_extra_user_fields = false; if (!($_POST['submit_question_filter'] || $_POST['export_report']) || !empty($_POST['fields_filter'])) { // Show user fields section with a big th colspan that spans over all fields $extra_user_fields = UserManager::get_extra_fields(0, 0, 5, 'ASC', false, true); $num = count($extra_user_fields); if ($num > 0 ) { echo ''; $display_extra_user_fields = true; } } $course_id = api_get_course_int_id(); // Get all the questions ordered by the "sort" column // modify the query to display open questions too // $sql = "SELECT q.question_id, q.type, q.survey_question, count(o.question_option_id) as number_of_options // FROM $table_survey_question q LEFT JOIN $table_survey_question_option o // ON q.question_id = o.question_id // WHERE q.question_id = o.question_id // AND q.survey_id = '".Database::escape_string($_GET['survey_id'])."' // GROUP BY q.question_id // ORDER BY q.sort ASC"; $sql = "SELECT q.question_id, q.type, q.survey_question, count(o.question_option_id) as number_of_options FROM $table_survey_question q LEFT JOIN $table_survey_question_option o ON q.question_id = o.question_id WHERE q.survey_id = '".Database::escape_string($_GET['survey_id'])."' AND q.c_id = $course_id AND o.c_id = $course_id GROUP BY q.question_id ORDER BY q.sort ASC"; // $result = Database::query($sql); while ($row = Database::fetch_array($result)) { // We show the questions if // 1. there is no question filter and the export button has not been clicked // 2. there is a quesiton filter but the question is selected for display //if (!($_POST['submit_question_filter'] || $_POST['export_report']) || in_array($row['question_id'], $_POST['questions_filter'])) { if (!($_POST['submit_question_filter']) || (is_array($_POST['questions_filter']) && in_array($row['question_id'], $_POST['questions_filter']))) { // We do not show comment and pagebreak question types if ($row['type'] != 'comment' && $row['type'] != 'pagebreak') { echo ' modified tst to include percentage if ($row['number_of_options'] > 0 && $row['type'] != 'percentage') { // echo ' colspan="'.$row['number_of_options'].'"'; } echo '>'; echo ' '; echo $row['survey_question']; echo ''; echo ''; } // No column at all if it's not a question } $questions[$row['question_id']] = $row; } echo ' '; // Getting all the questions and options echo ' '; echo ' '; // the user column if (!($_POST['submit_question_filter'] || $_POST['export_report']) || !empty($_POST['fields_filter'])) { //show the fields names for user fields foreach($extra_user_fields as & $field) { echo ''; } } // cells with option (none for open question) $sql = "SELECT sq.question_id, sq.survey_id, sq.survey_question, sq.display, sq.sort, sq.type, sqo.question_option_id, sqo.option_text, sqo.sort as option_sort FROM $table_survey_question sq LEFT JOIN $table_survey_question_option sqo ON sq.question_id = sqo.question_id WHERE sq.survey_id = '".Database::escape_string($_GET['survey_id'])."' AND sq.c_id = $course_id AND sqo.c_id = $course_id ORDER BY sq.sort ASC, sqo.sort ASC"; $result = Database::query($sql); $display_percentage_header = 1; // in order to display only once the cell option (and not 100 times) while ($row = Database::fetch_array($result)) { // We show the options if // 1. there is no question filter and the export button has not been clicked // 2. there is a question filter but the question is selected for display //if (!($_POST['submit_question_filter'] || $_POST['export_report']) || in_array($row['question_id'], $_POST['questions_filter'])) { if (!($_POST['submit_question_filter']) || (is_array($_POST['questions_filter']) && in_array($row['question_id'], $_POST['questions_filter']))) { // modif 05-05-2010 // we do not show comment and pagebreak question types if ($row['type'] == 'open') { echo ''; $possible_answers[$row['question_id']][$row['question_option_id']] = $row['question_option_id']; $display_percentage_header = 1; } else if ($row['type'] == 'percentage' && $display_percentage_header) { echo ''; $possible_answers[$row['question_id']][$row['question_option_id']] = $row['question_option_id']; $display_percentage_header = 0; } else if ($row['type'] == 'percentage') { $possible_answers[$row['question_id']][$row['question_option_id']] = $row['question_option_id']; } else if ($row['type'] <> 'comment' AND $row['type'] <> 'pagebreak' AND $row['type'] <> 'percentage') { echo ''; $possible_answers[$row['question_id']][$row['question_option_id']] = $row['question_option_id']; $display_percentage_header = 1; } //no column at all if the question was not a question // } } echo ' '; // Getting all the answers of the users $old_user = ''; $answers_of_user = array(); $sql = "SELECT * FROM $table_survey_answer WHERE c_id = $course_id AND survey_id='".Database::escape_string($_GET['survey_id'])."' ORDER BY user ASC"; $result = Database::query($sql); while ($row = Database::fetch_array($result)) { if ($old_user != $row['user'] && $old_user != '') { SurveyUtil::display_complete_report_row($possible_answers, $answers_of_user, $old_user, $questions, $display_extra_user_fields); $answers_of_user=array(); } if ($questions[$row['question_id']]['type'] != 'open') { $answers_of_user[$row['question_id']][$row['option_id']] = $row; } else { $answers_of_user[$row['question_id']][0] = $row; } $old_user = $row['user']; } SurveyUtil::display_complete_report_row($possible_answers, $answers_of_user, $old_user, $questions, $display_extra_user_fields); // This is to display the last user echo '

'; if ($_POST['submit_question_filter'] \|\| $_POST['export_report']) { echo ''; } echo ''; echo '	0?' colspan="'.$num.'"':'').'>'; echo ' '; echo get_lang('UserFields'); echo ''; echo '
	'.$field[3].'	-	%	'; echo $row['option_text']; echo '

'; echo '

'; } /** * This function displays a row (= a user and his/her answers) in the table of the complete report. * * @param array Possible options * @param array User answers * @param mixed User ID or user details string * @param boolean Whether to show extra user fields or not * @author Patrick Cool , Ghent University * @version February 2007 - Updated March 2008 */ function display_complete_report_row($possible_options, $answers_of_user, $user, $questions, $display_extra_user_fields = false) { global $survey_data; $user = Security::remove_XSS($user); echo ''; if ($survey_data['anonymous'] == 0) { if (intval($user) !== 0) { $sql = 'SELECT firstname, lastname FROM '.Database::get_main_table(TABLE_MAIN_USER).' WHERE user_id='.intval($user); $rs = Database::query($sql); if ($row = Database::fetch_array($rs)) { $user_displayed = api_get_person_name($row['firstname'], $row['lastname']); } else { $user_displayed = '-'; } echo ''.$user_displayed.''; // the user column } else { echo ''.$user.''; // the user column } } else { echo '-'; } if ($display_extra_user_fields) { // Show user fields data, if any, for this user $user_fields_values = UserManager::get_extra_user_data(intval($user), false, false, false, true); foreach ($user_fields_values as & $value) { echo ''.$value.''; } } if (is_array($possible_options)) { // modified to display open answers and percentage foreach ($possible_options as $question_id => & $possible_option) { if ($questions[$question_id]['type'] == 'open') { echo ''; echo $answers_of_user[$question_id]['0']['option_id']; echo ''; } else { foreach ($possible_option as $option_id => & $value) { if ($questions[$question_id]['type'] == 'percentage') { if (!empty($answers_of_user[$question_id][$option_id])) { echo ""; echo $answers_of_user[$question_id][$option_id]['value']; echo ""; } } else { echo ''; if (!empty($answers_of_user[$question_id][$option_id])) { if ($answers_of_user[$question_id][$option_id]['value'] != 0) { echo $answers_of_user[$question_id][$option_id]['value']; } else { echo 'v'; } } } // } } } } echo ''; } /** * Quite similar to display_complete_report(), returns an HTML string * that can be used in a csv file * @todo consider merging this function with display_complete_report * @return string The contents of a csv file * @author Patrick Cool , Ghent University * @version February 2007 */ function export_complete_report($user_id = 0) { // Database table definitions $table_survey_question = Database :: get_course_table(TABLE_SURVEY_QUESTION); $table_survey_question_option = Database :: get_course_table(TABLE_SURVEY_QUESTION_OPTION); $table_survey_answer = Database :: get_course_table(TABLE_SURVEY_ANSWER); // The first column $return = ';'; // Show extra fields blank space (enough for extra fields on next line) //if (!empty($_REQUEST['fields_filter'])) { //show user fields section with a big th colspan that spans over all fields $extra_user_fields = UserManager::get_extra_fields(0, 0, 5, 'ASC', false, true); $num = count($extra_user_fields); $return .= str_repeat(';', $num); //} $course_id = api_get_course_int_id(); $sql = "SELECT questions.question_id, questions.type, questions.survey_question, count(options.question_option_id) as number_of_options FROM $table_survey_question questions LEFT JOIN $table_survey_question_option options ON questions.question_id = options.question_id AND options.c_id = $course_id WHERE questions.survey_id = '".Database::escape_string($_GET['survey_id'])."' AND questions.c_id = $course_id GROUP BY questions.question_id ORDER BY questions.sort ASC"; $result = Database::query($sql); while ($row = Database::fetch_array($result)) { // We show the questions if // 1. there is no question filter and the export button has not been clicked // 2. there is a quesiton filter but the question is selected for display if (!($_POST['submit_question_filter']) || (is_array($_POST['questions_filter']) && in_array($row['question_id'], $_POST['questions_filter']))) { // We do not show comment and pagebreak question types if ($row['type'] != 'comment' && $row['type'] != 'pagebreak') { if ($row['number_of_options'] == 0 && $row['type'] == 'open') { $return .= str_replace("\r\n",' ', api_html_entity_decode(strip_tags($row['survey_question']), ENT_QUOTES)).';'; } else { for ($ii = 0; $ii < $row['number_of_options']; $ii++) { $return .= str_replace("\r\n",' ', api_html_entity_decode(strip_tags($row['survey_question']), ENT_QUOTES)).';'; } } } } } $return .= "\n"; // Getting all the questions and options $return .= ';'; // Show extra field values //if (!($_POST['submit_question_filter'] || $_POST['export_report']) || !empty($_POST['fields_filter'])) { // Show the fields names for user fields if (!empty($extra_user_fields)) { foreach ($extra_user_fields as & $field) { $return .= '"'.str_replace("\r\n",' ',api_html_entity_decode(strip_tags($field[3]), ENT_QUOTES)).'";'; } } //} $sql = "SELECT survey_question.question_id, survey_question.survey_id, survey_question.survey_question, survey_question.display, survey_question.sort, survey_question.type, survey_question_option.question_option_id, survey_question_option.option_text, survey_question_option.sort as option_sort FROM $table_survey_question survey_question LEFT JOIN $table_survey_question_option survey_question_option ON survey_question.question_id = survey_question_option.question_id AND survey_question_option.c_id = $course_id WHERE survey_question.survey_id = '".Database::escape_string($_GET['survey_id'])."' AND survey_question.c_id = $course_id ORDER BY survey_question.sort ASC, survey_question_option.sort ASC"; $result = Database::query($sql); $possible_answers = array(); $possible_answers_type = array(); while ($row = Database::fetch_array($result)) { // We show the options if // 1. there is no question filter and the export button has not been clicked // 2. there is a quesiton filter but the question is selected for display if (!($_POST['submit_question_filter']) || (is_array($_POST['questions_filter']) && in_array($row['question_id'], $_POST['questions_filter']))) { // We do not show comment and pagebreak question types if ($row['type'] != 'comment' && $row['type'] != 'pagebreak') { $row['option_text'] = str_replace(array("\r","\n"),array('',''),$row['option_text']); $return .= api_html_entity_decode(strip_tags($row['option_text']), ENT_QUOTES).';'; $possible_answers[$row['question_id']][$row['question_option_id']] = $row['question_option_id']; $possible_answers_type[$row['question_id']] = $row['type']; } } } $return .= "\n"; // Getting all the answers of the users $old_user = ''; $answers_of_user = array(); $sql = "SELECT * FROM $table_survey_answer WHERE c_id = $course_id AND survey_id='".Database::escape_string($_GET['survey_id'])."'"; if ($user_id != 0) { $sql .= "AND user='".Database::escape_string($user_id)."' "; } $sql .= "ORDER BY user ASC"; $open_question_iterator = 1; $result = Database::query($sql); while ($row = Database::fetch_array($result)) { if ($old_user != $row['user'] && $old_user != '') { $return .= SurveyUtil::export_complete_report_row($possible_answers, $answers_of_user, $old_user, true); $answers_of_user=array(); } if($possible_answers_type[$row['question_id']] == 'open') { $temp_id = 'open'.$open_question_iterator; $answers_of_user[$row['question_id']][$temp_id] = $row; $open_question_iterator++; } else { $answers_of_user[$row['question_id']][$row['option_id']] = $row; } $old_user = $row['user']; } $return .= SurveyUtil::export_complete_report_row($possible_answers, $answers_of_user, $old_user, true); // This is to display the last user return $return; } /** * Add a line to the csv file * * @param array Possible answers * @param array User's answers * @param mixed User ID or user details as string - Used as a string in the result string * @param boolean Whether to display user fields or not * @return string One line of the csv file * @author Patrick Cool , Ghent University * @version February 2007 */ function export_complete_report_row($possible_options, $answers_of_user, $user, $display_extra_user_fields = false) { global $survey_data; $return = ''; if ($survey_data['anonymous'] == 0) { if (intval($user) !== 0) { $sql = 'SELECT firstname, lastname FROM '.Database::get_main_table(TABLE_MAIN_USER).' WHERE user_id='.intval($user); $rs = Database::query($sql); if ($row = Database::fetch_array($rs)) { $user_displayed = api_get_person_name($row['firstname'], $row['lastname']); } else { $user_displayed = '-'; } $return .= $user_displayed.';'; } else { $return .= $user.';'; } } else { $return .= '-;'; // The user column } if ($display_extra_user_fields) { // Show user fields data, if any, for this user $user_fields_values = UserManager::get_extra_user_data($user,false,false, false, true); foreach ($user_fields_values as & $value) { $return .= '"'.str_replace('"', '""', api_html_entity_decode(strip_tags($value), ENT_QUOTES)).'";'; } } if (is_array($possible_options)) { foreach ($possible_options as $question_id => $possible_option) { if (is_array($possible_option) && count($possible_option) > 0) { foreach ($possible_option as $option_id => & $value) { $my_answer_of_user = ($answers_of_user[$question_id] == null) ? array() : $answers_of_user[$question_id]; $key = array_keys($my_answer_of_user); if (substr($key[0], 0, 4) == 'open') { $return .= '"'.str_replace('"', '""', api_html_entity_decode(strip_tags($answers_of_user[$question_id][$key[0]]['option_id']), ENT_QUOTES)).'"'; } elseif (!empty($answers_of_user[$question_id][$option_id])) { //$return .= 'v'; if ($answers_of_user[$question_id][$option_id]['value'] != 0) { $return .= $answers_of_user[$question_id][$option_id]['value']; } else { $return .= 'v'; } } $return .= ';'; } } } } $return .= "\n"; return $return; } /** * Quite similar to display_complete_report(), returns an HTML string * that can be used in a csv file * @todo consider merging this function with display_complete_report * @return string The contents of a csv file * @author Patrick Cool , Ghent University * @version February 2007 */ function export_complete_report_xls($filename, $user_id = 0) { require_once api_get_path(LIBRARY_PATH).'pear/Spreadsheet_Excel_Writer/Writer.php'; $workbook = new Spreadsheet_Excel_Writer(); $workbook ->setTempDir(api_get_path(SYS_ARCHIVE_PATH)); $workbook->send($filename); $workbook->setVersion(8); // BIFF8 $worksheet =& $workbook->addWorksheet('Report 1'); $worksheet->setInputEncoding(api_get_system_encoding()); $line = 0; $column = 1; // Skip the first column (row titles) // Show extra fields blank space (enough for extra fields on next line) $display_extra_user_fields = false; //if (!empty($_REQUEST['fields_filter'])) { // Show user fields section with a big th colspan that spans over all fields $extra_user_fields = UserManager::get_extra_fields(0, 0, 5, 'ASC', false, true); $num = count($extra_user_fields); for ($i = 0; $i < $num; $i++) { $worksheet->write($line, $column, ''); $column++; } $display_extra_user_fields = true; //} // Database table definitions $table_survey_question = Database :: get_course_table(TABLE_SURVEY_QUESTION); $table_survey_question_option = Database :: get_course_table(TABLE_SURVEY_QUESTION_OPTION); $table_survey_answer = Database :: get_course_table(TABLE_SURVEY_ANSWER); $course_id = api_get_course_int_id(); // First line (questions) $sql = "SELECT questions.question_id, questions.type, questions.survey_question, count(options.question_option_id) as number_of_options FROM $table_survey_question questions LEFT JOIN $table_survey_question_option options ON questions.question_id = options.question_id AND options.c_id = $course_id WHERE questions.survey_id = '".Database::escape_string($_GET['survey_id'])."' AND questions.c_id = $course_id GROUP BY questions.question_id ORDER BY questions.sort ASC"; $result = Database::query($sql); while ($row = Database::fetch_array($result)) { // We show the questions if // 1. there is no question filter and the export button has not been clicked // 2. there is a quesiton filter but the question is selected for display if (!($_POST['submit_question_filter']) || (is_array($_POST['questions_filter']) && in_array($row['question_id'], $_POST['questions_filter']))) { // We do not show comment and pagebreak question types if ($row['type'] != 'comment' && $row['type'] != 'pagebreak') { if ($row['number_of_options'] == 0 && $row['type'] == 'open') { $worksheet->write($line,$column,api_html_entity_decode(strip_tags($row['survey_question']), ENT_QUOTES)); $column ++; } else { for ($ii = 0; $ii < $row['number_of_options']; $ii ++) { $worksheet->write($line, $column, api_html_entity_decode(strip_tags($row['survey_question']), ENT_QUOTES)); $column ++; } } } } } $line++; $column = 1; // Show extra field values if ($display_extra_user_fields) { // Show the fields names for user fields foreach ($extra_user_fields as & $field) { $worksheet->write($line, $column, api_html_entity_decode(strip_tags($field[3]), ENT_QUOTES)); $column++; } } // Getting all the questions and options (second line) $sql = "SELECT survey_question.question_id, survey_question.survey_id, survey_question.survey_question, survey_question.display, survey_question.sort, survey_question.type, survey_question_option.question_option_id, survey_question_option.option_text, survey_question_option.sort as option_sort FROM $table_survey_question survey_question LEFT JOIN $table_survey_question_option survey_question_option ON survey_question.question_id = survey_question_option.question_id AND survey_question_option.c_id = $course_id WHERE survey_question.survey_id = '".Database::escape_string($_GET['survey_id'])."' AND survey_question.c_id = $course_id ORDER BY survey_question.sort ASC, survey_question_option.sort ASC"; $result = Database::query($sql); $possible_answers = array(); $possible_answers_type = array(); while ($row = Database::fetch_array($result)) { // We show the options if // 1. there is no question filter and the export button has not been clicked // 2. there is a quesiton filter but the question is selected for display if (!($_POST['submit_question_filter']) || (is_array($_POST['questions_filter']) && in_array($row['question_id'], $_POST['questions_filter']))) { // We do not show comment and pagebreak question types if ($row['type'] != 'comment' && $row['type'] != 'pagebreak') { $worksheet->write($line,$column,api_html_entity_decode(strip_tags($row['option_text']), ENT_QUOTES)); $possible_answers[$row['question_id']][$row['question_option_id']] = $row['question_option_id']; $possible_answers_type[$row['question_id']] = $row['type']; $column++; } } } // Getting all the answers of the users $line ++; $column = 0; $old_user = ''; $answers_of_user = array(); $sql = "SELECT * FROM $table_survey_answer WHERE c_id = $course_id AND survey_id='".Database::escape_string($_GET['survey_id'])."' "; if ($user_id != 0) { $sql .= "AND user='".Database::escape_string($user_id)."' "; } $sql .= "ORDER BY user ASC"; $open_question_iterator = 1; $result = Database::query($sql); while ($row = Database::fetch_array($result)) { if ($old_user != $row['user'] && $old_user != '') { $return = SurveyUtil::export_complete_report_row_xls($possible_answers, $answers_of_user, $old_user, true); foreach ($return as $elem) { $worksheet->write($line, $column, $elem); $column++; } $answers_of_user = array(); $line++; $column = 0; } if ($possible_answers_type[$row['question_id']] == 'open') { $temp_id = 'open'.$open_question_iterator; $answers_of_user[$row['question_id']][$temp_id] = $row; $open_question_iterator++; } else { $answers_of_user[$row['question_id']][$row['option_id']] = $row; } $old_user = $row['user']; } $return = SurveyUtil::export_complete_report_row_xls($possible_answers, $answers_of_user, $old_user, true); // this is to display the last user foreach ($return as $elem) { $worksheet->write($line, $column, $elem); $column++; } $workbook->close(); return null; } /** * Add a line to the csv file * * @param array Possible answers * @param array User's answers * @param mixed User ID or user details as string - Used as a string in the result string * @param boolean Whether to display user fields or not * @return string One line of the csv file */ function export_complete_report_row_xls($possible_options, $answers_of_user, $user, $display_extra_user_fields = false) { $return = array(); global $survey_data; if ($survey_data['anonymous'] == 0) { if (intval($user) !== 0) { $sql = 'SELECT firstname, lastname FROM '.Database::get_main_table(TABLE_MAIN_USER).' WHERE user_id='.intval($user); $rs = Database::query($sql); if($row = Database::fetch_array($rs)) { $user_displayed = api_get_person_name($row['firstname'], $row['lastname']); } else { $user_displayed = '-'; } //echo ' '.$user_displayed.''; // the user column $return[] = $user_displayed; } else { //echo ' '.$user.''; // The user column $return[] = $user; } } else { $return[] = '-'; // The user column } if ($display_extra_user_fields) { //show user fields data, if any, for this user $user_fields_values = UserManager::get_extra_user_data(intval($user),false,false, false, true); foreach($user_fields_values as $value) { $return[] = api_html_entity_decode(strip_tags($value), ENT_QUOTES); } } if (is_array($possible_options)) { foreach ($possible_options as $question_id => & $possible_option) { if (is_array($possible_option) && count($possible_option) > 0) { foreach ($possible_option as $option_id => & $value) { $my_answers_of_user = ($answers_of_user[$question_id]==null) ? array() : $answers_of_user[$question_id]; $key = array_keys($my_answers_of_user); if (substr($key[0], 0, 4) == 'open') { $return[] = api_html_entity_decode(strip_tags($answers_of_user[$question_id][$key[0]]['option_id']), ENT_QUOTES); } elseif (!empty($answers_of_user[$question_id][$option_id])) { //$return .= 'v'; if ($answers_of_user[$question_id][$option_id]['value'] != 0) { $return[] = $answers_of_user[$question_id][$option_id]['value']; } else { $return[] = 'v'; } } else { $return[] = ''; } } } } } return $return; } /** * This function displays the comparative report which allows you to compare two questions * A comparative report creates a table where one question is on the x axis and a second question is on the y axis. * In the intersection is the number of people who have answerd positive on both options. * * @return string HTML code * * @author Patrick Cool , Ghent University * @version February 2007 */ function display_comparative_report() { // Allowed question types for comparative report $allowed_question_types = array('yesno', 'multiplechoice', 'multipleresponse', 'dropdown', 'percentage', 'score'); // Getting all the questions $questions = survey_manager::get_questions($_GET['survey_id']); // Actions bar echo '

'; echo ''.Display::return_icon('back.png', get_lang('BackTo').' '.get_lang('ReportingOverview'),'',ICON_SIZE_MEDIUM).''; echo '

'; // Displaying an information message that only the questions with predefined answers can be used in a comparative report Display::display_normal_message(get_lang('OnlyQuestionsWithPredefinedAnswers'), false); // The form for selecting the axis of the table echo ''; // Getting all the information of the x axis if (isset($_GET['xaxis']) && is_numeric($_GET['xaxis'])) { $question_x = survey_manager::get_question($_GET['xaxis']); } // Getting all the information of the y axis if (isset($_GET['yaxis']) && is_numeric($_GET['yaxis'])) { $question_y = survey_manager::get_question($_GET['yaxis']); } if (isset($_GET['xaxis']) && is_numeric($_GET['xaxis']) && isset($_GET['yaxis']) && is_numeric($_GET['yaxis'])) { // Getting the answers of the two questions $answers_x = SurveyUtil::get_answers_of_question_by_user($_GET['survey_id'], $_GET['xaxis']); $answers_y = SurveyUtil::get_answers_of_question_by_user($_GET['survey_id'], $_GET['yaxis']); // Displaying the table echo ''; // The header echo ' '; for ($ii = 0; $ii <= count($question_x['answers']); $ii++) { if ($ii == 0) { echo ' '; } else { if ($question_x['type'] == 'score') { for ($x = 1; $x <= $question_x['maximum_score']; $x++) { echo ' '; } $x = ''; } else { echo ' '; } } } echo ' '; // The main part for ($ij = 0; $ij < count($question_y['answers']); $ij++) { // The Y axis is a scoring question type so we have more rows than the options (actually options * maximum score) if ($question_y['type'] == 'score') { for ($y = 1; $y <= $question_y['maximum_score']; $y++) { echo ' '; for ($ii = 0; $ii <= count($question_x['answers']); $ii++) { if ($question_x['type'] == 'score') { for ($x = 1; $x <= $question_x['maximum_score']; $x++) { if ($ii == 0) { echo ' '; break; } else { echo ' '; } } } else { if ($ii == 0) { echo ' '; } else { echo ' '; } } } echo ' '; } } // The Y axis is NOT a score question type so the number of rows = the number of options else { echo ' '; for ($ii = 0; $ii <= count($question_x['answers']); $ii++) { if ($question_x['type'] == 'score') { for ($x = 1; $x <= $question_x['maximum_score']; $x++) { if ($ii == 0) { echo ' '; break; } else { echo ' '; } } } else { if ($ii == 0) { echo ' '; } else { echo ' '; } } } echo ' '; } } echo '

	'.$question_x['answers'][($ii-1)].' '.$x.'	'.$question_x['answers'][($ii-1)].'
'.$question_y['answers'][($ij)].' '.$y.'	'; echo SurveyUtil::comparative_check($answers_x, $answers_y, $question_x['answersid'][($ii-1)], $question_y['answersid'][($ij)], $x, $y); echo '	'.$question_y['answers'][($ij)].' '.$y.'	'; echo SurveyUtil::comparative_check($answers_x, $answers_y, $question_x['answersid'][($ii-1)], $question_y['answersid'][($ij)], 0, $y); echo '
'.$question_y['answers'][($ij)].'	'; echo SurveyUtil::comparative_check($answers_x, $answers_y, $question_x['answersid'][($ii-1)], $question_y['answersid'][($ij)], $x, 0); echo '	'.$question_y['answers'][($ij)].'	'; echo SurveyUtil::comparative_check($answers_x, $answers_y, $question_x['answersid'][($ii-1)], $question_y['answersid'][($ij)]); echo '

'; } } /** * Get all the answers of a question grouped by user * * @param integer Survey ID * @param integer Question ID * @return Array Array containing all answers of all users, grouped by user * * @author Patrick Cool , Ghent University * @version February 2007 - Updated March 2008 */ function get_answers_of_question_by_user($survey_id, $question_id) { $course_id = api_get_course_int_id(); // Database table definitions $table_survey_question = Database :: get_course_table(TABLE_SURVEY_QUESTION); $table_survey_question_option = Database :: get_course_table(TABLE_SURVEY_QUESTION_OPTION); $table_survey_answer = Database :: get_course_table(TABLE_SURVEY_ANSWER); $sql = "SELECT * FROM $table_survey_answer WHERE c_id = $course_id AND survey_id='".Database::escape_string($survey_id)."' AND question_id='".Database::escape_string($question_id)."' ORDER BY USER ASC"; $result = Database::query($sql); while ($row = Database::fetch_array($result)) { if ($row['value'] == 0) { $return[$row['user']][] = $row['option_id']; } else { $return[$row['user']][] = $row['option_id'].'*'.$row['value']; } } return $return; } /** * Count the number of users who answer positively on both options * * @param array All answers of the x axis * @param array All answers of the y axis * @param integer x axis value (= the option_id of the first question) * @param integer y axis value (= the option_id of the second question) * @return integer Number of users who have answered positively to both options * * @author Patrick Cool , Ghent University * @version February 2007 */ function comparative_check($answers_x, $answers_y, $option_x, $option_y, $value_x = 0, $value_y = 0) { if ($value_x == 0) { $check_x = $option_x; } else { $check_x = $option_x.'*'.$value_x; } if ($value_y == 0) { $check_y = $option_y; } else { $check_y = $option_y.'*'.$value_y; } $counter = 0; if (is_array($answers_x)) { foreach ($answers_x as $user => & $answers) { // Check if the user has given $option_x as answer if (in_array($check_x, $answers)) { // Check if the user has given $option_y as an answer if (in_array($check_y, $answers_y[$user])) { $counter++; } } } } return $counter; } /** * Get all the information about the invitations of a certain survey * * @return array Lines of invitation [user, code, date, empty element] * * @author Patrick Cool , Ghent University * @version January 2007 * * @todo use survey_id parameter instead of $_GET */ function get_survey_invitations_data() { $course_id = api_get_course_int_id(); // Database table definition $table_survey_invitation = Database :: get_course_table(TABLE_SURVEY_INVITATION); $table_user = Database :: get_main_table(TABLE_MAIN_USER); $sql = "SELECT survey_invitation.user as col1, survey_invitation.invitation_code as col2, survey_invitation.invitation_date as col3, '' as col4 FROM $table_survey_invitation survey_invitation LEFT JOIN $table_user user ON survey_invitation.user = user.user_id WHERE survey_invitation.c_id = $course_id AND survey_invitation.survey_id = '".Database::escape_string($_GET['survey_id'])."' AND session_id='".api_get_session_id()."' "; $res = Database::query($sql); while ($row = Database::fetch_array($res)) { $survey_invitation_data[] = $row; } return $survey_invitation_data; } /** * Get the total number of survey invitations for a given survey (through $_GET['survey_id']) * * @return integer Total number of survey invitations * * @todo use survey_id parameter instead of $_GET * * @author Patrick Cool , Ghent University * @version January 2007 */ function get_number_of_survey_invitations() { $course_id = api_get_course_int_id(); // Database table definition $table_survey_invitation = Database :: get_course_table(TABLE_SURVEY_INVITATION); $sql = "SELECT count(user) AS total FROM $table_survey_invitation WHERE c_id = $course_id AND survey_id='".Database::escape_string($_GET['survey_id'])."' AND session_id='".api_get_session_id()."' "; $res = Database::query($sql); $row = Database::fetch_array($res,'ASSOC'); return $row['total']; } /** * Save the invitation mail * * @param string Text of the e-mail * @param integer Whether the mail contents are for invite mail (0, default) or reminder mail (1) * * @author Patrick Cool , Ghent University * @version January 2007 */ function save_invite_mail($mailtext, $mail_subject, $reminder = 0) { $course_id = api_get_course_int_id(); // Database table definition $table_survey = Database :: get_course_table(TABLE_SURVEY); // Reminder or not if ($reminder == 0) { $mail_field = 'invite_mail'; } else { $mail_field = 'reminder_mail'; } $sql = "UPDATE $table_survey SET mail_subject='".Database::escape_string($mail_subject)."', $mail_field = '".Database::escape_string($mailtext)."' WHERE c_id = $course_id AND survey_id = '".Database::escape_string($_GET['survey_id'])."'"; $result = Database::query($sql); } /** * This function saves all the invitations of course users and additional users in the database * and sends the invitations by email * * @param array Users array can be both a list of course uids AND a list of additional emailaddresses * @param string Title of the invitation, used as the title of the mail * @param string Text of the invitation, used as the text of the mail. * The text has to contain a **link** string or this will automatically be added to the end * * @author Patrick Cool , Ghent University * @version January 2007 * */ function save_invitations($users_array, $invitation_title, $invitation_text, $reminder = 0, $sendmail = 0, $remindUnAnswered = 0) { if (!is_array($users_array)) return 0; // Should not happen // Getting the survey information $survey_data = survey_manager::get_survey($_GET['survey_id']); // Database table to store the invitations data $table_survey_invitation = Database::get_course_table(TABLE_SURVEY_INVITATION); $survey_invitations = array(); $survey_invitations = SurveyUtil::get_invitations($survey_data['survey_code']); $already_invited = array(); $already_invited = SurveyUtil::get_invited_users($survey_data['code']); // Remind unanswered is a special version of remind all reminder $exclude_users = array(); if ($remindUnAnswered == 1) { // Remind only unanswered users $reminder = 1; $exclude_users = survey_manager::get_people_who_filled_survey($_GET['survey_id']); } $counter = 0; // Nr of invitations "sent" (if sendmail option) $course_id = api_get_course_int_id(); foreach ($users_array as $key=>$value) { if (!isset($value) || $value == '') continue; // Skip user if reminding only unanswered people if (in_array($value, $exclude_users)) continue; // Get the unique invitation code if we already have it if ($reminder == 1 && array_key_exists($value, $survey_invitations)) { $invitation_code = $survey_invitations[$value]['invitation_code']; } else { $invitation_code = md5($value.microtime()); } $new_user = false; // User not already invited // Store the invitation if user_id not in $already_invited['course_users'] OR email is not in $already_invited['additional_users'] $addit_users_array = explode(';', $already_invited['additional_users']); $my_alredy_invited = ($already_invited['course_users'] == null) ? array() : $already_invited['course_users']; if ((is_numeric($value) && !in_array($value, $my_alredy_invited)) || (!is_numeric($value) && !in_array($value, $addit_users_array))) { $new_user = true; if (!array_key_exists($value, $survey_invitations)) { $sql = "INSERT INTO $table_survey_invitation (c_id, user, survey_code, invitation_code, invitation_date) VALUES ($course_id, '".Database::escape_string($value)."','".Database::escape_string($survey_data['code'])."','".Database::escape_string($invitation_code)."','".Database::escape_string(date('Y-m-d H:i:s'))."')"; $result = Database::query($sql); } } // Send the email if checkboxed if (($new_user || $reminder == 1) && $sendmail != 0) { // Make a change for absolute url if (isset($invitation_text)) { $invitation_text = api_html_entity_decode($invitation_text, ENT_QUOTES); $invitation_text = str_replace('src="../../', 'src="'.api_get_path(WEB_PATH), $invitation_text); $invitation_text = trim(stripslashes($invitation_text)); } SurveyUtil::send_invitation_mail($value, $invitation_code, $invitation_title, $invitation_text); $counter++; } } return $counter; // Number of invitations sent } /** * Send the invitation by mail. * * @param invitedUser - the userId (course user) or emailaddress of additional user * $param $invitation_code - the unique invitation code for the URL * @return void */ function send_invitation_mail($invitedUser, $invitation_code, $invitation_title, $invitation_text) { global $_user, $_course, $_configuration; $portal_url = api_get_path(WEB_PATH); if ($_configuration['multiple_access_urls']) { $access_url_id = api_get_current_access_url_id(); if ($access_url_id != -1) { $url = api_get_access_url($access_url_id); $portal_url = $url['url']; } } // Replacing the **link** part with a valid link for the user $survey_link = $portal_url.'main/survey/fillsurvey.php?course='.$_course['sysCode'].'&invitationcode='.$invitation_code; $text_link = ''.get_lang('ClickHereToAnswerTheSurvey')."
\r\n
\r\n".get_lang('OrCopyPasteTheFollowingUrl')."
\r\n ".$survey_link; $replace_count = 0; $full_invitation_text = api_str_ireplace('**link**', $text_link ,$invitation_text, $replace_count); if ($replace_count < 1) { $full_invitation_text = $full_invitation_text."
\r\n
\r\n".$text_link; } // Optionally: finding the e-mail of the course user if (is_numeric($invitedUser)) { $table_user = Database :: get_main_table(TABLE_MAIN_USER); $sql = "SELECT firstname, lastname, email FROM $table_user WHERE user_id='".Database::escape_string($invitedUser)."'"; $result = Database::query($sql); $row = Database::fetch_array($result); $recipient_email = $row['email']; $recipient_name = api_get_person_name($row['firstname'], $row['lastname'], null, PERSON_NAME_EMAIL_ADDRESS); } else { /** @todo check if the address is a valid email */ $recipient_email = $invitedUser; } // Sending the mail $sender_name = api_get_person_name($_user['firstName'], $_user['lastName'], null, PERSON_NAME_EMAIL_ADDRESS); $sender_email = $_user['mail']; $replyto = array(); if (api_get_setting('survey_email_sender_noreply') == 'noreply') { $noreply = api_get_setting('noreply_email_address'); if (!empty($noreply)) { $replyto['Reply-to'] = $noreply; $sender_name = $noreply; $sender_email = $noreply; } } @api_mail_html($recipient_name, $recipient_email, $invitation_title, $full_invitation_text, $sender_name, $sender_email, $replyto); } /** * This function recalculates the number of users who have been invited and updates the survey table with this value. * * @param string Survey code * @return void * @author Patrick Cool , Ghent University * @version January 2007 */ function update_count_invited($survey_code) { $course_id = api_get_course_int_id(); // Database table definition $table_survey_invitation = Database :: get_course_table(TABLE_SURVEY_INVITATION); $table_survey = Database :: get_course_table(TABLE_SURVEY); // Counting the number of people that are invited $sql = "SELECT count(user) as total FROM $table_survey_invitation WHERE c_id = $course_id AND survey_code = '".Database::escape_string($survey_code)."'"; $result = Database::query($sql); $row = Database::fetch_array($result); $total_invited = $row['total']; // Updating the field in the survey table $sql = "UPDATE $table_survey SET invited = '".Database::escape_string($total_invited)."' WHERE c_id = $course_id AND code = '".Database::escape_string($survey_code)."'"; $result = Database::query($sql); } /** * This function gets all the invited users for a given survey code. * * @param string Survey code * @param string optional - course database * @return array Array containing the course users and additional users (non course users) * * @todo consider making $defaults['additional_users'] also an array * * @author Patrick Cool , Ghent University * @version January 2007 */ function get_invited_users($survey_code, $course_code = '') { if (!empty($course_code)) { $course_info = api_get_course_info($course_code); $course_id = $course_info['real_id']; } else { $course_id = api_get_course_int_id(); } $table_survey_invitation = Database :: get_course_table(TABLE_SURVEY_INVITATION); $table_user = Database :: get_main_table(TABLE_MAIN_USER); // Selecting all the invitations of this survey AND the additional emailaddresses (the left join) $order_clause = api_sort_by_first_name() ? ' ORDER BY firstname, lastname' : ' ORDER BY lastname, firstname'; $sql = "SELECT user FROM $table_survey_invitation as table_invitation LEFT JOIN $table_user as table_user ON table_invitation.user = table_user.user_id AND table_invitation.c_id = $course_id WHERE survey_code='".Database::escape_string($survey_code)."'".$order_clause; $defaults = array(); $defaults['course_users'] = array(); $defaults['additional_users'] = ''; $result = Database::query($sql); while ($row = Database::fetch_array($result)) { if (is_numeric($row['user'])) { $defaults['course_users'][] = $row['user']; } else { if (empty($defaults['additional_users'])) { $defaults['additional_users'] = $row['user']; } else { $defaults['additional_users'] .= ';'.$row['user']; } } } return $defaults; } /** * Get all the invitations * * @param string Survey code * @return array Database rows matching the survey code * * @author Patrick Cool , Ghent University * @version September 2007 */ function get_invitations($survey_code) { $course_id = api_get_course_int_id(); // Database table definition $table_survey_invitation = Database :: get_course_table(TABLE_SURVEY_INVITATION); $sql = "SELECT * FROM $table_survey_invitation WHERE c_id = $course_id AND survey_code = '".Database::escape_string($survey_code)."'"; $result = Database::query($sql); $return = array(); while ($row = Database::fetch_array($result)) { $return[$row['user']] = $row; } return $return; } /** * This function displays the form for searching a survey * * @return void (direct output) * * @author Patrick Cool , Ghent University * @version January 2007 * * @todo use quickforms * @todo consider moving this to surveymanager.inc.lib.php */ function display_survey_search_form() { echo ''; echo '

'; } /** * This function displays the sortable table with all the surveys * * @return void (direct output) * * @author Patrick Cool , Ghent University * @version January 2007 */ function display_survey_list() { $parameters = array(); $parameters['cidReq'] = api_get_course_id(); if ($_GET['do_search']) { $message = get_lang('DisplaySearchResults').'
'; $message .= ''.get_lang('DisplayAll').''; Display::display_normal_message($message, false); } // Create a sortable table with survey-data $table = new SortableTable('surveys', 'get_number_of_surveys', 'get_survey_data', 2); $table->set_additional_parameters($parameters); $table->set_header(0, '', false); $table->set_header(1, get_lang('SurveyName')); $table->set_header(2, get_lang('SurveyCode')); $table->set_header(3, get_lang('NumberOfQuestions')); $table->set_header(4, get_lang('Author')); //$table->set_header(5, get_lang('Language')); //$table->set_header(6, get_lang('Shared')); $table->set_header(5, get_lang('AvailableFrom')); $table->set_header(6, get_lang('AvailableUntil')); $table->set_header(7, get_lang('Invite')); $table->set_header(8, get_lang('Anonymous')); $table->set_header(9, get_lang('Modify'), false, 'width="150"'); $table->set_column_filter(8, 'anonymous_filter'); $table->set_column_filter(9, 'modify_filter'); $table->set_form_actions(array('delete' => get_lang('DeleteSurvey'))); $table->display(); } function display_survey_list_for_coach() { $parameters = array(); $parameters['cidReq']=api_get_course_id(); if (isset($_GET['do_search'])) { $message = get_lang('DisplaySearchResults').'
'; $message .= ''.get_lang('DisplayAll').''; Display::display_normal_message($message, false); } // Create a sortable table with survey-data $table = new SortableTable('surveys_coach', 'get_number_of_surveys_for_coach', 'get_survey_data_for_coach', 2); $table->set_additional_parameters($parameters); $table->set_header(0, '', false); $table->set_header(1, get_lang('SurveyName')); $table->set_header(2, get_lang('SurveyCode')); $table->set_header(3, get_lang('NumberOfQuestions')); $table->set_header(4, get_lang('Author')); //$table->set_header(5, get_lang('Language')); //$table->set_header(6, get_lang('Shared')); $table->set_header(5, get_lang('AvailableFrom')); $table->set_header(6, get_lang('AvailableUntil')); $table->set_header(7, get_lang('Invite')); $table->set_header(8, get_lang('Anonymous')); $table->set_header(9, get_lang('Modify'), false, 'width="130"'); $table->set_column_filter(8, 'anonymous_filter'); $table->set_column_filter(9, 'modify_filter_for_coach'); $table->display(); } /** * This function changes the modify column of the sortable table * * @param integer $survey_id the id of the survey * @return html code that are the actions that can be performed on any survey * * @author Patrick Cool , Ghent University * @version January 2007 */ function modify_filter($survey_id) { $survey_id = Security::remove_XSS($survey_id); $return = ''; // Coach can see that only if the survey is in his session if (api_is_allowed_to_edit() || api_is_element_in_the_session(TOOL_SURVEY, $survey_id)) { $return .= ''.Display::return_icon('edit.png', get_lang('Edit'),'',ICON_SIZE_SMALL).''; $return .= ''.Display::return_icon('clean.png', get_lang('EmptySurvey'),'',ICON_SIZE_SMALL).' '; } //$return .= ''.Display::return_icon('copy.gif', get_lang('Copy')).''; //$return .= ''.Display::return_icon('add.gif', get_lang('Add')).''; $return .= ''.Display::return_icon('preview_view.png', get_lang('Preview'),'',ICON_SIZE_SMALL).' '; $return .= ''.Display::return_icon('mail_send.png', get_lang('Publish'),'',ICON_SIZE_SMALL).' '; $return .= ''.Display::return_icon('stats.png', get_lang('Reporting'),'',ICON_SIZE_SMALL).''; if (api_is_allowed_to_edit() || api_is_element_in_the_session(TOOL_SURVEY, $survey_id)) { $return .= ''.Display::return_icon('delete.png', get_lang('Delete'),'',ICON_SIZE_SMALL).' '; } return $return; } function modify_filter_for_coach($survey_id) { $survey_id = Security::remove_XSS($survey_id); //$return = ''.Display::return_icon('edit.gif', get_lang('Edit')).''; //$return .= ''.Display::return_icon('delete.gif', get_lang('Delete')).''; //$return .= ''.Display::return_icon('copy.gif', get_lang('Copy')).''; //$return .= ''.Display::return_icon('add.gif', get_lang('Add')).''; $return .= ''.Display::return_icon('preview_view.png', get_lang('Preview'),'',ICON_SIZE_SMALL).' '; $return .= ''.Display::return_icon('mail_send.png', get_lang('Publish'),'',ICON_SIZE_SMALL).' '; $return .= ''.Display::return_icon('clean.png', get_lang('EmptySurvey'),'',ICON_SIZE_SMALL).' '; //$return .= ''.Display::return_icon('statistics.gif', get_lang('Reporting')).''; return $return; } /** * Returns "yes" when given parameter is one, "no" for any other value * @param integer Whether anonymous or not * @return string "Yes" or "No" in the current language */ function anonymous_filter($anonymous) { if ($anonymous == 1) { return get_lang('Yes'); } else { return get_lang('No'); } } /** * This function handles the search restriction for the SQL statements * * @return string Part of a SQL statement or false on error * * @author Patrick Cool , Ghent University * @version January 2007 */ function survey_search_restriction() { if (isset($_GET['do_search'])) { if ($_GET['keyword_title'] != '') { $search_term[] = 'title like "%" \''.Database::escape_string($_GET['keyword_title']).'\' "%"'; } if ($_GET['keyword_code'] != '') { $search_term[] = 'code =\''.Database::escape_string($_GET['keyword_code']).'\''; } if ($_GET['keyword_language'] != '%') { $search_term[] = 'lang =\''.Database::escape_string($_GET['keyword_language']).'\''; } $my_search_term = ($search_term == null) ? array() : $search_term; $search_restriction = implode(' AND ', $my_search_term); return $search_restriction; } else { return false; } } /** * This function calculates the total number of surveys * * @return integer Total number of surveys * * @author Patrick Cool , Ghent University * @version January 2007 */ function get_number_of_surveys() { global $table_survey; $course_id = api_get_course_int_id(); $search_restriction = SurveyUtil::survey_search_restriction(); if ($search_restriction) { $search_restriction = 'WHERE c_id = '.$course_id.' AND '.$search_restriction; } else { $search_restriction = "WHERE c_id = $course_id"; } $sql = "SELECT count(survey_id) AS total_number_of_items FROM ".$table_survey.' '.$search_restriction; $res = Database::query($sql); $obj = Database::fetch_object($res); return $obj->total_number_of_items; } function get_number_of_surveys_for_coach() { /*global $table_survey; $search_restriction = SurveyUtil::survey_search_restriction(); if ($search_restriction) { $search_restriction = 'WHERE '.$search_restriction; } $sql = "SELECT count(survey_id) AS total_number_of_items FROM ".$table_survey.' '.$search_restriction; $res = Database::query($sql); $obj = Database::fetch_object($res); return $obj->total_number_of_items; */ // Ugly fix require_once(api_get_path(LIBRARY_PATH).'surveymanager.lib.php'); $survey_tree = new SurveyTree(); return count($survey_tree->get_last_children_from_branch($survey_tree->surveylist)); } /** * This function gets all the survey data that is to be displayed in the sortable table * * @param unknown_type $from * @param unknown_type $number_of_items * @param unknown_type $column * @param unknown_type $direction * @return unknown * * @author Patrick Cool , Ghent University * @author Julio Montoya , Beeznest - Adding intvals * @version January 2007 */ function get_survey_data($from, $number_of_items, $column, $direction) { global $table_survey, $table_user, $table_survey_question; global $_user; // Searching $search_restriction = SurveyUtil::survey_search_restriction(); if ($search_restriction) { $search_restriction = ' AND '.$search_restriction; } $from = intval($from); $number_of_items = intval($number_of_items); $column = intval($column); if (!in_array(strtolower($direction), array('asc', 'desc'))) { $direction = 'asc'; } // Condition for the session $session_id = api_get_session_id(); $condition_session = api_get_session_condition($session_id); $course_id = api_get_course_int_id(); //IF(is_shared<>0,'V','-') AS col6, $sql = "SELECT survey.survey_id AS col0, CONCAT('',survey.title,'') AS col1, survey.code AS col2, count(survey_question.question_id) AS col3, ".(api_is_western_name_order() ? "CONCAT(user.firstname, ' ', user.lastname)" : "CONCAT(user.lastname, ' ', user.firstname)")." AS col4, survey.avail_from AS col5, survey.avail_till AS col6, CONCAT('',survey.answered,' / ',survey.invited, '') AS col7, survey.anonymous AS col8, survey.survey_id AS col9, survey.session_id AS session_id FROM $table_survey survey LEFT JOIN $table_survey_question survey_question ON survey.survey_id = survey_question.survey_id, $table_user user WHERE survey.author = user.user_id AND survey.c_id = $course_id $search_restriction $condition_session "; $sql .= " GROUP BY survey.survey_id"; $sql .= " ORDER BY col$column $direction "; $sql .= " LIMIT $from,$number_of_items"; $res = Database::query($sql); $surveys = array(); $array = array(); while ($survey = Database::fetch_array($res)) { $array[0] = $survey[0]; $array[1] = $survey[1]; // Validation when belonging to a session $session_img = api_get_session_image($survey['session_id'], $_user['status']); $array[2] = $survey[2] . $session_img; $array[3] = $survey[3]; $array[4] = $survey[4]; $array[5] = $survey[5]; $array[6] = $survey[6]; $array[7] = $survey[7]; $array[8] = $survey[8]; $array[9] = $survey[9]; //$array[10] = $survey[10]; $surveys[] = $array; } return $surveys; } function get_survey_data_for_coach($from, $number_of_items, $column, $direction) { require_once api_get_path(LIBRARY_PATH).'surveymanager.lib.php'; $survey_tree = new SurveyTree(); $last_version_surveys = $survey_tree->get_last_children_from_branch($survey_tree->surveylist); $list = array(); foreach ($last_version_surveys as & $survey) { $list[]=$survey['id']; } if (count($list) > 0) { $list_condition = " AND survey.survey_id IN (".implode(',',$list).") "; } else { $list_condition = ''; } $from = intval($from); $number_of_items = intval($number_of_items); $column = intval($column); if (!in_array(strtolower($direction), array('asc', 'desc'))) { $direction = 'asc'; } $table_survey = Database :: get_course_table(TABLE_SURVEY); $table_survey_question = Database :: get_course_table(TABLE_SURVEY_QUESTION); $table_user = Database :: get_main_table(TABLE_MAIN_USER); $course_id = api_get_course_int_id(); //IF(is_shared<>0,'V','-') AS col6, $sql = "SELECT ". "survey.survey_id AS col0, ". "survey.title AS col1, ". "survey.code AS col2, ". "count(survey_question.question_id) AS col3, ". (api_is_western_name_order() ? "CONCAT(user.firstname, ' ', user.lastname)" : "CONCAT(user.lastname, ' ', user.firstname)")." AS col4, ". "survey.avail_from AS col5, ". "survey.avail_till AS col6, ". "CONCAT('',survey.answered,' / ',survey.invited, '') AS col7, ". "survey.anonymous AS col8, ". "survey.survey_id AS col9 ". "FROM $table_survey survey ". "LEFT JOIN $table_survey_question survey_question ON survey.survey_id = survey_question.survey_id ". ", $table_user user ". ",WHERE survey.author = user.user_id AND survey.c_id = $course_id $list_condition "; $sql .= " GROUP BY survey.survey_id"; $sql .= " ORDER BY col$column $direction "; $sql .= " LIMIT $from,$number_of_items"; $res = Database::query($sql); $surveys = array(); while ($survey = Database::fetch_array($res)) { $surveys[] = $survey; } return $surveys; } /** * Display all the active surveys for the given course user * * @param unknown_type $user_id * * @author Patrick Cool , Ghent University * @version April 2007 */ function survey_list_user($user_id) { global $_course; $course_id = api_get_course_int_id(); // Database table definitions $table_survey_question = Database :: get_course_table(TABLE_SURVEY_QUESTION); $table_survey_invitation = Database :: get_course_table(TABLE_SURVEY_INVITATION); $table_survey_answer = Database :: get_course_table(TABLE_SURVEY_ANSWER); $table_survey = Database :: get_course_table(TABLE_SURVEY); $table_user = Database :: get_main_table(TABLE_MAIN_USER); $all_question_id = array(); $sql = 'SELECT question_id from '.$table_survey_question." WHERE c_id = $course_id"; $result = Database::query($sql); while($row=Database::fetch_array($result, 'ASSOC')) { $all_question_id[] = $row; } $count = 0; for ($i = 0; $i < count($all_question_id); $i++) { $sql = 'SELECT COUNT(*) as count FROM '.$table_survey_answer.' WHERE c_id = '.$course_id.' AND question_id='.Database::escape_string($all_question_id[$i]['question_id']).' AND user='.api_get_user_id(); $result = Database::query($sql); while ($row = Database::fetch_array($result, 'ASSOC')) { if ($row['count'] == 0) { $count++; break; } } if ($count > 0) { $link_add = true; break; } } echo ''; echo ''; echo ' '; echo ' '; echo ''; $sql = "SELECT * FROM $table_survey survey, $table_survey_invitation survey_invitation WHERE survey_invitation.user = '".Database::escape_string($user_id)."' AND survey.code = survey_invitation.survey_code AND survey.avail_from <= '".date('Y-m-d H:i:s')."' AND survey.avail_till >= '".date('Y-m-d H:i:s')."' AND survey.c_id = $course_id AND survey_invitation.c_id = $course_id "; $result = Database::query($sql); $counter = 0; while ($row = Database::fetch_array($result, 'ASSOC')) { // Get the user into survey answer table (user or anonymus) $sql = "SELECT user FROM $table_survey_answer WHERE c_id = $course_id AND survey_id = (SELECT survey_id from $table_survey WHERE code ='".Database::escape_string($row['code'])." AND c_id = $course_id')"; $result_answer = Database::query($sql); $row_answer = Database::fetch_array($result_answer,'ASSOC'); echo ''; if ($row['answered'] == 0) { echo ''; } else { echo ''; } echo ''; echo ''; if ($row['anonymous'] == 1) { $current_user_id = $_SESSION['surveyuser']; } else { $current_user_id = api_get_user_id(); } $link_available = self::show_link_available(api_get_user_id(),$row['code'],$current_user_id); //todo check this link if ($link_add === true && $link_available === true) { //echo ''; } } echo '

'.get_lang('SurveyName').'	'.get_lang('Anonymous').'
'.$row['title'].'	'.$row['title'].'	'; echo ($row['anonymous'] == 1) ? get_lang('Yes') : get_lang('No'); echo '
'.get_lang('CompleteTheSurveysQuestions').'

'; } /** * Creates a multi array with the user fields that we can show. We look the visibility with the api_get_setting function * The username is always NOT able to change it. * @author Julio Montoya Armas , Chamilo: Personality Test modification * @return array[value_name][name] * array[value_name][visibilty] */ function make_field_list() { // LAST NAME and FIRST NAME $field_list_array = array(); $field_list_array['lastname']['name'] = get_lang('Lastname'); $field_list_array['firstname']['name'] = get_lang('Firstname'); if (api_get_setting('profile', 'name') != 'true') { $field_list_array['firstname']['visibility'] = 0; $field_list_array['lastname']['visibility'] = 0; } else { $field_list_array['firstname']['visibility'] = 1; $field_list_array['lastname']['visibility'] = 1; } $field_list_array['username']['name'] = get_lang('Username'); $field_list_array['username']['visibility'] = 0; // OFFICIAL CODE $field_list_array['official_code']['name'] = get_lang('OfficialCode'); if (api_get_setting('profile', 'officialcode') != 'true') { $field_list_array['official_code']['visibility'] = 1; } else { $field_list_array['official_code']['visibility'] = 0; } // EMAIL $field_list_array['email']['name'] = get_lang('Email'); if (api_get_setting('profile', 'email') != 'true') { $field_list_array['email']['visibility'] = 1; } else { $field_list_array['email']['visibility'] = 0; } // OPENID URL //$field_list_array[] = 'openid_authentication'; /* if (is_profile_editable() && api_get_setting('openid_authentication') == 'true') { $form->addElement('text', 'openid', get_lang('OpenIDURL'), array('size' => 40)); if (api_get_setting('profile', 'openid') != 'true') { $form->freeze('openid'); } $form->applyFilter('openid', 'trim'); //if (api_get_setting('registration', 'openid') == 'true') // $form->addRule('openid', get_lang('ThisFieldIsRequired'), 'required'); }*/ // PHONE $field_list_array['phone']['name'] = get_lang('Phone'); if (api_get_setting('profile', 'phone') != 'true') { $field_list_array['phone']['visibility'] = 0; } else { $field_list_array['phone']['visibility'] = 1; } // LANGUAGE $field_list_array['language']['name'] = get_lang('Language'); if (api_get_setting('profile', 'language') != 'true') { $field_list_array['language']['visibility'] = 0; } else { $field_list_array['language']['visibility'] = 1; } // EXTRA FIELDS $extra = UserManager::get_extra_fields(0, 50, 5, 'ASC'); $extra_data = UserManager::get_extra_user_data(api_get_user_id(), true); foreach ($extra as $id => $field_details) { if ($field_details[6] == 0) { continue; } switch ($field_details[2]) { case USER_FIELD_TYPE_TEXT: $field_list_array['extra_'.$field_details[1]]['name'] = $field_details[3]; if ($field_details[7] == 0) { $field_list_array['extra_'.$field_details[1]]['visibility'] = 0; } else { $field_list_array['extra_'.$field_details[1]]['visibility'] = 1; } break; case USER_FIELD_TYPE_TEXTAREA: $field_list_array['extra_'.$field_details[1]]['name'] = $field_details[3]; if ($field_details[7] == 0) { $field_list_array['extra_'.$field_details[1]]['visibility'] = 0; } else { $field_list_array['extra_'.$field_details[1]]['visibility'] = 1; } break; case USER_FIELD_TYPE_RADIO: $field_list_array['extra_'.$field_details[1]]['name'] = $field_details[3]; if ($field_details[7] == 0) { $field_list_array['extra_'.$field_details[1]]['visibility'] = 0; } else { $field_list_array['extra_'.$field_details[1]]['visibility'] = 1; } break; case USER_FIELD_TYPE_SELECT: $field_list_array['extra_'.$field_details[1]]['name'] = $field_details[3]; if ($field_details[7] == 0) { $field_list_array['extra_'.$field_details[1]]['visibility'] = 0; } else { $field_list_array['extra_'.$field_details[1]]['visibility'] = 1; } break; case USER_FIELD_TYPE_SELECT_MULTIPLE: $field_list_array['extra_'.$field_details[1]]['name'] = $field_details[3]; if ($field_details[7] == 0) { $field_list_array['extra_'.$field_details[1]]['visibility'] = 0; } else { $field_list_array['extra_'.$field_details[1]]['visibility'] = 1; } break; case USER_FIELD_TYPE_DATE: $field_list_array['extra_'.$field_details[1]]['name'] = $field_details[3]; if ($field_details[7] == 0) { $field_list_array['extra_'.$field_details[1]]['visibility'] = 0; } else { $field_list_array['extra_'.$field_details[1]]['visibility'] = 1; } break; case USER_FIELD_TYPE_DATETIME: $field_list_array['extra_'.$field_details[1]]['name'] = $field_details[3]; if ($field_details[7] == 0) { $field_list_array['extra_'.$field_details[1]]['visibility'] = 0; } else { $field_list_array['extra_'.$field_details[1]]['visibility'] = 1; } break; case USER_FIELD_TYPE_DOUBLE_SELECT: $field_list_array['extra_'.$field_details[1]]['name'] = $field_details[3]; if ($field_details[7] == 0) { $field_list_array['extra_'.$field_details[1]]['visibility'] = 0; } else { $field_list_array['extra_'.$field_details[1]]['visibility']=1; } /* foreach ($field_details[8] as $key => $element) { if ($element[2][0] == '*') { $values['*'][$element[0]] = str_replace('*','',$element[2]); } else { $values[0][$element[0]] = $element[2]; } } $group = ''; $group[] =& HTML_QuickForm::createElement('select', 'extra_'.$field_details[1], '', $values[0], ''); $group[] =& HTML_QuickForm::createElement('select', 'extra_'.$field_details[1].'*', '', $values['*'], ''); $form->addGroup($group, 'extra_'.$field_details[1], $field_details[3], ' '); if ($field_details[7] == 0) $form->freeze('extra_'.$field_details[1]); // Recoding the selected values for double : if the user has selected certain values, we have to assign them to the correct select form if (key_exists('extra_'.$field_details[1], $extra_data)) { // Exploding all the selected values (of both select forms) $selected_values = explode(';',$extra_data['extra_'.$field_details[1]]); $extra_data['extra_'.$field_details[1]] = array(); // Looping through the selected values and assigning the selected values to either the first or second select form foreach ($selected_values as $key => $selected_value) { if (key_exists($selected_value, $values[0])) { $extra_data['extra_'.$field_details[1]]['extra_'.$field_details[1]] = $selected_value; } else { $extra_data['extra_'.$field_details[1]]['extra_'.$field_details[1].'*'] = $selected_value; } } }*/ break; case USER_FIELD_TYPE_DIVIDER: //$form->addElement('static',$field_details[1], '
'.$field_details[3].''); break; } } return $field_list_array; } /** * @author Isaac Flores Paz * @param int $user_id - User ID * @param int $user_id_answer - User in survey answer table (user id or anonymus) * @return boolean */ function show_link_available($user_id, $survey_code, $user_answer) { $table_survey = Database :: get_course_table(TABLE_SURVEY); $table_survey_invitation = Database :: get_course_table(TABLE_SURVEY_INVITATION); $table_survey_answer = Database :: get_course_table(TABLE_SURVEY_ANSWER); $table_survey_question = Database :: get_course_table(TABLE_SURVEY_QUESTION); $survey_code = Database::escape_string($survey_code); $user_id = Database::escape_string($user_id); $user_answer = Database::escape_string($user_answer); $course_id = api_get_course_int_id(); $sql = 'SELECT COUNT(*) as count FROM '.$table_survey_invitation.' WHERE user='.$user_id.' AND survey_code="'.$survey_code.'" AND answered="1" AND c_id = '.$course_id.' '; $sql2 = 'SELECT COUNT(*) as count FROM '.$table_survey.' s INNER JOIN '.$table_survey_question.' q ON s.survey_id=q.survey_id WHERE s.code="'.$survey_code.'" AND q.type NOT IN("pagebreak","comment") AND s.c_id = '.$course_id.' AND q.c_id = '.$course_id.' '; $sql3 = 'SELECT COUNT(DISTINCT question_id) as count FROM '.$table_survey_answer.' WHERE survey_id=(SELECT survey_id FROM '.$table_survey.' WHERE code="'.$survey_code.'" AND c_id = '.$course_id.' ) AND user="'.$user_answer.'" AND c_id = '.$course_id.' '; $result = Database::query($sql); $result2 = Database::query($sql2); $result3 = Database::query($sql3); $row = Database::fetch_array($result, 'ASSOC'); $row2 = Database::fetch_array($result2, 'ASSOC'); $row3 = Database::fetch_array($result3, 'ASSOC'); if ($row['count'] == 1 && $row3['count'] != $row2['count']) { return true; } else { return false; } } }