You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
774 lines
43 KiB
774 lines
43 KiB
<?php
|
|
/* For licensing terms, see /license.txt */
|
|
|
|
/**
|
|
* This script displays statistics on the current learning path (scorm)
|
|
*
|
|
* This script must be included by lp_controller.php to get basic initialisation
|
|
* @package chamilo.learnpath
|
|
* @author Yannick Warnier <ywarnier@beeznest.org>
|
|
*/
|
|
|
|
require_once 'learnpath.class.php';
|
|
//require_once 'scorm.class.php';
|
|
require_once 'resourcelinker.inc.php';
|
|
require_once api_get_path(LIBRARY_PATH).'tracking.lib.php';
|
|
require_once api_get_path(LIBRARY_PATH).'course.lib.php';
|
|
require_once '../exercice/exercise.lib.php';
|
|
|
|
if (empty($_SESSION['_course']['id']) && isset($_GET['course'])) {
|
|
$course_code = Security::remove_XSS($_GET['course']);
|
|
} else {
|
|
$course_code = $_SESSION['_course']['id'];
|
|
}
|
|
|
|
if (isset($_GET['student_id'])) {
|
|
$student_id = intval($_GET['student_id']);
|
|
}
|
|
$session_id = api_get_session_id();
|
|
$session_condition = api_get_session_condition($session_id);
|
|
//The two following variables have to be declared by the includer script
|
|
//$lp_id = $_SESSION['oLP']->get_id();
|
|
//$list = $_SESSION['oLP']->get_flat_ordered_items_list($lp_id);
|
|
//$user_id = $_user['user_id'];
|
|
|
|
if (!isset($origin))
|
|
$origin = '';
|
|
if ($origin != 'tracking') {
|
|
//$w = $tablewidth -20;
|
|
$htmlHeadXtra[] = '<style type="text/css" media="screen, projection">
|
|
/*<![CDATA[*/
|
|
@import "../css/public_admin/scorm.css";
|
|
/*]]>*/
|
|
</style>';
|
|
include_once api_get_path(INCLUDE_PATH).'reduced_header.inc.php';
|
|
echo '<body dir="'.api_get_text_direction().'">';
|
|
}
|
|
|
|
$output = '';
|
|
// if display in fullscreen required.
|
|
if (!empty($_GET['fs']) && strcmp($_GET['fs'], 'true') == 0) {
|
|
$output .= '<table width="100%" align="center">';
|
|
} else {
|
|
$output .= '<table width="100%">';
|
|
}
|
|
|
|
// Check if the user asked for the "extend all" option.
|
|
$extend_all_link = '';
|
|
$extend_all = 0;
|
|
if ($origin == 'tracking') {
|
|
$url_suffix = '&session_id='.$session_id.'&course=' . Security::remove_XSS($_GET['course']) . '&student_id=' . $student_id . '&lp_id=' . Security::remove_XSS($_GET['lp_id']) . '&origin=' . Security::remove_XSS($_GET['origin']).$from_link;
|
|
} else {
|
|
$url_suffix = '';
|
|
}
|
|
|
|
if (!empty ($_GET['extend_all'])) {
|
|
$extend_all_link = '<a href="' . api_get_self() . '?action=stats' . $url_suffix . '"><img src="../img/view_less_stats.gif" alt="fold_view" border="0" title="'.get_lang('HideAllAttempts').'"></a>';
|
|
$extend_all = 1;
|
|
} else {
|
|
$extend_all_link = '<a href="' . api_get_self() . '?action=stats&extend_all=1' . $url_suffix . '"><img src="../img/view_more_stats.gif" alt="extend_view" border="0" title="'.get_lang('ShowAllAttempts').'"></a>';
|
|
}
|
|
|
|
if ($origin != 'tracking') {
|
|
$output .= "<tr><td><h2>" . get_lang('ScormMystatus') . "</h2></td></tr>";
|
|
}
|
|
$output .= "<tr><td> </td></tr>" . "<tr><td>" . "<table border='0' class='data_table'><tr>\n" . '<td width="16">' . $extend_all_link . '</td>' . '<td colspan="4" class="title"><div class="mystatusfirstrow">' . get_lang('ScormLessonTitle') . "</div></td>\n" . '<td colspan="2" class="title"><div class="mystatusfirstrow">' . get_lang('ScormStatus') . "</div></td>\n" . '<td colspan="2" class="title"><div class="mystatusfirstrow">' . get_lang('ScormScore') . "</div></td>\n" . '<td colspan="2" class="title"><div class="mystatusfirstrow">' . get_lang('ScormTime') . "</div></td><td class='title'><div class='mystatusfirstrow'>" .get_lang('Actions') . "</div></td></tr>\n";
|
|
|
|
// Going through the items using the $items[] array instead of the database order ensures
|
|
// we get them in the same order as in the imsmanifest file, which is rather random when using
|
|
// the database table.
|
|
$TBL_LP_ITEM = Database :: get_course_table(TABLE_LP_ITEM);
|
|
$TBL_LP_ITEM_VIEW = Database :: get_course_table(TABLE_LP_ITEM_VIEW);
|
|
$TBL_LP_VIEW = Database :: get_course_table(TABLE_LP_VIEW);
|
|
$tbl_stats_exercices = Database :: get_statistic_table(TABLE_STATISTIC_TRACK_E_EXERCICES);
|
|
$tbl_stats_attempts= Database :: get_statistic_table(TABLE_STATISTIC_TRACK_E_ATTEMPT);
|
|
$tbl_quiz_questions= Database :: get_course_table(TABLE_QUIZ_QUESTION);
|
|
$sql = "SELECT max(view_count) FROM $TBL_LP_VIEW " .
|
|
"WHERE lp_id = $lp_id AND user_id = '" . $user_id . "' $session_condition";
|
|
$res = Database::query($sql);
|
|
$view = '';
|
|
$num = 0;
|
|
if (Database :: num_rows($res) > 0) {
|
|
$myrow = Database :: fetch_array($res);
|
|
$view = $myrow[0];
|
|
}
|
|
|
|
$counter = 0;
|
|
//error_log('New LP - Querying views for latest attempt: '.$sql, 0);
|
|
$total_score = 0;
|
|
$total_max_score = 0;
|
|
$total_time = 0;
|
|
$h = get_lang('h');
|
|
|
|
if (!empty($export_csv)) {
|
|
$csv_content[] = array (
|
|
get_lang('ScormLessonTitle'),
|
|
get_lang('ScormStatus'),
|
|
get_lang('ScormScore'),
|
|
get_lang('ScormTime')
|
|
);
|
|
}
|
|
|
|
// Get attempts of a exercise.
|
|
if (isset($_GET['lp_id']) && isset($_GET['my_lp_id'])) {
|
|
$clean_lp_item_id = Database::escape_string($_GET['my_lp_id']);
|
|
$clean_lp_id = Database::escape_string($_GET['lp_id']);
|
|
$clean_course_code = Database :: escape_string($course_code);
|
|
$sql_path = "SELECT path FROM $TBL_LP_ITEM WHERE id = '$clean_lp_item_id' AND lp_id = '$clean_lp_id'";
|
|
$res_path = Database::query($sql_path);
|
|
$row_path = Database::fetch_array($res_path);
|
|
|
|
if (Database::num_rows($res_path) > 0) {
|
|
if ($origin != 'tracking') {
|
|
$sql_attempts = 'SELECT * FROM ' . $tbl_stats_exercices . ' WHERE exe_exo_id="' . (int)$row_path['path'] . '" AND status <> "incomplete" AND exe_user_id="' . (int)api_get_user_id() . '" AND orig_lp_id = "'.(int)$clean_lp_id.'" AND orig_lp_item_id = "'.(int)$clean_lp_item_id.'" AND exe_cours_id="' . $clean_course_code. '" AND session_id = '.$session_id.' ORDER BY exe_date';
|
|
} else {
|
|
$sql_attempts = 'SELECT * FROM ' . $tbl_stats_exercices . ' WHERE exe_exo_id="' . (int)$row_path['path'] . '" AND status <> "incomplete" AND exe_user_id="' . $student_id . '" AND orig_lp_id = "'.(int)$clean_lp_id.'" AND orig_lp_item_id = "'.(int)$clean_lp_item_id.'" AND exe_cours_id="' . $clean_course_code. '" AND session_id = '.$session_id.' ORDER BY exe_date';
|
|
}
|
|
$sql_attempts;
|
|
}
|
|
}
|
|
|
|
$TBL_QUIZ = Database :: get_course_table(TABLE_QUIZ_TEST);
|
|
|
|
if (is_array($list) && count($list) > 0) {
|
|
foreach ($list as $my_item_id) {
|
|
$extend_this = 0;
|
|
$qry_order = 'DESC';
|
|
if ((!empty ($_GET['extend_id']) && $_GET['extend_id'] == $my_item_id) || $extend_all) {
|
|
$extend_this = 1;
|
|
$qry_order = 'ASC';
|
|
}
|
|
|
|
// Prepare statement to go through each attempt.
|
|
if (!empty ($view)) {
|
|
$sql = "SELECT iv.status as mystatus, v.view_count as mycount, " .
|
|
" iv.score as myscore, iv.total_time as mytime, i.id as myid, i.lp_id as mylpid, iv.lp_view_id as mylpviewid, " .
|
|
" i.title as mytitle, i.max_score as mymaxscore, " .
|
|
" iv.max_score as myviewmaxscore, " .
|
|
" i.item_type as item_type, iv.view_count as iv_view_count, " .
|
|
" iv.id as iv_id, path as path" .
|
|
" FROM $TBL_LP_ITEM as i, $TBL_LP_ITEM_VIEW as iv, $TBL_LP_VIEW as v" .
|
|
" WHERE i.id = iv.lp_item_id " .
|
|
" AND i.id = $my_item_id " .
|
|
" AND iv.lp_view_id = v.id " .
|
|
" AND i.lp_id = $lp_id " .
|
|
" AND v.user_id = " . $user_id . " " .
|
|
" AND v.view_count = $view " .
|
|
" AND v.session_id = $session_id " .
|
|
" ORDER BY iv.view_count $qry_order ";
|
|
} else {
|
|
$sql = "SELECT iv.status as mystatus, v.view_count as mycount, " .
|
|
" iv.score as myscore, iv.total_time as mytime, i.id as myid, i.lp_id as mylpid, iv.lp_view_id as mylpviewid, " .
|
|
" i.title as mytitle, i.max_score as mymaxscore, " .
|
|
" iv.max_score as myviewmaxscore, " .
|
|
" i.item_type as item_type, iv.view_count as iv_view_count, " .
|
|
" iv.id as iv_id, path as path " .
|
|
" FROM $TBL_LP_ITEM as i, $TBL_LP_ITEM_VIEW as iv, $TBL_LP_VIEW as v " .
|
|
" WHERE i.id = iv.lp_item_id " .
|
|
" AND i.id = $my_item_id " .
|
|
" AND iv.lp_view_id = v.id " .
|
|
" AND i.lp_id = $lp_id " .
|
|
" AND v.user_id = " . $user_id . " " .
|
|
" AND v.session_id = $session_id " .
|
|
" ORDER BY iv.view_count $qry_order ";
|
|
}
|
|
//echo $sql.'<br />';
|
|
$result = Database::query($sql);
|
|
$num = Database :: num_rows($result);
|
|
$time_for_total = 'NaN';
|
|
|
|
$is_allowed_to_edit = api_is_allowed_to_edit(null, true);
|
|
|
|
if (($extend_this || $extend_all) && $num > 0) {
|
|
$row = Database :: fetch_array($result);
|
|
$result_disabled_ext_all = false;
|
|
if ($row['item_type'] == 'quiz') {
|
|
// Check results_disabled in quiz table.
|
|
$my_path = Database::escape_string($row['path']);
|
|
|
|
$sql = "SELECT results_disabled FROM $TBL_QUIZ WHERE id ='".(int)$my_path."'";
|
|
$res_result_disabled = Database::query($sql);
|
|
$row_result_disabled = Database::fetch_row($res_result_disabled);
|
|
|
|
if (Database::num_rows($res_result_disabled) > 0 && (int)$row_result_disabled[0] === 1) {
|
|
$result_disabled_ext_all = true;
|
|
}
|
|
}
|
|
|
|
//echo '<br /><pre>'; print_r($row); echo '</pre><br />';
|
|
// If there are several attempts, and the link to extend has been clicked, show each attempt...
|
|
if (($counter % 2) == 0) {
|
|
$oddclass = 'row_odd';
|
|
} else {
|
|
$oddclass = 'row_even';
|
|
}
|
|
$extend_link = '';
|
|
if (!empty($inter_num)) {
|
|
$extend_link = '<a href="' . api_get_self() . '?action=stats&fold_id=' . $my_item_id . $url_suffix . '"><img src="../img/visible.gif" alt="'.get_lang('HideAttemptView').'" title="'.get_lang('HideAttemptView').'" border="0"></a>' . "\n";
|
|
}
|
|
$title = $row['mytitle'];
|
|
|
|
if (empty ($title)) {
|
|
$title = rl_get_resource_name(api_get_course_id(), $lp_id, $row['myid']);
|
|
}
|
|
|
|
if ($row['item_type'] != 'dokeos_chapter') {
|
|
$correct_test_link = '-';
|
|
$title = Security::remove_XSS($title);
|
|
$output .= "<tr class='$oddclass'>\n" . "<td>$extend_link</td>\n" . '<td colspan="4" class="content"><div class="mystatus">' . $title . "</div></td>\n" . '<td colspan="2" class="content"></td>' . "\n" . '<td colspan="2" class="content"></td>' . "\n" . '<td colspan="2" class="content"></td><td class="content"></td>' . "\n" . "</tr>\n";
|
|
}
|
|
|
|
$counter++;
|
|
|
|
do {
|
|
$row['iv_view_count'];
|
|
// Check if there are interactions below.
|
|
$extend_attempt_link = '';
|
|
$extend_this_attempt = 0;
|
|
if ((learnpath :: get_interactions_count_from_db($row['iv_id']) > 0 || learnpath :: get_objectives_count_from_db($row['iv_id']) > 0) && !$extend_all) {
|
|
if (!empty ($_GET['extend_attempt_id']) && $_GET['extend_attempt_id'] == $row['iv_id']) {
|
|
// The extend button for this attempt has been clicked.
|
|
$extend_this_attempt = 1;
|
|
$extend_attempt_link = '<a href="' . api_get_self() . '?action=stats&extend_id=' . $my_item_id . '&fold_attempt_id=' . $row['iv_id'] . $url_suffix . '"><img src="../img/visible.gif" alt="'.get_lang('HideAttemptView').'" title="'.get_lang('HideAttemptView').'" border="0"></a>' . "\n";
|
|
} else { // Same case if fold_attempt_id is set, so not implemented explicitly.
|
|
// The extend button for this attempt has not been clicked.
|
|
$extend_attempt_link = '<a href="' . api_get_self() . '?action=stats&extend_id=' . $my_item_id . '&extend_attempt_id=' . $row['iv_id'] . $url_suffix . '"><img src="../img/invisible.gif" alt="'.get_lang('ExtendAttemptView').'" title="'.get_lang('ExtendAttemptView').'" border="0"></a>' . "\n";
|
|
}
|
|
}
|
|
|
|
if (($counter % 2) == 0) {
|
|
$oddclass = 'row_odd';
|
|
} else {
|
|
$oddclass = 'row_even';
|
|
}
|
|
$lesson_status = $row['mystatus'];
|
|
$score = $row['myscore'];
|
|
$time_for_total = $row['mytime'];
|
|
$time = learnpathItem :: get_scorm_time('js', $row['mytime']);
|
|
$type;
|
|
$scoIdentifier = $row['myid'];
|
|
if ($score == 0) {
|
|
$maxscore = $row['mymaxscore'];
|
|
} else {
|
|
if ($row['item_type'] == 'sco') {
|
|
|
|
if (!empty ($row['myviewmaxscore']) && $row['myviewmaxscore'] > 0) {
|
|
$maxscore = $row['myviewmaxscore'];
|
|
}
|
|
elseif ($row['myviewmaxscore'] === '') {
|
|
$maxscore = 0;
|
|
} else {
|
|
$maxscore = $row['mymaxscore'];
|
|
}
|
|
} else {
|
|
$maxscore = $row['mymaxscore'];
|
|
}
|
|
}
|
|
// Remove "NaN" if any (@todo: locate the source of these NaN)
|
|
$time = str_replace('NaN', '00' . $h . '00\'00"', $time);
|
|
if (($lesson_status == 'completed') || ($lesson_status == 'passed')) {
|
|
$color = 'green';
|
|
} else {
|
|
$color = 'black';
|
|
}
|
|
$mylanglist = array (
|
|
'completed' => 'ScormCompstatus',
|
|
'incomplete' => 'ScormIncomplete',
|
|
'failed' => 'ScormFailed',
|
|
'passed' => 'ScormPassed',
|
|
'browsed' => 'ScormBrowsed',
|
|
'not attempted' => 'ScormNotAttempted'
|
|
);
|
|
|
|
$my_lesson_status = get_lang($mylanglist[$lesson_status]);
|
|
|
|
if ($row['item_type'] != 'dokeos_chapter') {
|
|
if (!$is_allowed_to_edit && $result_disabled_ext_all) {
|
|
$view_score = Display::return_icon('invisible.gif', get_lang('ResultsHiddenByExerciseSetting'));
|
|
} else {
|
|
//$view_score = ($score == 0 ? '/' : ($maxscore === 0 ? $score : $score . '/' . float_format($maxscore, 1)));
|
|
$view_score = show_score($score, $maxscore, false);
|
|
}
|
|
$output .= "<tr class='$oddclass'>\n" . "<td></td>\n" . "<td>$extend_attempt_link</td>\n" . '<td colspan="3">' . get_lang('Attempt') . ' ' . $row['iv_view_count'] . "</td>\n"
|
|
. '<td colspan="2"><font color="' . $color . '"><div class="mystatus">' . $my_lesson_status . "</div></font></td>\n" . '<td colspan="2"><div class="mystatus" align="center">' . $view_score . "</div></td>\n" . '<td colspan="2"><div class="mystatus">'.$time.'</div></td><td></td></tr>';
|
|
|
|
if (!empty($export_csv)) {
|
|
$temp = array ();
|
|
$temp[] = $title = Security::remove_XSS($title);
|
|
$temp[] = Security::remove_XSS($my_lesson_status);
|
|
|
|
if ($row['item_type'] == 'quiz') {
|
|
if (!$is_allowed_to_edit && $result_disabled_ext_all) {
|
|
$temp[] = '/';
|
|
} else {
|
|
$temp[] = ($score == 0 ? '0/'.$maxscore : ($maxscore == 0 ? $score : $score . '/' . float_format($maxscore, 1)));
|
|
}
|
|
|
|
} else {
|
|
$temp[] = ($score == 0 ? '/' : ($maxscore == 0 ? $score : $score . '/' . float_format($maxscore, 1)));
|
|
}
|
|
$temp[] = $time;
|
|
$csv_content[] = $temp;
|
|
}
|
|
}
|
|
|
|
$counter++;
|
|
|
|
if ($extend_this_attempt OR $extend_all) {
|
|
$list1 = learnpath :: get_iv_interactions_array($row['iv_id']);
|
|
foreach ($list1 as $id => $interaction) {
|
|
if (($counter % 2) == 0) {
|
|
$oddclass = 'row_odd';
|
|
} else {
|
|
$oddclass = 'row_even';
|
|
}
|
|
$student_response = urldecode($interaction['student_response']); // Code added by Isaac Flores.
|
|
$content_student_response = array();
|
|
$content_student_response = explode('__|',$student_response);
|
|
|
|
if (count($content_student_response)>0) {
|
|
if (count($content_student_response) >= 3) {
|
|
$new_content_student_response = array_pop($content_student_response); // Pop the element off the end of array.
|
|
}
|
|
$student_response = implode(',',$content_student_response);
|
|
}
|
|
$output .= "<tr class='$oddclass'>\n" . '<td></td>' . "\n" . '<td></td>' . "\n" . '<td> </td>' . "\n" . '<td>' . $interaction['order_id'] . '</td>' . "\n" . '<td>' . $interaction['id'] . '</td>' . "\n"
|
|
. '<td colspan="2">' . $interaction['type'] . "</td>\n"
|
|
. '<td>' . $student_response . "</td>\n" . '<td>' . $interaction['result'] . "</td>\n" . '<td>' . $interaction['latency'] . "</td>\n" . '<td>' . $interaction['time'] . "</td>\n<td></td>\n</tr>\n";
|
|
$counter++;
|
|
}
|
|
$list2 = learnpath :: get_iv_objectives_array($row['iv_id']);
|
|
foreach ($list2 as $id => $interaction) {
|
|
if (($counter % 2) == 0) {
|
|
$oddclass = 'row_odd';
|
|
} else {
|
|
$oddclass = 'row_even';
|
|
}
|
|
$output .= "<tr class='$oddclass'>\n" . '<td></td>' . "\n" . '<td></td>' . "\n" . '<td> </td>' . "\n" . '<td>' . $interaction['order_id'] . '</td>' . "\n" . '<td colspan="2">' . $interaction['objective_id'] . '</td>' . "\n" .
|
|
'<td colspan="2">' . $interaction['status'] . "</td>\n" .
|
|
'<td>' . $interaction['score_raw'] . "</td>\n" . '<td>' . $interaction['score_max'] . "</td>\n" . '<td>' . $interaction['score_min'] . "</td>\n<td></td>\n</tr>\n";
|
|
$counter++;
|
|
}
|
|
}
|
|
} while ($row = Database :: fetch_array($result));
|
|
|
|
} elseif ($num > 0) {
|
|
$row = Database :: fetch_array($result);
|
|
$my_id = $row['myid'];
|
|
$my_lp_id = $row['mylpid'];
|
|
$my_lp_view_id = $row['mylpviewid'];
|
|
$my_path = $row['path'];
|
|
|
|
$result_disabled_ext_all = false;
|
|
|
|
if ($row['item_type'] == 'quiz') {
|
|
// Check results_disabled in quiz table.
|
|
$my_path = Database::escape_string($my_path);
|
|
|
|
$sql = "SELECT results_disabled FROM $TBL_QUIZ WHERE id ='".(int)$my_path."'";
|
|
$res_result_disabled = Database::query($sql);
|
|
$row_result_disabled = Database::fetch_row($res_result_disabled);
|
|
|
|
if (Database::num_rows($res_result_disabled) > 0 && (int)$row_result_disabled[0] === 1) {
|
|
$result_disabled_ext_all = true;
|
|
}
|
|
}
|
|
|
|
// Check if there are interactions below.
|
|
$extend_attempt_link = '';
|
|
$extend_this_attempt = 0;
|
|
$inter_num = learnpath :: get_interactions_count_from_db($row['iv_id']);
|
|
$objec_num = learnpath :: get_objectives_count_from_db($row['iv_id']);
|
|
if (($inter_num > 0 || $objec_num > 0) && !$extend_all) {
|
|
if (!empty ($_GET['extend_attempt_id']) && $_GET['extend_attempt_id'] == $row['iv_id']) {
|
|
// The extend button for this attempt has been clicked.
|
|
$extend_this_attempt = 1;
|
|
$extend_attempt_link = '<a href="' . api_get_self() . '?action=stats&extend_id=' . $my_item_id . '&fold_attempt_id=' . $row['iv_id'] . $url_suffix . '"><img src="../img/visible.gif" alt="'.get_lang('HideAttemptView').'" title="'.get_lang('HideAttemptView').'" border="0"></a>' . "\n";
|
|
} else { // Same case if fold_attempt_id is set, so not implemented explicitly.
|
|
// The extend button for this attempt has not been clicked.
|
|
$extend_attempt_link = '<a href="' . api_get_self() . '?action=stats&extend_id=' . $my_item_id . '&extend_attempt_id=' . $row['iv_id'] . $url_suffix . '"><img src="../img/invisible.gif" alt="'.get_lang('ExtendAttemptView').'" title="'.get_lang('ExtendAttemptView').'" border="0"></a>' . "\n";
|
|
}
|
|
}
|
|
|
|
if (($counter % 2) == 0) {
|
|
$oddclass = 'row_odd';
|
|
} else {
|
|
$oddclass = 'row_even';
|
|
}
|
|
//$extend_link = '<img src="../img/invisible.gif" alt="extend_disabled">';
|
|
$extend_link = '';
|
|
if ($inter_num > 1) {
|
|
$extend_link = '<a href="' . api_get_self() . '?action=stats&extend_id=' . $my_item_id . '&extend_attempt_id=' . $row['iv_id'] . $url_suffix . '"><img src="../img/invisible.gif" alt="'.get_lang('ExtendAttemptView').'" title="'.get_lang('ExtendAttemptView').'" border="0"></a>';
|
|
}
|
|
if (($counter % 2) == 0) {
|
|
$oddclass = 'row_odd';
|
|
} else {
|
|
$oddclass = 'row_even';
|
|
}
|
|
$lesson_status = $row['mystatus'];
|
|
$score = $row['myscore'];
|
|
$subtotal_time = $row['mytime'];
|
|
//if ($row['mytime'] == 0) {
|
|
while ($tmp_row = Database :: fetch_array($result)) {
|
|
$subtotal_time += $tmp_row['mytime'];
|
|
}
|
|
//}
|
|
//$time_for_total = $subtotal_time;
|
|
//$time = learnpathItem :: get_scorm_time('js', $subtotal_time);
|
|
$scoIdentifier = $row['myid'];
|
|
$title = $row['mytitle'];
|
|
|
|
// Selecting the exe_id from stats attempts tables in order to look the max score value.
|
|
if ($origin != 'tracking') {
|
|
$sql_last_attempt = 'SELECT * FROM ' . $tbl_stats_exercices . ' WHERE exe_exo_id="' . $row['path'] . '" AND exe_user_id="' . api_get_user_id() . '" AND orig_lp_id = "'.$lp_id.'" AND orig_lp_item_id = "'.$row['myid'].'" AND exe_cours_id="' . $course_code . '" AND status <> "incomplete" AND session_id = '.$session_id.' ORDER BY exe_date DESC limit 1';
|
|
} else {
|
|
$sql_last_attempt = 'SELECT * FROM ' . $tbl_stats_exercices . ' WHERE exe_exo_id="' . $row['path'] . '" AND exe_user_id="' . $student_id . '" AND orig_lp_id = "'.$lp_id.'" AND orig_lp_item_id = "'.$row['myid'].'" AND exe_cours_id="' . $course_code . '" AND status <> "incomplete" AND session_id = '.$session_id.' ORDER BY exe_date DESC limit 1';
|
|
}
|
|
|
|
$resultLastAttempt = Database::query($sql_last_attempt);
|
|
$num = Database :: num_rows($resultLastAttempt);
|
|
if ($num > 0) {
|
|
while ($rowLA = Database :: fetch_array($resultLastAttempt)) {
|
|
$id_last_attempt = $rowLA['exe_id'];
|
|
}
|
|
}
|
|
|
|
if ($score == 0) {
|
|
$maxscore = $row['mymaxscore'];
|
|
} else {
|
|
if ($row['item_type'] == 'sco') {
|
|
if (!empty ($row['myviewmaxscore']) and $row['myviewmaxscore'] > 0) {
|
|
$maxscore = $row['myviewmaxscore'];
|
|
}
|
|
elseif ($row['myviewmaxscore'] === '') {
|
|
$maxscore = 0;
|
|
} else {
|
|
$maxscore = $row['mymaxscore'];
|
|
}
|
|
} else {
|
|
if ($row['item_type'] == 'quiz') {
|
|
// Get score and total time from last attempt of a exercise en lp.
|
|
$sql = "SELECT score FROM $TBL_LP_ITEM_VIEW WHERE lp_item_id = '".(int)$my_id."' and lp_view_id = '".(int)$my_lp_view_id."'
|
|
ORDER BY view_count DESC limit 1";
|
|
$res_score = Database::query($sql);
|
|
$row_score = Database::fetch_array($res_score);
|
|
|
|
$sql = "SELECT SUM(total_time) as total_time FROM $TBL_LP_ITEM_VIEW WHERE lp_item_id = '".(int)$my_id."' and lp_view_id = '".(int)$my_lp_view_id."'";
|
|
$res_time = Database::query($sql);
|
|
$row_time = Database::fetch_array($res_time);
|
|
|
|
if (Database::num_rows($res_score) > 0 && Database::num_rows($res_time) > 0) {
|
|
$score = (float)$row_score['score'];
|
|
$subtotal_time = (int)$row_time['total_time'];
|
|
} else {
|
|
$score = 0;
|
|
$subtotal_time = 0;
|
|
}
|
|
//echo $subtotal_time ;
|
|
//$time = learnpathItem :: get_scorm_time('js', $subtotal_time);
|
|
// Selecting the max score from an attempt.
|
|
$sql = "SELECT SUM(t.ponderation) as maxscore from ( SELECT distinct question_id, marks,ponderation FROM $tbl_stats_attempts as at " .
|
|
"INNER JOIN $tbl_quiz_questions as q on(q.id = at.question_id) where exe_id ='$id_last_attempt' ) as t";
|
|
|
|
$result = Database::query($sql);
|
|
$row_max_score = Database :: fetch_array($result);
|
|
$maxscore = $row_max_score['maxscore'];
|
|
} else {
|
|
$maxscore = $row['mymaxscore'];
|
|
}
|
|
}
|
|
}
|
|
$time_for_total = $subtotal_time;
|
|
//$subtotal_time.' - ';
|
|
$time = learnpathItem :: get_scorm_time('js', $subtotal_time);
|
|
//var_dump($time );
|
|
if (empty ($title)) {
|
|
$title = rl_get_resource_name(api_get_course_id(), $lp_id, $row['myid']);
|
|
}
|
|
// Remove "NaN" if any (@todo: locate the source of these NaN)
|
|
//$time = str_replace('NaN', '00'.$h.'00\'00"', $time);
|
|
|
|
if (($lesson_status == 'completed') or ($lesson_status == 'passed')) {
|
|
$color = 'green';
|
|
} else {
|
|
$color = 'black';
|
|
}
|
|
$mylanglist = array (
|
|
'completed' => 'ScormCompstatus',
|
|
'incomplete' => 'ScormIncomplete',
|
|
'failed' => 'ScormFailed',
|
|
'passed' => 'ScormPassed',
|
|
'browsed' => 'ScormBrowsed',
|
|
'not attempted' => 'ScormNotAttempted',
|
|
|
|
);
|
|
$my_lesson_status = get_lang($mylanglist[$lesson_status]);
|
|
|
|
if ($row['item_type'] != 'dokeos_chapter') {
|
|
if ($row['item_type'] == 'quiz') {
|
|
$correct_test_link = '';
|
|
$my_url_suffix ='';
|
|
if ($origin != 'tracking' && $origin != 'tracking_course') {
|
|
$my_url_suffix = '&course=' . api_get_course_id() . '&student_id=' . api_get_user_id() . '&lp_id=' . Security::remove_XSS($row['mylpid']);
|
|
$sql_last_attempt = 'SELECT * FROM ' . $tbl_stats_exercices . ' WHERE exe_exo_id="' . $row['path'] . '" AND exe_user_id="' . api_get_user_id() . '" AND orig_lp_id = "'.$lp_id.'" AND orig_lp_item_id = "'.$row['myid'].'" AND exe_cours_id="' . $course_code . '" AND status <> "incomplete" AND session_id = '.$session_id.' ORDER BY exe_date DESC ';
|
|
} else {
|
|
$my_url_suffix = '&course=' . Security::remove_XSS($_GET['course']) . '&student_id=' . $student_id . '&lp_id=' . Security::remove_XSS($row['mylpid']).'&origin=' . Security::remove_XSS($_GET['origin'].$from_link);
|
|
$sql_last_attempt = 'SELECT * FROM ' . $tbl_stats_exercices . ' WHERE exe_exo_id="' . $row['path'] . '" AND exe_user_id="' . $student_id . '" AND orig_lp_id = "'.$lp_id.'" AND orig_lp_item_id = "'.$row['myid'].'" AND exe_cours_id="' . Database :: escape_string($_GET['course']) . '" AND status <> "incomplete" AND session_id = '.$session_id.' ORDER BY exe_date DESC ';
|
|
}
|
|
|
|
$resultLastAttempt = Database::query($sql_last_attempt);
|
|
$num = Database :: num_rows($resultLastAttempt);
|
|
if ($num > 0) {
|
|
if (isset($_GET['extend_attempt']) && $_GET['extend_attempt'] == 1 && (isset($_GET['lp_id']) && $_GET['lp_id'] == $my_lp_id) && (isset($_GET['my_lp_id']) && $_GET['my_lp_id'] == $my_id) ) {
|
|
$correct_test_link = '<a href="' . api_get_self() . '?action=stats' . $my_url_suffix . '&session_id='.api_get_session_id().'&my_ext_lp_id='.$my_id.'"><img src="../img/view_less_stats.gif" alt="fold_view" border="0" title="'.get_lang('HideAllAttempts').'"></a>';
|
|
$extend_attempt = 1;
|
|
} else {
|
|
$correct_test_link = '<a href="' . api_get_self() . '?action=stats&extend_attempt=1'.$my_url_suffix.'&session_id='.api_get_session_id().'&my_lp_id='.$my_id.'"><img src="../img/view_more_stats.gif" alt="extend_view" border="0" title="'.get_lang('ShowAllAttemptsByExercise').'"></a>';
|
|
}
|
|
} else {
|
|
$correct_test_link = '-';
|
|
}
|
|
} else {
|
|
$correct_test_link = '-';
|
|
}
|
|
|
|
$title = Security::remove_XSS($title);
|
|
if ( (isset($_GET['lp_id']) && $_GET['lp_id'] == $my_lp_id ) && (isset($_GET['my_lp_id']) && $_GET['my_lp_id'] == $my_id)) {
|
|
$output .= "<tr class='$oddclass' >\n" . "<td>$extend_link</td>\n" . '<td colspan="4"><div class="mystatus">' .$title. '</div></td>' . "\n";
|
|
$output .= '<td colspan="2"> </td><td colspan="2"> </td><td colspan="2"> </td><td>'.$correct_test_link.'</td></tr>';
|
|
$output .= "</tr>\n";
|
|
} else {
|
|
if ( (isset($_GET['lp_id']) && $_GET['lp_id'] == $my_lp_id ) && (isset($_GET['my_ext_lp_id']) && $_GET['my_ext_lp_id'] == $my_id)) {
|
|
$output .= "<tr class='$oddclass' >\n";
|
|
} else {
|
|
$output .= "<tr class='$oddclass'>\n";
|
|
}
|
|
$output .= "<td>$extend_link</td>\n" . '<td colspan="4"><div class="mystatus">' .$title. '</div></td>' . "\n";
|
|
$output .= '<td colspan="2"><font color="' . $color . '"><div class="mystatus">' . $my_lesson_status . "</div></font></td>\n" . '<td colspan="2"><div class="mystatus" align="center">';
|
|
if ($row['item_type'] == 'quiz') {
|
|
if (!$is_allowed_to_edit && $result_disabled_ext_all) {
|
|
$output .= Display::return_icon('invisible.gif', get_lang('ResultsHiddenByExerciseSetting'));
|
|
} else {
|
|
// $output .= ($score == 0 ? '0/'.float_format($maxscore, 1) : ($maxscore == 0 ? $score : float_format($score, 1) . '/' . float_format($maxscore, 1)));
|
|
$output .= show_score($score, $maxscore, false);
|
|
}
|
|
} else {
|
|
$output .= ($score == 0 ? '/' : ($maxscore == 0 ? $score : $score . '/' . $maxscore));
|
|
}
|
|
$output .= "</div></td>\n" . '<td colspan="2"><div class="mystatus">' . $time . "</div></td><td>$correct_test_link</td>\n";
|
|
$output .= "</tr>\n";
|
|
}
|
|
|
|
if (!empty($export_csv)) {
|
|
$temp = array ();
|
|
$temp[] = api_html_entity_decode($title, ENT_QUOTES);
|
|
$temp[] = api_html_entity_decode($my_lesson_status, ENT_QUOTES);
|
|
|
|
if ($row['item_type'] == 'quiz') {
|
|
|
|
if (!$is_allowed_to_edit && $result_disabled_ext_all) {
|
|
$temp[] = '/';
|
|
} else {
|
|
$temp[] = ($score == 0 ? '0/'.$maxscore : ($maxscore == 0 ? $score : $score . '/' . float_format($maxscore, 1)));
|
|
}
|
|
|
|
} else {
|
|
$temp[] = ($score == 0 ? '/' : ($maxscore == 0 ? $score : $score . '/' . float_format($maxscore, 1)));
|
|
}
|
|
$temp[] = $time;
|
|
$csv_content[] = $temp;
|
|
}
|
|
}
|
|
|
|
$counter++;
|
|
if ($extend_this_attempt OR $extend_all) {
|
|
$list1 = learnpath :: get_iv_interactions_array($row['iv_id']);
|
|
foreach ($list1 as $id => $interaction) {
|
|
if (($counter % 2) == 0) {
|
|
$oddclass = 'row_odd';
|
|
} else {
|
|
$oddclass = 'row_even';
|
|
}
|
|
$output .= "<tr class='$oddclass'>\n" . '<td></td>' . "\n" . '<td></td>' . "\n" . '<td> </td>' . "\n" . '<td>' . $interaction['order_id'] . '</td>' . "\n" . '<td>' . $interaction['id'] . '</td>' . "\n"
|
|
. '<td colspan="2">' . $interaction['type'] . "</td>\n"
|
|
. '<td>' . urldecode($interaction['student_response']) . "</td>\n" . '<td>' . $interaction['result'] . "</td>\n" . '<td>' . $interaction['latency'] . "</td>\n" . '<td>' . $interaction['time'] . "</td>\n<td></td>\n</tr>\n";
|
|
$counter++;
|
|
}
|
|
$list2 = learnpath :: get_iv_objectives_array($row['iv_id']);
|
|
foreach ($list2 as $id => $interaction) {
|
|
if (($counter % 2) == 0) {
|
|
$oddclass = 'row_odd';
|
|
} else {
|
|
$oddclass = 'row_even';
|
|
}
|
|
$output .= "<tr class='$oddclass'>\n" . '<td></td>' . "\n" . '<td></td>' . "\n" . '<td> </td>' . "\n" . '<td>' . $interaction['order_id'] . '</td>' . "\n" . '<td colspan="2">' . $interaction['objective_id'] . '</td>' . "\n" .
|
|
'<td colspan="2">' . $interaction['status'] . "</td>\n" .
|
|
'<td>' . $interaction['score_raw'] . "</td>\n" . '<td>' . $interaction['score_max'] . "</td>\n" . '<td>' . $interaction['score_min'] . "</td>\n<td></td>\n</tr>\n";
|
|
$counter++;
|
|
}
|
|
}
|
|
|
|
// Attempts listing by exercise.
|
|
if ((isset($_GET['lp_id']) && $_GET['lp_id'] == $my_lp_id) && (isset($_GET['my_lp_id']) && $_GET['my_lp_id'] == $my_id)) {
|
|
|
|
$res_attempts = Database::query($sql_attempts);
|
|
$num_attempts = Database :: num_rows($res_attempts);
|
|
if ($row['item_type'] === 'quiz') {
|
|
if ($num_attempts > 0) {
|
|
$n = 1;
|
|
while ($row_attempts = Database :: fetch_array($res_attempts)) {
|
|
$my_score = $row_attempts['exe_result'];
|
|
$my_maxscore = $row_attempts['exe_weighting'];
|
|
$my_exe_id = $row_attempts['exe_id'];
|
|
$my_orig_lp = $row_attempts['orig_lp_id'];
|
|
$my_orig_lp_item = $row_attempts['orig_lp_item_id'];
|
|
$my_exo_exe_id = $row_attempts['exe_exo_id'];
|
|
$mktime_start_date = api_strtotime($row_attempts['start_date'],'UTC');
|
|
$mktime_exe_date = api_strtotime($row_attempts['exe_date'],'UTC');
|
|
if ($mktime_start_date && $mktime_exe_date) {
|
|
$mytime = ((int)$mktime_exe_date-(int)$mktime_start_date);
|
|
$time_attemp = learnpathItem :: get_scorm_time('js', $mytime);
|
|
$time_attemp = str_replace('NaN', '00' . $h . '00\'00"', $time_attemp);
|
|
} else {
|
|
$time_attemp = ' - ';
|
|
}
|
|
if (!$is_allowed_to_edit && $result_disabled_ext_all) {
|
|
$view_score = Display::return_icon('invisible.gif', get_lang('ResultsHiddenByExerciseSetting'));
|
|
} else {
|
|
// Show only float when need it.
|
|
//$my_score = float_format( $my_score, 1);
|
|
//$my_maxscore =float_format($my_maxscore, 1);
|
|
if ($my_score == 0 ) {
|
|
//$view_score = '0/'.$my_maxscore;
|
|
$view_score = show_score(0, $my_maxscore, false);
|
|
} else {
|
|
if ($my_maxscore == 0) {
|
|
$view_score = $my_score;
|
|
} else {
|
|
//$view_score = $my_score . '/' . $my_maxscore;
|
|
$view_score = show_score($my_score, $my_maxscore, false);
|
|
}
|
|
}
|
|
//$view_score = ($my_score == 0 ? '0.00/'.$my_maxscore : ($my_maxscore == 0 ? $my_score : $my_score . '/' . $my_maxscore));
|
|
}
|
|
$my_lesson_status = $row_attempts['status'];
|
|
|
|
if ($my_lesson_status == '') {
|
|
$my_lesson_status = get_lang($mylanglist['completed']);
|
|
} elseif ($my_lesson_status == 'incomplete') {
|
|
$my_lesson_status = get_lang($mylanglist['incomplete']);
|
|
}
|
|
|
|
$output .= '<tr class="'.$oddclass.'" ><td> </td><td>'.$extend_attempt_link.'</td><td colspan="3">' . get_lang('Attempt') . ' ' . $n . '</td>'
|
|
. '<td colspan="2"><font color="' . $color . '"><div class="mystatus">' . $my_lesson_status . '</div></font></td><td colspan="2"><div class="mystatus" align="center">' . $view_score . '</div></td><td colspan="2"><div class="mystatus">' . $time_attemp . '</div></td>';
|
|
if ($origin != 'tracking') {
|
|
if (!$is_allowed_to_edit && $result_disabled_ext_all) {
|
|
$output .= '<td><img src="' . api_get_path(WEB_IMG_PATH) . 'quiz_na.gif" alt="'.get_lang('ShowAttempt').'" title="'.get_lang('ShowAttempt').'"></td>';
|
|
} else {
|
|
$output .= '<td><a href="../exercice/exercise_show.php?origin=student_progress&id=' . $my_exe_id . '&cidReq=' . $course_code . $from_link. '" target="_parent"><img src="' . api_get_path(WEB_IMG_PATH) . 'quiz.gif" alt="'.get_lang('ShowAttempt').'" title="'.get_lang('ShowAttempt').'"></a></td>';
|
|
}
|
|
} else {
|
|
if (!$is_allowed_to_edit && $result_disabled_ext_all ) {
|
|
$output .= '<td><img src="' . api_get_path(WEB_IMG_PATH) . 'quiz_na.gif" alt="'.get_lang('ShowAndQualifyAttempt').'" title="'.get_lang('ShowAndQualifyAttempt').'"></td>';
|
|
} else {
|
|
$output .= '<td><a href="../exercice/exercise_show.php?origin=correct_exercise_in_lp&id=' . $my_exe_id . '" target="_parent"><img src="' . api_get_path(WEB_IMG_PATH) . 'quiz.gif" alt="'.get_lang('ShowAndQualifyAttempt').'" title="'.get_lang('ShowAndQualifyAttempt').'"></a></td>';
|
|
}
|
|
}
|
|
$output .= '</tr>';
|
|
$n++;
|
|
}
|
|
}
|
|
$output .= '<tr><td colspan="12"> </td></tr>';
|
|
}
|
|
}
|
|
}
|
|
|
|
$total_time += $time_for_total;
|
|
// QUIZZ IN LP
|
|
$a_my_id = array();
|
|
if (!empty($my_lp_id)) {
|
|
$a_my_id[] = $my_lp_id;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (!empty($a_my_id)) {
|
|
$my_studen_id = 0;
|
|
$my_course_id = '';
|
|
if ($origin == 'tracking') {
|
|
$my_studen_id = $student_id;
|
|
$my_course_id = Database::escape_string($_GET['course']);
|
|
} else {
|
|
$my_studen_id = intval(api_get_user_id());
|
|
$my_course_id = Database::escape_string(api_get_course_id());
|
|
}
|
|
$total_score = Tracking::get_avg_student_score($my_studen_id, $my_course_id, $a_my_id, api_get_session_id());
|
|
} else {
|
|
if ($origin == 'tracking') {
|
|
$my_studen_id = $student_id;
|
|
$my_course_id = Database::escape_string($_GET['course']);
|
|
if (!empty($my_studen_id) && !empty($my_course_id)) {
|
|
$total_score = Tracking::get_avg_student_score($my_studen_id, $my_course_id, array(intval($_GET['lp_id'])), api_get_session_id());
|
|
} else {
|
|
$total_score = 0;
|
|
}
|
|
} else {
|
|
$total_score = 0;
|
|
}
|
|
}
|
|
|
|
$total_time = learnpathItem :: get_scorm_time('js', $total_time);
|
|
//$total_time = str_replace('NaN', '00:00:00' ,$total_time);
|
|
$total_time = str_replace('NaN', '00' . $h . '00\'00"', $total_time);
|
|
$lp_type = learnpath :: get_type_static($lp_id);
|
|
$total_percent = 0;
|
|
|
|
if (!$is_allowed_to_edit && $result_disabled_ext_all) {
|
|
$final_score = Display::return_icon('invisible.gif', get_lang('ResultsHiddenByExerciseSetting'));
|
|
} else {
|
|
if (is_numeric($total_score))
|
|
$final_score = $total_score.'%';
|
|
else
|
|
$final_score = $total_score;
|
|
}
|
|
|
|
if (($counter % 2) == 0) {
|
|
$oddclass = 'row_odd';
|
|
} else {
|
|
$oddclass = 'row_even';
|
|
}
|
|
|
|
if (empty($extend_all)) {
|
|
$output .= "<tr class='$oddclass'>\n" . "<td></td>\n" . '<td colspan="4"><div class="mystatus"><i>' . get_lang('AccomplishedStepsTotal') . "</i></div></td>\n"
|
|
. '<td colspan="2"></td>' . "\n" . '<td colspan="2"><div class="mystatus" align="center">' . $final_score . "</div></td>\n" . '<td colspan="2"><div class="mystatus">' . $total_time . '</div></td><td></td>' . "\n" . "</tr>\n";
|
|
}
|
|
|
|
$output .= "</table></td></tr></table>";
|
|
|
|
if (!empty($export_csv)) {
|
|
$temp = array (
|
|
'',
|
|
'',
|
|
'',
|
|
''
|
|
);
|
|
$csv_content[] = $temp;
|
|
$temp = array (
|
|
get_lang('AccomplishedStepsTotal'),
|
|
'',
|
|
$final_score,
|
|
$total_time
|
|
);
|
|
$csv_content[] = $temp;
|
|
ob_end_clean();
|
|
Export :: export_table_csv($csv_content, 'reporting_learning_path_details');
|
|
exit;
|
|
}
|
|
|
|
if ($origin != 'tracking') {
|
|
$output .= "</body></html>";
|
|
}
|
|
|
|
if (empty($export_csv)) {
|
|
echo $output;
|
|
}
|
|
|