';
			//print_r($data);
			//echo '
';

			// 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 option_id = '".Database::escape_string($_GET['viewoption'])."' $sql_restriction";
			$result = Database::query($sql);
			while ($row = Database::fetch_array($result)) {
				echo ''.$row['user'].'
';
			}
		}
	}

	/**
	 * 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) {
		// 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);

		// Getting the options
		$sql = "SELECT * FROM $table_survey_question_option
					WHERE 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 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_answers*100*2);
				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')).' '.get_lang('BackTo').' '.get_lang('ReportingOverview').'';
		echo ' '.get_lang('ExportAsCSV').'';
		echo ' '.get_lang('ExportAsXLS').'';
		echo '
';

		// The form
		echo '';
		echo '';
		echo '';
		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);
			$num = count($extra_user_fields);
			if ($num > 0 ) {
				echo '';
				$display_extra_user_fields = true;
			}
		}

		// 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'])."'
				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'])."'
				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 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 '			'.get_lang('ResetQuestionFilter').'';
		}
		echo '			'.get_lang('SubmitQuestionFilter').'';
		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;

		$table_survey_question = Database :: get_course_table(TABLE_SURVEY_QUESTION);
		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);
			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)
		$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);
			$num = count($extra_user_fields);
			$return .= str_repeat(';', $num);
			$display_extra_user_fields = true;
		}


		$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 "
				." WHERE questions.survey_id = '".Database::escape_string($_GET['survey_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
			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
				WHERE survey_question.survey_id = '".Database::escape_string($_GET['survey_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 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, $display_extra_user_fields);
				$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, $display_extra_user_fields); // 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 = '-';
				}
				//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);
			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 (!($_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);
			$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);

		// 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 "
				." WHERE questions.survey_id = '".Database::escape_string($_GET['survey_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
				WHERE survey_question.survey_id = '".Database::escape_string($_GET['survey_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 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, $display_extra_user_fields);
				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); // 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);
			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')).' '.get_lang('BackTo').' '.get_lang('ReportingOverview').'';
		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 '
';
		// Survey_id
		echo '';
		echo '';
		// X axis
		echo get_lang('SelectXAxis').': ';
		echo '';
		echo '---';
		foreach ($questions as $key => & $question) {
			if (is_array($allowed_question_types)) {
				if (in_array($question['type'], $allowed_question_types)) {
					echo ''.api_substr(strip_tags($question['question']), 0, 50).'';
				}
			}

		}
		echo '

';
		// Y axis
		echo get_lang('SelectYAxis').': ';
		echo '';
		echo '---';
		foreach ($questions as $key => & $question) {
			if (in_array($question['type'], $allowed_question_types)) {
				echo ''.api_substr(strip_tags($question['question']), 0, 50).'';
			}
		}
		echo '

';
		echo ''.get_lang('CompareQuestions').'';
		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) {
		// 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 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() {
		// 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.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() {
		// Database table definition
		$table_survey_invitation 		= Database :: get_course_table(TABLE_SURVEY_INVITATION);

		$sql = "SELECT count(user) AS total FROM $table_survey_invitation WHERE 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) {
		// 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 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)
		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 (user, survey_code, invitation_code, invitation_date) VALUES
							 ('".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(api_convert_encoding($invitation_text, api_get_system_encoding(), $_SESSION['oLP']->encoding), 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 = $_configuration['root_web'];
		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.$_configuration['code_append'].'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) {
		// 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 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 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_db = '') {
		// Database table definition
		if (!empty($course_db)) {
			$table_survey_invitation = Database :: get_course_table(TABLE_SURVEY_INVITATION,$course_db);
		} else {
			$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
				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) {
		// Database table definition
		$table_survey_invitation 	= Database :: get_course_table(TABLE_SURVEY_INVITATION);

		$sql = "SELECT * FROM $table_survey_invitation WHERE 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 '
'.get_lang('SearchASurvey').'
';
		echo '	

					

						'.get_lang('Title').'
					
					

						
					
				
';
		echo '	

					

						'.get_lang('Code').'
					
					

						
					
				
';
		echo '	

					

						'.get_lang('Language').'
					
					
';
		echo '			'.get_lang('All').'';
		$languages = api_get_languages();
		foreach ($languages['name'] as $index => & $name) {
			echo ''.$name.'';
		}
		echo '			';
		echo '		
				
';
		echo '';
		echo '	

					

					
					

						'.get_lang('Search').'
					
				
';
		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(6, get_lang('AvailableFrom'));
		$table->set_header(7, get_lang('AvailableUntil'));
		$table->set_header(8, get_lang('Invite'));
		$table->set_header(9, get_lang('Anonymous'));
		$table->set_header(10, get_lang('Modify'), false, 'width="150"');
		$table->set_column_filter(9, 'anonymous_filter');
		$table->set_column_filter(10, '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(6, get_lang('AvailableFrom'));
		$table->set_header(7, get_lang('AvailableUntil'));
		$table->set_header(8, get_lang('Invite'));
		$table->set_header(9, get_lang('Anonymous'));
		$table->set_header(10, get_lang('Modify'), false, 'width="130"');
		$table->set_column_filter(9, 'anonymous_filter');
		$table->set_column_filter(10, '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.gif', get_lang('Edit')).' ';
			$return .= ''.Display::return_icon('delete.gif', get_lang('Delete')).' ';
			$return .= ''.Display::return_icon('clean_group.gif', get_lang('EmptySurvey')).' ';
		}
		//$return .= ''.Display::return_icon('copy.gif', get_lang('Copy')).'';
		//$return .= ''.Display::return_icon('add.gif', get_lang('Add')).'';
		$return .= ''.Display::return_icon('preview.gif', get_lang('Preview')).' ';
		$return .= ''.Display::return_icon('survey_publish.gif', get_lang('Publish')).' ';
		$return .= ''.Display::return_icon('statistics.gif', get_lang('Reporting')).'';
		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.gif', get_lang('Preview')).' ';
		$return .= ''.Display::return_icon('survey_publish.gif', get_lang('Publish')).' ';
		$return .= ''.Display::return_icon('clean_group.gif', get_lang('EmptySurvey')).' ';
		//$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;
		$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;
	}

	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
	 * @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;
		}

		// Condition for the session
		$session_id = api_get_session_id();
		$condition_session = api_get_session_condition($session_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.lang									AS col5,
					survey.avail_from							AS col6,
					survey.avail_till							AS col7,
					CONCAT('',survey.answered,' / ',survey.invited, '')	AS col8,
					survey.anonymous							AS col9,
					survey.survey_id							AS col10,
					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
				 $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) {
		//echo '
';
		//echo '----------------';
		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);
		//echo '----------------';
		//print_r($last_version_surveys);
		$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 = '';
		}

		$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);

		//print_r($survey_tree->surveylist);

		//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.lang									AS col5,
					survey.avail_from							AS col6,
					survey.avail_till							AS col7,
					CONCAT('',survey.answered,' / ',survey.invited, '')	AS col8,
					survey.anonymous							AS col9,
					survey.survey_id							AS col10
				 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 $list_condition
				 $search_restriction
				 ";
		$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;

		// 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;
		$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 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')."'
				";
		$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 survey_id = (SELECT survey_id from $table_survey WHERE code ='".Database::escape_string($row['code'])."')";
			$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);
			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);

		$sql = 'SELECT COUNT(*) as count FROM '.$table_survey_invitation.' WHERE user='.$user_id.' AND survey_code="'.$survey_code.'" AND answered="1"';
		$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")';
		$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 user="'.$user_answer.'" ';

		$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;
		}
	}
}