Proyectos de Subversion Moodle

Rev

| Ultima modificación | Ver Log |

Rev Autor Línea Nro. Línea
1 efrain 1
<?php
2
// This file is part of Moodle - http://moodle.org/
3
//
4
// Moodle is free software: you can redistribute it and/or modify
5
// it under the terms of the GNU General Public License as published by
6
// the Free Software Foundation, either version 3 of the License, or
7
// (at your option) any later version.
8
//
9
// Moodle is distributed in the hope that it will be useful,
10
// but WITHOUT ANY WARRANTY; without even the implied warranty of
11
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12
// GNU General Public License for more details.
13
//
14
// You should have received a copy of the GNU General Public License
15
// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
16
 
17
/**
18
 * Strings for component 'report_coursestats', language 'en'
19
 *
20
 * @package   	report
21
 * @subpackage 	coursestats
22
 * @copyright 	2017 Paulo Jr.
23
 * @license   	http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
24
 */
25
 
26
require(dirname(__FILE__).'/../../config.php');
27
require_once($CFG->libdir.'/adminlib.php');
28
require(__DIR__. '/constants.php');
29
 
30
admin_externalpage_setup('reportcoursestats', '', null, '', array('pagelayout'=>'report'));
31
 
32
$category = optional_param('category', ALL_CATEGORIES, PARAM_INT);
33
 
34
if ($category == ALL_CATEGORIES) {
35
	$only_forum_courses = $DB->count_records_sql('SELECT COUNT(*) FROM {course} co JOIN {report_coursestats} cs ON co.id = cs.courseid WHERE cs.curr_usage_type = :type AND co.visible = :visible',
36
			array('type'=>FORUM_USAGE_TYPE, 'visible'=>'1'));
37
	$only_repository_courses = $DB->count_records_sql('SELECT COUNT(*) FROM {course} co JOIN {report_coursestats} cs ON co.id = cs.courseid WHERE cs.curr_usage_type = :type AND co.visible = :visible',
38
			array('type'=>REPOSITORY_USAGE_TYPE, 'visible'=>'1'));
39
	$activity_courses = $DB->count_records_sql('SELECT COUNT(*) FROM {course} co JOIN {report_coursestats} cs ON co.id = cs.courseid WHERE cs.curr_usage_type = :type AND co.visible = :visible',
40
			array('type'=>ACTIVITY_USAGE_TYPE, 'visible'=>'1'));
41
	$catname = get_string('lb_all_categories', 'report_coursestats');
42
	// the minus 1 is necessary to exclude the default course, created by any new Moodle instance
43
	$amount_of_created_courses = $DB->count_records(COURSE_TABLE_NAME, array('visible'=>'1')) - 1;
44
} else {
45
	$only_forum_courses = $DB->count_records_sql('SELECT COUNT(*) FROM {report_coursestats} cs JOIN {course} co ON co.id = cs.courseid WHERE co.category = :cat AND cs.curr_usage_type = :type AND co.visible = :visible',
46
			array('type'=>FORUM_USAGE_TYPE, 'cat'=>$category, 'visible'=>'1'));
47
	$only_repository_courses = $DB->count_records_sql('SELECT COUNT(*) FROM {report_coursestats} cs JOIN {course} co ON co.id = cs.courseid WHERE co.category = :cat AND cs.curr_usage_type = :type AND co.visible = :visible',
48
			array('type'=>REPOSITORY_USAGE_TYPE, 'cat'=>$category, 'visible'=>'1'));
49
	$activity_courses = $DB->count_records_sql('SELECT COUNT(*) FROM {report_coursestats} cs JOIN {course} co ON co.id = cs.courseid WHERE co.category = :cat AND cs.curr_usage_type = :type AND co.visible = :visible',
50
			array('type'=>ACTIVITY_USAGE_TYPE, 'cat'=>$category, 'visible'=>'1'));
51
	$cat = $DB->get_record(COURSE_CATEGORIES_TABLE_NAME, array('id'=>$category));
52
	$catname = $cat->name;
53
	$amount_of_created_courses = $DB->count_records(COURSE_TABLE_NAME, array('visible'=>'1', 'category'=>$category));
54
}
55
 
56
$amount_of_courses = $only_forum_courses +  $only_repository_courses + $activity_courses;
57
 
58
$url = new moodle_url($CFG->wwwroot . '/report/coursestats/index.php');
59
$link = html_writer::link($url, get_string('link_back', 'report_coursestats'));
60
 
61
echo $OUTPUT->header();
62
 
63
if ($amount_of_courses > 0) {
64
	echo $OUTPUT->heading(get_string('lb_category', 'report_coursestats') . ': ' . $catname . ' - ' . $link);
65
 
66
	if (class_exists('core\chart_pie')) {
67
		// Types of usage chart
68
		$data_types_of_use = new core\chart_series(get_string('lb_chart_series_types_of_use', 'report_coursestats'), [$only_forum_courses, $only_repository_courses, $activity_courses]);
69
		$chart_types_of_use = new core\chart_pie();
70
		$chart_types_of_use->add_series($data_types_of_use);
71
		$chart_types_of_use->set_labels([get_string('lb_forum_usage', 'report_coursestats'), get_string('lb_repository_usage', 'report_coursestats'), get_string('lb_activity_usage', 'report_coursestats')]);
72
 
73
		// Used courses chart
74
		$data_used_courses = new core\chart_series(get_string('lb_chart_series_used_courses', 'report_coursestats'), [$amount_of_courses, ($amount_of_created_courses - $amount_of_courses)]);
75
		$chart_used_courses = new core\chart_pie();
76
		$chart_used_courses->add_series($data_used_courses);
77
		$chart_used_courses->set_labels([get_string('lb_used_courses', 'report_coursestats'), get_string('lb_not_used_courses', 'report_coursestats')]);
78
 
79
		echo $OUTPUT->render_chart($chart_types_of_use, false);
80
		echo $OUTPUT->render_chart($chart_used_courses, false);
81
	}
82
 
83
	$summary_table = new html_table();
84
 
85
	$summary_table->head = array(get_string('lb_courses_created_amount', 'report_coursestats'), get_string('lb_used_courses', 'report_coursestats'), get_string('lb_not_used_courses', 'report_coursestats'));
86
 
87
	$summary_table->data = array(array($amount_of_created_courses, $amount_of_courses . ' (' . number_format(($amount_of_courses/$amount_of_created_courses)*100, 2) . '%)',
88
		($amount_of_created_courses - $amount_of_courses) . ' (' . number_format((($amount_of_created_courses - $amount_of_courses)/$amount_of_created_courses)*100, 2) . '%)'));
89
 
90
	echo html_writer::table($summary_table);
91
 
92
	$table = new html_table();
93
 
94
	$table->head = array(get_string('lb_usage_type_name', 'report_coursestats'),
95
						get_string('lb_courses_amount', 'report_coursestats'),
96
						get_string('lb_percent_of_used_courses', 'report_coursestats'),
97
						get_string('lb_percent_of_created_courses', 'report_coursestats'),
98
						get_string('lb_usage_type_desc', 'report_coursestats'));
99
 
100
	$url_filter_forum_usage_type = new moodle_url($CFG->wwwroot . '/report/coursestats/details.php?usagetype=' . FORUM_USAGE_TYPE . '&category=' . $category);
101
	$url_filter_repository_usage_type = new moodle_url($CFG->wwwroot . '/report/coursestats/details.php?usagetype=' . REPOSITORY_USAGE_TYPE . '&category=' . $category);
102
	$url_filter_activities_usage_type = new moodle_url($CFG->wwwroot . '/report/coursestats/details.php?usagetype=' . ACTIVITY_USAGE_TYPE . '&category=' . $category);
103
 
104
	$table->data = array(
105
		array(html_writer::link($url_filter_forum_usage_type, get_string('lb_forum_usage', 'report_coursestats')), $only_forum_courses, number_format(($only_forum_courses/$amount_of_courses)*100, 2) . '%', number_format(($only_forum_courses/$amount_of_created_courses)*100, 2) . '%', get_string('lb_forum_usage_help', 'report_coursestats')),
106
		array(html_writer::link($url_filter_repository_usage_type, get_string('lb_repository_usage', 'report_coursestats')), $only_repository_courses, number_format(($only_repository_courses/$amount_of_courses)*100, 2) . '%', number_format(($only_repository_courses/$amount_of_created_courses)*100, 2) . '%', get_string('lb_repository_usage_help', 'report_coursestats')),
107
		array(html_writer::link($url_filter_activities_usage_type, get_string('lb_activity_usage', 'report_coursestats')), $activity_courses, number_format(($activity_courses/$amount_of_courses)*100, 2) . '%', number_format(($activity_courses/$amount_of_created_courses)*100, 2) . '%', get_string('lb_activity_usage_help', 'report_coursestats'))
108
	);
109
 
110
	echo html_writer::table($table);
111
} else {
112
	echo html_writer::tag('p', get_string('lb_there_are_no_courses_stats', 'report_coursestats') . ' (' .$link . ')', array('align' => 'center'));
113
}
114
 
115
echo $OUTPUT->footer();
116