Admin - Add quarterly report in statistics - refs BT#16108

Author: @BorjaSanchezBeezNest
3 years ago · bebdf2d739
parent 4d67cd2dca
commit bebdf2d739
8 changed files with 1279 additions and 69 deletions
--- a/main/admin/statistics/index.php
+++ b/main/admin/statistics/index.php
@ -361,6 +361,7 @@ $tools = [
        'report=activities' => get_lang('ImportantActivities'),
        'report=user_session' => get_lang('PortalUserSessionStats'),
        'report=courses_usage' => get_lang('CoursesUsage'),
+        'report=quarterly_report' => get_lang('QuarterlyReport'),
    ],
    get_lang('Social') => [
        'report=messagereceived' => get_lang('MessagesReceived'),
@ -1706,6 +1707,154 @@ switch ($report) {
        break;
    case 'lti_tool_lp':
        $content .= Statistics::printLtiLearningPath();
+        break;
+    case 'quarterly_report':
+
+        $htmlHeadXtra[] .= '<script>
+                function loadReportQuarterlyUsers () {
+                    $("#tracking-report-quarterly-users")
+                        .html("<p><span class=\"fa fa-spinner fa-spin fa-2x\" aria-hidden=\"true\"></span></p>")
+                        .load(_p.web_ajax + "statistics.ajax.php?a=report_quarterly_users");
+            }</script>';
+        $htmlHeadXtra[] .= '<script>
+                function loadReportQuarterlyCourses () {
+                    $("#tracking-report-quarterly-courses")
+                        .html("<p><span class=\"fa fa-spinner fa-spin fa-2x\" aria-hidden=\"true\"></span></p>")
+                        .load(_p.web_ajax + "statistics.ajax.php?a=report_quarterly_courses");
+            }</script>';
+
+        $htmlHeadXtra[] .= '<script>
+                function loadReportQuarterlyHoursOfTraining () {
+                    $("#tracking-report-quarterly-hours-of-training")
+                        .html("<p><span class=\"fa fa-spinner fa-spin fa-2x\" aria-hidden=\"true\"></span></p>")
+                        .load(_p.web_ajax + "statistics.ajax.php?a=report_quarterly_hours_of_training");
+            }</script>';
+
+        $htmlHeadXtra[] .= '<script>
+                function loadReportQuarterlyCertificatesGenerated () {
+                    $("#tracking-report-quarterly-number-of-certificates-generated")
+                        .html("<p><span class=\"fa fa-spinner fa-spin fa-2x\" aria-hidden=\"true\"></span></p>")
+                        .load(_p.web_ajax + "statistics.ajax.php?a=report_quarterly_number_of_certificates_generated");
+            }</script>';
+
+        $htmlHeadXtra[] .= '<script>
+                function loadReportQuarterlySessionsByDuration () {
+                    $("#tracking-report-quarterly-sessions-by-duration")
+                        .html("<p><span class=\"fa fa-spinner fa-spin fa-2x\" aria-hidden=\"true\"></span></p>")
+                        .load(_p.web_ajax + "statistics.ajax.php?a=report_quarterly_sessions_by_duration");
+            }</script>';
+
+        $htmlHeadXtra[] .= '<script>
+                function loadReportQuarterlyCoursesAndSessions () {
+                    $("#tracking-report-quarterly-courses-and-sessions")
+                        .html("<p><span class=\"fa fa-spinner fa-spin fa-2x\" aria-hidden=\"true\"></span></p>")
+                        .load(_p.web_ajax + "statistics.ajax.php?a=report_quarterly_courses_and_sessions");
+            }</script>';
+
+        if (api_get_current_access_url_id() === 1) {
+            $htmlHeadXtra[] .= '<script>
+                function loadReportQuarterlyTotalDiskUsage () {
+                    $("#tracking-report-quarterly-total-disk-usage")
+                        .html("<p><span class=\"fa fa-spinner fa-spin fa-2x\" aria-hidden=\"true\"></span></p>")
+                        .load(_p.web_ajax + "statistics.ajax.php?a=report_quarterly_total_disk_usage");
+            }</script>';
+        }
+
+        $content .= Display::tag('H4', get_lang('ReportQuarterlyUsers'), ['style' => 'margin-bottom: 25px;']);
+        $content .= Display::url(
+            get_lang('Show'),
+            'javascript://',
+            ['onclick' => 'loadReportQuarterlyUsers();', 'class' => 'btn btn-default']
+        );
+        $content .= Display::div('', ['id' => 'tracking-report-quarterly-users', 'style' => 'margin: 30px;']);
+
+        $content .= Display::tag('H4', get_lang('ReportQuarterlyCourses'), ['style' => 'margin-bottom: 25px;']);
+        $content .= Display::url(
+            get_lang('Show'),
+            'javascript://',
+            ['onclick' => 'loadReportQuarterlyCourses();', 'class' => 'btn btn-default']
+        );
+        $content .= Display::div('', ['id' => 'tracking-report-quarterly-courses', 'style' => 'margin: 30px;']);
+
+        $content .= Display::tag('H4', get_lang('ReportQuarterlyHoursOfTraining'), ['style' => 'margin-bottom: 25px;']);
+        $content .= Display::url(
+            get_lang('Show'),
+            'javascript://',
+            ['onclick' => 'loadReportQuarterlyHoursOfTraining();', 'class' => 'btn btn-default']
+        );
+        $content .= Display::div(
+            '',
+            [
+                'id' => 'tracking-report-quarterly-hours-of-training',
+                'style' => 'margin: 30px;',
+            ]
+        );
+        $content .= Display::tag(
+            'H4',
+            get_lang('ReportQuarterlyNumberOfCertificatesGenerated'),
+            ['style' => 'margin-bottom: 25px;']
+        );
+        $content .= Display::url(
+            get_lang('Show'),
+            'javascript://',
+            ['onclick' => 'loadReportQuarterlyCertificatesGenerated();', 'class' => 'btn btn-default']
+        );
+        $content .= Display::div(
+            '',
+            ['id' => 'tracking-report-quarterly-number-of-certificates-generated', 'style' => 'margin: 30px;']
+        );
+        $content .= Display::tag(
+            'H4',
+            get_lang('ReportQuarterlySessionsByDuration'),
+            ['style' => 'margin-bottom: 25px;']
+        );
+        $content .= Display::url(
+            get_lang('Show'),
+            'javascript://',
+            ['onclick' => 'loadReportQuarterlySessionsByDuration();', 'class' => 'btn btn-default']
+        );
+        $content .= Display::div(
+            '',
+            ['id' => 'tracking-report-quarterly-sessions-by-duration', 'style' => 'margin: 30px;']
+        );
+        $content .= Display::tag(
+            'H4',
+            get_lang('ReportQuarterlyCoursesAndSessions'),
+            ['style' => 'margin-bottom: 25px;']
+        );
+        $content .= Display::url(
+            get_lang('Show'),
+            'javascript://',
+            ['onclick' => 'loadReportQuarterlyCoursesAndSessions();', 'class' => 'btn btn-default']
+        );
+        $content .= Display::div(
+            '',
+            [
+                'id' => 'tracking-report-quarterly-courses-and-sessions',
+                'style' => 'margin: 30px;',
+            ]
+        );
+
+        if (api_get_current_access_url_id() === 1) {
+            $content .= Display::tag(
+                'H4',
+                get_lang('ReportQuarterlyTotalDiskUsage'),
+                ['style' => 'margin-bottom: 25px;']
+            );
+            $content .= Display::url(
+                get_lang('Show'),
+                'javascript://',
+                ['onclick' => 'loadReportQuarterlyTotalDiskUsage();', 'class' => 'btn btn-default']
+            );
+            $content .= Display::div(
+                '',
+                [
+                    'id' => 'tracking-report-quarterly-total-disk-usage',
+                    'style' => 'margin: 30px;',
+                ]
+            );
+        }
+
        break;
 }

--- a/main/inc/ajax/statistics.ajax.php
+++ b/main/inc/ajax/statistics.ajax.php
@ -725,4 +725,700 @@ switch ($action) {
        header('Content-type: application/json');
        echo json_encode($list);
        break;
+    case 'report_quarterly_users':
+
+        $currentQuarterDates = getQuarterDates();
+        $pre1QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-3 month')
+                ->format('Y-m-d')
+        );
+        $pre2QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-6 month')
+                ->format('Y-m-d')
+        );
+        $pre3QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-9 month')
+                ->format('Y-m-d')
+        );
+        $pre4QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-12 month')
+                ->format('Y-m-d')
+        );
+        $pre5QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-15 month')
+                ->format('Y-m-d')
+        );
+
+        // Make de headers for the table
+        $headers = [
+            '',
+            $pre5QuarterDates['quarter_title'],
+            $pre4QuarterDates['quarter_title'],
+            $pre3QuarterDates['quarter_title'],
+            $pre2QuarterDates['quarter_title'],
+            $pre1QuarterDates['quarter_title'],
+            get_lang('YoY'),
+            $currentQuarterDates['quarter_title'].'*',
+        ];
+
+        // Get the data for the number of user registered row (2)
+        $countUsersTotal = UserManager::get_number_of_users(
+            null,
+            null,
+            null
+        );
+        $countUsersPre1Quarter = UserManager::get_number_of_users(
+            null,
+            null,
+            null,
+            null,
+            $pre1QuarterDates['quarter_end']
+        );
+        $countUsersPre2Quarter = UserManager::get_number_of_users(
+            null,
+            null,
+            null,
+            null,
+            $pre2QuarterDates['quarter_end']
+        );
+        $countUsersPre3Quarter = UserManager::get_number_of_users(
+            null,
+            null,
+            null,
+            null,
+            $pre3QuarterDates['quarter_end']
+        );
+        $countUsersPre4Quarter = UserManager::get_number_of_users(
+            null,
+            null,
+            null,
+            null,
+            $pre4QuarterDates['quarter_end']
+        );
+        $countUsersPre5Quarter = UserManager::get_number_of_users(
+            null,
+            null,
+            null,
+            null,
+            $pre5QuarterDates['quarter_end']
+        );
+        // Calculate percent for first row
+        $percentIncrementUsersRegistered = api_calculate_increment_percent(
+            $countUsersPre1Quarter,
+            $countUsersPre5Quarter
+        );
+
+        // Get the data for number of users connected row (3)
+        $countUsersConnectedCurrentQuarter = count(
+            Statistics::getLoginsByDate(
+                $currentQuarterDates['quarter_start'],
+                $currentQuarterDates['quarter_end']
+            )
+        );
+        $countUsersConnectedPre1Quarter = count(
+            Statistics::getLoginsByDate(
+                $pre1QuarterDates['quarter_start'],
+                $pre1QuarterDates['quarter_end']
+            )
+        );
+        $countUsersConnectedPre2Quarter = count(
+            Statistics::getLoginsByDate(
+                $pre2QuarterDates['quarter_start'],
+                $pre2QuarterDates['quarter_end']
+            )
+        );
+        $countUsersConnectedPre3Quarter = count(
+            Statistics::getLoginsByDate(
+                $pre3QuarterDates['quarter_start'],
+                $pre3QuarterDates['quarter_end']
+            )
+        );
+        $countUsersConnectedPre4Quarter = count(
+            Statistics::getLoginsByDate(
+                $pre4QuarterDates['quarter_start'],
+                $pre4QuarterDates['quarter_end']
+            )
+        );
+        $countUsersConnectedPre5Quarter = count(
+            Statistics::getLoginsByDate(
+                $pre5QuarterDates['quarter_start'],
+                $pre5QuarterDates['quarter_end']
+            )
+        );
+
+        // Calculate percent for second row
+        $percentIncrementUsersConnected = api_calculate_increment_percent(
+            $countUsersConnectedPre1Quarter,
+            $countUsersConnectedPre5Quarter
+        );
+
+        //Make de rows with the recollected data
+        $rows = [];
+        $rows[] = [
+            get_lang('NumberOfUsersRegisteredTotal'),
+            $countUsersPre5Quarter,
+            $countUsersPre4Quarter,
+            $countUsersPre3Quarter,
+            $countUsersPre2Quarter,
+            $countUsersPre1Quarter,
+            $percentIncrementUsersRegistered,
+            $countUsersTotal,
+        ];
+        //todo comprobacion + -
+        $rows[] = [
+            get_lang('NumberOfUsersRegisteredCompared'),
+            '-',
+            '+'.($countUsersPre1Quarter - $countUsersPre2Quarter),
+            '+'.($countUsersPre2Quarter - $countUsersPre3Quarter),
+            '+'.($countUsersPre3Quarter - $countUsersPre4Quarter),
+            '+'.($countUsersPre4Quarter - $countUsersPre5Quarter),
+            '-',
+            '+'.($countUsersTotal - $countUsersPre1Quarter),
+        ];
+        $rows[] = [
+            get_lang('NumberOfUsersWhoConnected'),
+            $countUsersConnectedPre5Quarter,
+            $countUsersConnectedPre4Quarter,
+            $countUsersConnectedPre3Quarter,
+            $countUsersConnectedPre2Quarter,
+            $countUsersConnectedPre1Quarter,
+            $percentIncrementUsersConnected,
+            $countUsersConnectedCurrentQuarter,
+        ];
+
+        echo Display::table($headers, $rows, []);
+        echo Display::label(get_lang('IncompleteDataCurrentQuarter'), 'warning');
+        break;
+    case 'report_quarterly_courses':
+
+        $currentQuarterDates = getQuarterDates();
+        $pre1QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-3 month')
+                ->format('Y-m-d')
+        );
+        $pre2QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-6 month')
+                ->format('Y-m-d')
+        );
+        $pre3QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-9 month')
+                ->format('Y-m-d')
+        );
+        $pre4QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-12 month')
+                ->format('Y-m-d')
+        );
+        $pre5QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-15 month')
+                ->format('Y-m-d')
+        );
+
+        // Make the headers for the table
+        $headers = [
+            '',
+            $pre5QuarterDates['quarter_title'],
+            $pre4QuarterDates['quarter_title'],
+            $pre3QuarterDates['quarter_title'],
+            $pre2QuarterDates['quarter_title'],
+            $pre1QuarterDates['quarter_title'],
+            get_lang('YoY'),
+            $currentQuarterDates['quarter_title'].'*',
+        ];
+
+        // Get the data for the rows
+        $countCoursesCurrentQuarter = Statistics::countCourses(null, null, null);
+        $countCoursesPre1Quarter = Statistics::countCourses(null, null, $pre1QuarterDates['quarter_end']);
+        $countCoursesPre2Quarter = Statistics::countCourses(null, null, $pre2QuarterDates['quarter_end']);
+        $countCoursesPre3Quarter = Statistics::countCourses(null, null, $pre3QuarterDates['quarter_end']);
+        $countCoursesPre4Quarter = Statistics::countCourses(null, null, $pre4QuarterDates['quarter_end']);
+        $countCoursesPre5Quarter = Statistics::countCourses(null, null, $pre5QuarterDates['quarter_end']);
+
+        $auxArrayVisibilities = [
+            COURSE_VISIBILITY_OPEN_WORLD,
+            COURSE_VISIBILITY_OPEN_PLATFORM,
+            COURSE_VISIBILITY_REGISTERED,
+        ];
+
+        $countCoursesAvailableCurrentQuarter = Statistics::countCoursesByVisibility($auxArrayVisibilities);
+        $countCoursesAvailablePre1Quarter = Statistics::countCoursesByVisibility(
+            $auxArrayVisibilities,
+            null,
+            $pre1QuarterDates['quarter_end']
+        );
+        $countCoursesAvailablePre2Quarter = Statistics::countCoursesByVisibility(
+            $auxArrayVisibilities,
+            null,
+            $pre2QuarterDates['quarter_end']
+        );
+        $countCoursesAvailablePre3Quarter = Statistics::countCoursesByVisibility(
+            $auxArrayVisibilities,
+            null,
+            $pre3QuarterDates['quarter_end']
+        );
+        $countCoursesAvailablePre4Quarter = Statistics::countCoursesByVisibility(
+            $auxArrayVisibilities,
+            null,
+            $pre4QuarterDates['quarter_end']
+        );
+        $countCoursesAvailablePre5Quarter = Statistics::countCoursesByVisibility(
+            $auxArrayVisibilities,
+            null,
+            $pre5QuarterDates['quarter_end']
+        );
+
+        // Calculate percents for first row
+        $percentIncrementCourses = api_calculate_increment_percent(
+            $countCoursesPre1Quarter,
+            $countCoursesPre5Quarter
+        );
+        // Calculate percents for second row
+        $percentIncrementUsersRegistered = api_calculate_increment_percent(
+            $countCoursesAvailablePre1Quarter,
+            $countCoursesAvailablePre5Quarter
+        );
+
+        //Make the rows with the recollected data
+        $rows = [];
+        $rows[] = [
+            get_lang('NumberOfExistingCoursesTotal'),
+            $countCoursesPre5Quarter,
+            $countCoursesPre4Quarter,
+            $countCoursesPre3Quarter,
+            $countCoursesPre2Quarter,
+            $countCoursesPre1Quarter,
+            $percentIncrementCourses,
+            $countCoursesCurrentQuarter,
+        ];
+        $rows[] = [
+            get_lang('NumberOfAvailableCourses'),
+            $countCoursesAvailablePre5Quarter,
+            $countCoursesAvailablePre4Quarter,
+            $countCoursesAvailablePre3Quarter,
+            $countCoursesAvailablePre2Quarter,
+            $countCoursesAvailablePre1Quarter,
+            $percentIncrementUsersRegistered,
+            $countCoursesAvailableCurrentQuarter,
+        ];
+
+        echo Display::table($headers, $rows, []);
+        echo Display::label(get_lang('IncompleteDataCurrentQuarter'), 'warning');
+    break;
+    case 'report_quarterly_hours_of_training':
+
+        $currentQuarterDates = getQuarterDates();
+        $pre1QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-3 month')
+                ->format('Y-m-d')
+        );
+        $pre2QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-6 month')
+                ->format('Y-m-d')
+        );
+        $pre3QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-9 month')
+                ->format('Y-m-d')
+        );
+        $pre4QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-12 month')
+                ->format('Y-m-d')
+        );
+        $pre5QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-15 month')
+                ->format('Y-m-d')
+        );
+
+        // Make the headers for the table
+        $headers = [
+            '',
+            $pre5QuarterDates['quarter_title'],
+            $pre4QuarterDates['quarter_title'],
+            $pre3QuarterDates['quarter_title'],
+            $pre2QuarterDates['quarter_title'],
+            $pre1QuarterDates['quarter_title'],
+            get_lang('YoY'),
+            $currentQuarterDates['quarter_title'].'*',
+        ];
+
+        // Get data for the row
+        $timeSpentCoursesCurrentQuarter = Tracking::getTotalTimeSpentInCourses(
+            $currentQuarterDates['quarter_start'],
+            $currentQuarterDates['quarter_end']
+        );
+        $timeSpentCourses1PreQuarter = Tracking::getTotalTimeSpentInCourses(
+            $pre1QuarterDates['quarter_start'],
+            $pre1QuarterDates['quarter_end']
+        );
+        $timeSpentCourses2PreQuarter = Tracking::getTotalTimeSpentInCourses(
+            $pre2QuarterDates['quarter_start'],
+            $pre2QuarterDates['quarter_end']
+        );
+        $timeSpentCourses3PreQuarter = Tracking::getTotalTimeSpentInCourses(
+            $pre3QuarterDates['quarter_start'],
+            $pre3QuarterDates['quarter_end']
+        );
+        $timeSpentCourses4PreQuarter = Tracking::getTotalTimeSpentInCourses(
+            $pre4QuarterDates['quarter_start'],
+            $pre4QuarterDates['quarter_end']
+        );
+        $timeSpentCourses5PreQuarter = Tracking::getTotalTimeSpentInCourses(
+            $pre5QuarterDates['quarter_start'],
+            $pre5QuarterDates['quarter_end']
+        );
+
+        // Calculate percent for the row
+        $percentIncrementTimeSpent = api_calculate_increment_percent(
+            $timeSpentCourses1PreQuarter,
+            $timeSpentCourses5PreQuarter
+        );
+
+        //Make the row with the recollected data
+        $rows = [];
+        $rows[] = [
+            get_lang('NumberOfHoursTrainingFollowed'),
+            $timeSpentCourses5PreQuarter,
+            $timeSpentCourses4PreQuarter,
+            $timeSpentCourses3PreQuarter,
+            $timeSpentCourses2PreQuarter,
+            $timeSpentCourses1PreQuarter,
+            $percentIncrementTimeSpent,
+            $timeSpentCoursesCurrentQuarter,
+        ];
+        echo Display::table($headers, $rows, []);
+        echo Display::label(get_lang('IncompleteDataCurrentQuarter'), 'warning');
+
+    break;
+    case 'report_quarterly_number_of_certificates_generated':
+
+        $currentQuarterDates = getQuarterDates();
+        $pre1QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-3 month')
+                ->format('Y-m-d')
+        );
+        $pre2QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-6 month')
+                ->format('Y-m-d')
+        );
+        $pre3QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-9 month')
+                ->format('Y-m-d')
+        );
+        $pre4QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-12 month')
+                ->format('Y-m-d')
+        );
+        $pre5QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-15 month')
+                ->format('Y-m-d')
+        );
+
+        // Make the headers for the table
+        $headers = [
+            '',
+            $pre5QuarterDates['quarter_title'],
+            $pre4QuarterDates['quarter_title'],
+            $pre3QuarterDates['quarter_title'],
+            $pre2QuarterDates['quarter_title'],
+            $pre1QuarterDates['quarter_title'],
+            get_lang('YoY'),
+            $currentQuarterDates['quarter_title'].'*',
+        ];
+
+        // Get data for the row
+        $certificateGeneratedCurrentQuarter = Statistics::countCertificatesByQuarter(
+            null,
+            $currentQuarterDates['quarter_end']
+        );
+        $certificateGenerated1PreQuarter = Statistics::countCertificatesByQuarter(
+            null,
+            $pre1QuarterDates['quarter_end']
+        );
+        $certificateGenerated2PreQuarter = Statistics::countCertificatesByQuarter(
+            null,
+            $pre2QuarterDates['quarter_end']
+        );
+        $certificateGenerated3PreQuarter = Statistics::countCertificatesByQuarter(
+            null,
+            $pre3QuarterDates['quarter_end']
+        );
+        $certificateGenerated4PreQuarter = Statistics::countCertificatesByQuarter(
+            null,
+            $pre4QuarterDates['quarter_end']
+        );
+        $certificateGenerated5PreQuarter = Statistics::countCertificatesByQuarter(
+            null,
+            $pre5QuarterDates['quarter_end']
+        );
+
+        // Calculate percent for the row
+        $percentIncrementCertificateGenerated = api_calculate_increment_percent(
+            $certificateGenerated1PreQuarter,
+            $certificateGenerated5PreQuarter
+        );
+
+        //Make the row with the recollected data
+        $rows = [];
+        $rows[] = [
+            get_lang('NumberOfCertificatesGenerated'),
+            $certificateGenerated5PreQuarter,
+            $certificateGenerated4PreQuarter,
+            $certificateGenerated3PreQuarter,
+            $certificateGenerated2PreQuarter,
+            $certificateGenerated1PreQuarter,
+            $percentIncrementCertificateGenerated,
+            $certificateGeneratedCurrentQuarter,
+        ];
+
+        echo Display::table($headers, $rows, []);
+        echo Display::label(get_lang('IncompleteDataCurrentQuarter'), 'warning');
+
+    break;
+    case "report_quarterly_sessions_by_duration":
+
+        $currentQuarterDates = getQuarterDates();
+        $pre1QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-3 month')
+                ->format('Y-m-d')
+        );
+        $pre2QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-6 month')
+                ->format('Y-m-d')
+        );
+        $pre3QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-9 month')
+                ->format('Y-m-d')
+        );
+        $pre4QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-12 month')
+                ->format('Y-m-d')
+        );
+        $pre5QuarterDates = getQuarterDates(
+            date_create($currentQuarterDates['quarter_start'])
+                ->modify('-15 month')
+                ->format('Y-m-d')
+        );
+
+        // Make the headers for the table
+        $headers = [
+            get_lang('SessionsByDurationByQuarter'),
+            $pre5QuarterDates['quarter_title'],
+            $pre4QuarterDates['quarter_title'],
+            $pre3QuarterDates['quarter_title'],
+            $pre2QuarterDates['quarter_title'],
+            $pre1QuarterDates['quarter_title'],
+            get_lang('YoY'),
+            $currentQuarterDates['quarter_title'].'*',
+        ];
+
+        // Get the data for the rows
+        $sessionsDurationCurrentQuarter = Statistics::getSessionsByDuration(
+            $currentQuarterDates['quarter_start'],
+            $currentQuarterDates['quarter_end']
+        );
+        $sessionsDuration1PreQuarter = Statistics::getSessionsByDuration(
+            $pre1QuarterDates['quarter_start'],
+            $pre1QuarterDates['quarter_end']
+        );
+        $sessionsDuration2PreQuarter = Statistics::getSessionsByDuration(
+            $pre2QuarterDates['quarter_start'],
+            $pre2QuarterDates['quarter_end']
+        );
+        $sessionsDuration3PreQuarter = Statistics::getSessionsByDuration(
+            $pre3QuarterDates['quarter_start'],
+            $pre3QuarterDates['quarter_end']
+        );
+        $sessionsDuration4PreQuarter = Statistics::getSessionsByDuration(
+            $pre4QuarterDates['quarter_start'],
+            $pre4QuarterDates['quarter_end']
+        );
+        $sessionsDuration5PreQuarter = Statistics::getSessionsByDuration(
+            $pre5QuarterDates['quarter_start'],
+            $pre5QuarterDates['quarter_end']
+        );
+
+        // Calculate percent for the rows
+        $percentIncrementSessionDuration0 = api_calculate_increment_percent(
+            $sessionsDuration1PreQuarter['0'],
+            $sessionsDuration5PreQuarter['0']
+        );
+        $percentIncrementSessionDuration5 = api_calculate_increment_percent(
+            $sessionsDuration1PreQuarter['5'],
+            $sessionsDuration5PreQuarter['5']
+        );
+        $percentIncrementSessionDuration10 = api_calculate_increment_percent(
+            $sessionsDuration1PreQuarter['10'],
+            $sessionsDuration5PreQuarter['10']
+        );
+        $percentIncrementSessionDuration15 = api_calculate_increment_percent(
+            $sessionsDuration1PreQuarter['15'],
+            $sessionsDuration5PreQuarter['15']
+        );
+        $percentIncrementSessionDuration30 = api_calculate_increment_percent(
+            $sessionsDuration1PreQuarter['30'],
+            $sessionsDuration5PreQuarter['30']
+        );
+        $percentIncrementSessionDuration60 = api_calculate_increment_percent(
+            $sessionsDuration1PreQuarter['60'],
+            $sessionsDuration5PreQuarter['60']
+        );
+
+        //Make the rows with the recollected data
+        $rows = [];
+        $rows[] = [
+            '0-5&#8242;',
+            $sessionsDuration5PreQuarter['0'],
+            $sessionsDuration4PreQuarter['0'],
+            $sessionsDuration3PreQuarter['0'],
+            $sessionsDuration2PreQuarter['0'],
+            $sessionsDuration1PreQuarter['0'],
+            $percentIncrementSessionDuration0,
+            $sessionsDurationCurrentQuarter['0'],
+        ];
+        $rows[] = [
+            '6-10&#8242;',
+            $sessionsDuration5PreQuarter['5'],
+            $sessionsDuration4PreQuarter['5'],
+            $sessionsDuration3PreQuarter['5'],
+            $sessionsDuration2PreQuarter['5'],
+            $sessionsDuration1PreQuarter['5'],
+            $percentIncrementSessionDuration5,
+            $sessionsDurationCurrentQuarter['5'],
+        ];
+        $rows[] = [
+            '11-15&#8242;',
+            $sessionsDuration5PreQuarter['10'],
+            $sessionsDuration4PreQuarter['10'],
+            $sessionsDuration3PreQuarter['10'],
+            $sessionsDuration2PreQuarter['10'],
+            $sessionsDuration1PreQuarter['10'],
+            $percentIncrementSessionDuration10,
+            $sessionsDurationCurrentQuarter['10'],
+        ];
+        $rows[] = [
+            '16-30&#8242;',
+            $sessionsDuration5PreQuarter['15'],
+            $sessionsDuration4PreQuarter['15'],
+            $sessionsDuration3PreQuarter['15'],
+            $sessionsDuration2PreQuarter['15'],
+            $sessionsDuration1PreQuarter['15'],
+            $percentIncrementSessionDuration15,
+            $sessionsDurationCurrentQuarter['15'],
+        ];
+        $rows[] = [
+            '31-60&#8242;',
+            $sessionsDuration5PreQuarter['30'],
+            $sessionsDuration4PreQuarter['30'],
+            $sessionsDuration3PreQuarter['30'],
+            $sessionsDuration2PreQuarter['30'],
+            $sessionsDuration1PreQuarter['30'],
+            $percentIncrementSessionDuration30,
+            $sessionsDurationCurrentQuarter['30'],
+        ];
+        $rows[] = [
+            '60-&#8734;&#8242;',
+            $sessionsDuration5PreQuarter['60'],
+            $sessionsDuration4PreQuarter['60'],
+            $sessionsDuration3PreQuarter['60'],
+            $sessionsDuration2PreQuarter['60'],
+            $sessionsDuration1PreQuarter['60'],
+            $percentIncrementSessionDuration60,
+            $sessionsDurationCurrentQuarter['60'],
+        ];
+
+        echo Display::table($headers, $rows, []);
+        echo Display::label(get_lang('IncompleteDataCurrentQuarter'), 'warning');
+    break;
+    case "report_quarterly_courses_and_sessions":
+
+        // Make the headers for the tables
+        $headers = [
+             [
+                get_lang('ListOfCoursesCodes'),
+                get_lang('NumberOfSubscribedUsers').'*',
+                get_lang('NumberOfUsersWhoFinishedCourse'),
+            ],
+            [
+                get_lang('ListOfCoursesCodesAndSessions'),
+                get_lang('NumberOfSubscribedUsers').'*',
+                get_lang('NumberOfUsersWhoFinishedCourse'),
+            ],
+        ];
+
+        // Get the data fot the first table
+        $courses = UserManager::countUsersWhoFinishedCourses();
+
+        //Make the rows for first table
+        $rows = [];
+        foreach ($courses as $course => $data) {
+            $course_url = api_get_path(WEB_CODE_PATH).'course_home/course_home.php?cidReq='.$course;
+            $rows[] = [
+                Display::url($course, $course_url, ['target' => SESSION_LINK_TARGET]),
+                $data['subscribed'],
+                $data['finished'],
+            ];
+        }
+
+        echo Display::table($headers[0], $rows, []);
+
+        //Get the data for the second table (with sessions)
+        $courses = UserManager::countUsersWhoFinishedCoursesInSessions();
+
+        //Make the rows for second table
+        $rows = [];
+        foreach ($courses as $course => $data) {
+            $rows[] = [
+                $course,
+                $data['subscribed'],
+                $data['finished'],
+            ];
+        }
+
+        echo Display::tag('br', '', ['style' => 'margin-top: 25px;']);
+        echo Display::table($headers[1], $rows, []);
+        echo Display::tag('br', '', ['style' => 'margin-top: 25px;']);
+        echo Display::label(get_lang('AllUsersIncludingInactiveIncluded'), 'warning');
+
+        break;
+    case "report_quarterly_total_disk_usage":
+
+        $accessUrlId = api_get_current_access_url_id();
+
+        if (api_is_windows_os()) {
+            $message = get_lang('SpaceUsedOnSystemCannotBeMeasuredOnWindows');
+        } else {
+            $dir = api_get_path(SYS_PATH);
+            $du = exec('du -sh '.$dir, $err);
+            list($size, $none) = explode("\t", $du);
+            unset($none);
+            $limit = 0;
+            if (isset($_configuration[$accessUrlId]['hosting_limit_disk_space'])) {
+                $limit = $_configuration[$accessUrlId]['hosting_limit_disk_space'];
+            }
+            $message = sprintf(get_lang('TotalSpaceUsedByPortalXLimitIsYMB'), $size, $limit);
+        }
+        echo Display::tag('H5', $message, ['style' => 'margin-bottom: 25px;']);
+    break;
 }
--- a/main/inc/lib/api.lib.php
+++ b/main/inc/lib/api.lib.php
@ -10285,3 +10285,19 @@ function api_filename_has_blacklisted_stream_wrapper(string $filename)

    return false;
 }
+
+/**
+ * Calculate the percent between two numbers.
+ *
+ * @return string
+ */
+function api_calculate_increment_percent(int $newValue, int $oldValue)
+{
+    if ($oldValue <= 0) {
+        $result = " - ";
+    } else {
+        $result = ' '.round(100 * (($newValue / $oldValue) - 1), 2).' %';
+    }
+
+    return $result;
+}
--- a/main/inc/lib/internationalization.lib.php
+++ b/main/inc/lib/internationalization.lib.php
@ -1042,6 +1042,65 @@ function api_sort_by_first_name($language = null)
    return $sort_by_first_name[$language];
 }

+/**
+ * Return an array with the quarter dates.
+ * If no DateTime is not sent, use the current date.
+ *
+ * @param string|null $date (optional) The date or null.
+ *
+ * @return array E.G.: ['quarter_start' => '2022-10-11',
+ *               'quarter_end' => '2022-12-31',
+ *               'quarter_title' => 'Q4 2022']
+ */
+function getQuarterDates(string $date = null): array
+{
+    if (empty($date)) {
+        $date = api_get_utc_datetime();
+    }
+
+    if (strlen($date > 10)) {
+        $date = substr($date, 0, 10);
+    }
+
+    $month = substr($date, 5, 2);
+    $year = substr($date, 0, 4);
+
+    switch ($month) {
+        case $month >= 1 && $month <= 3:
+            $start = "$year-01-01";
+            $end = "$year-03-31";
+            $quarter = 1;
+            break;
+        case $month >= 4 && $month <= 6:
+            $start = "$year-04-01";
+            $end = "$year-06-30";
+            $quarter = 2;
+            break;
+        case $month >= 7 && $month <= 9:
+            $start = "$year-07-01";
+            $end = "$year-09-30";
+            $quarter = 3;
+            break;
+        case $month >= 10 && $month <= 12:
+            $start = "$year-10-01";
+            $end = "$year-12-31";
+            $quarter = 4;
+            break;
+        default:
+            // Should never happen
+            $start = "$year-01-01";
+            $end = "$year-03-31";
+            $quarter = 1;
+            break;
+    }
+
+    return [
+        'quarter_start' => $start,
+        'quarter_end' => $end,
+        'quarter_title' => sprintf(get_lang('QuarterXQY'), $quarter, $year),
+    ];
+}
+
 /**
 * Multibyte string conversion functions.
 */
--- a/main/inc/lib/statistics.lib.php
+++ b/main/inc/lib/statistics.lib.php
@ -34,31 +34,43 @@ class Statistics
    /**
     * Count courses.
     *
-     * @param string $categoryCode Code of a course category.
-     *                             Default: count all courses.
+     * @param string|null $categoryCode Code of a course category.
+     *                                  Default: count all courses.
+     * @param string|null $dateFrom     dateFrom
+     * @param string|null $dateUntil    dateUntil
     *
     * @return int Number of courses counted
     */
-    public static function countCourses($categoryCode = null)
+    public static function countCourses(string $categoryCode = null, string $dateFrom = null, string $dateUntil = null)
    {
-        $course_table = Database::get_main_table(TABLE_MAIN_COURSE);
-        $access_url_rel_course_table = Database::get_main_table(TABLE_MAIN_ACCESS_URL_REL_COURSE);
+        $courseTable = Database::get_main_table(TABLE_MAIN_COURSE);
+        $accessUrlRelCourseTable = Database::get_main_table(TABLE_MAIN_ACCESS_URL_REL_COURSE);
        $urlId = api_get_current_access_url_id();
        if (api_is_multiple_url_enabled()) {
            $sql = "SELECT COUNT(*) AS number
-                    FROM ".$course_table." as c, $access_url_rel_course_table as u
-                    WHERE u.c_id = c.id AND access_url_id='".$urlId."'";
+                    FROM ".$courseTable." AS c, $accessUrlRelCourseTable AS u
+                    WHERE u.c_id = c.id AND $accessUrlRelCourseTable='".$urlId."'";
            if (isset($categoryCode)) {
                $sql .= " AND category_code = '".Database::escape_string($categoryCode)."'";
            }
        } else {
            $sql = "SELECT COUNT(*) AS number
-                    FROM $course_table";
+                    FROM $courseTable AS c
+                    WHERE 1 = 1";
            if (isset($categoryCode)) {
-                $sql .= " WHERE category_code = '".Database::escape_string($categoryCode)."'";
+                $sql .= " WHERE c.category_code = '".Database::escape_string($categoryCode)."'";
            }
        }

+        if (!empty($dateFrom)) {
+            $dateFrom = api_get_utc_datetime("$dateFrom 00:00:00");
+            $sql .= " AND c.creation_date >= '$dateFrom' ";
+        }
+
+        if (!empty($dateUntil)) {
+            $dateUntil = api_get_utc_datetime("$dateUntil 23:59:59");
+            $sql .= " AND c.creation_date <= '$dateUntil' ";
+        }
        $res = Database::query($sql);
        $obj = Database::fetch_object($res);

@ -68,31 +80,55 @@ class Statistics
    /**
     * Count courses by visibility.
     *
-     * @param int $visibility visibility (0 = closed, 1 = private, 2 = open, 3 = public) all courses
+     * @param array|null  $visibility visibility (0 = closed, 1 = private, 2 = open, 3 = public) all courses
+     * @param string|null $dateFrom   dateFrom
+     * @param string|null $dateUntil  dateUntil
     *
     * @return int Number of courses counted
     */
-    public static function countCoursesByVisibility($visibility = null)
-    {
-        if (!isset($visibility)) {
+    public static function countCoursesByVisibility(
+        array $visibility = null,
+        string $dateFrom = null,
+        string $dateUntil = null
+    ) {
+        if (empty($visibility)) {
            return 0;
+        } else {
+            $visibilityString = '';
+            $auxArrayVisibility = [];
+            if (!is_array($visibility)) {
+                $visibility = [$visibility];
+            }
+            foreach ($visibility as $item) {
+                $auxArrayVisibility[] = (int) $item;
+            }
+            $visibilityString = implode(',', $auxArrayVisibility);
        }
-        $course_table = Database::get_main_table(TABLE_MAIN_COURSE);
-        $access_url_rel_course_table = Database::get_main_table(TABLE_MAIN_ACCESS_URL_REL_COURSE);
+
+        $courseTable = Database::get_main_table(TABLE_MAIN_COURSE);
+        $accessUrlRelCourseTable = Database::get_main_table(TABLE_MAIN_ACCESS_URL_REL_COURSE);
        $urlId = api_get_current_access_url_id();
        if (api_is_multiple_url_enabled()) {
            $sql = "SELECT COUNT(*) AS number
-                    FROM $course_table as c, $access_url_rel_course_table as u
-                    WHERE u.c_id = c.id AND access_url_id='".$urlId."'";
-            if (isset($visibility)) {
-                $sql .= " AND visibility = ".intval($visibility);
-            }
+                    FROM $courseTable AS c, $accessUrlRelCourseTable AS u
+                    WHERE u.c_id = c.id AND u.access_url_id='".$urlId."'";
        } else {
-            $sql = "SELECT COUNT(*) AS number FROM $course_table ";
-            if (isset($visibility)) {
-                $sql .= " WHERE visibility = ".intval($visibility);
-            }
+            $sql = "SELECT COUNT(*) AS number
+                    FROM $courseTable AS c
+                    WHERE 1 = 1";
+        }
+        $sql .= " AND visibility IN ($visibilityString) ";
+
+        if (!empty($dateFrom)) {
+            $dateFrom = api_get_utc_datetime("$dateFrom 00:00:00");
+            $sql .= " AND c.creation_date >= '$dateFrom' ";
+        }
+
+        if (!empty($dateUntil)) {
+            $dateUntil = api_get_utc_datetime("$dateUntil 23:59:59");
+            $sql .= " AND c.creation_date <= '$dateUntil' ";
        }
+
        $res = Database::query($sql);
        $obj = Database::fetch_object($res);

@ -1609,41 +1645,13 @@ class Statistics
        return '<table id="table_'.$bossId.'"></table>';
    }

-    /**
-     * It gets lti learnpath results by date.
-     *
-     * @param $startDate
-     * @param $endDate
-     *
-     * @return array
-     */
-    private static function getLtiLeaningPathByDate($startDate, $endDate)
-    {
-        /** @var DateTime $startDate */
-        $startDate = api_get_utc_datetime("$startDate 00:00:00");
-        /** @var DateTime $endDate */
-        $endDate = api_get_utc_datetime("$endDate 23:59:59");
-
-        if (empty($startDate) || empty($endDate)) {
-            return [];
-        }
-
-        require_once api_get_path(SYS_PLUGIN_PATH).'lti_provider/LtiProviderPlugin.php';
-
-        $plugin = LtiProviderPlugin::create();
-
-        $result = $plugin->getToolLearnPathResult($startDate, $endDate);
-
-        return $result;
-    }
-
    /**
     * @param string $startDate
     * @param string $endDate
     *
     * @return array
     */
-    private static function getLoginsByDate($startDate, $endDate)
+    public static function getLoginsByDate($startDate, $endDate)
    {
        /** @var DateTime $startDate */
        $startDate = api_get_utc_datetime("$startDate 00:00:00");
@ -1683,4 +1691,125 @@ class Statistics

        return $result;
    }
+
+    /**
+     * Return de number of certificates generated.
+     * This function is resource intensive.
+     */
+    public static function countCertificatesByQuarter(string $dateFrom = null, string $dateUntil = null): int
+    {
+        $tableGradebookCertificate = Database::get_main_table(TABLE_MAIN_GRADEBOOK_CERTIFICATE);
+
+        $condition = "";
+
+        if (!empty($dateFrom) && !empty($dateUntil)) {
+            $dateFrom = api_get_utc_datetime("$dateFrom 00:00:00");
+            $dateUntil = api_get_utc_datetime("$dateUntil 23:59:59");
+            $condition = "WHERE (created_at BETWEEN '$dateFrom' AND '$dateUntil')";
+        } elseif (!empty($dateFrom)) {
+            $dateFrom = api_get_utc_datetime("$dateFrom 00:00:00");
+            $condition = "WHERE created_at >= '$dateFrom'";
+        } elseif (!empty($dateUntil)) {
+            $dateUntil = api_get_utc_datetime("$dateUntil 23:59:59");
+            $condition = "WHERE created_at <= '$dateUntil'";
+        }
+
+        $sql = "
+            SELECT count(*) AS count
+            FROM $tableGradebookCertificate
+            $condition
+        ";
+
+        $response = Database::query($sql);
+        $obj = Database::fetch_object($response);
+
+        return $obj->count;
+    }
+
+    /**
+     * Get the number of logins by dates.
+     * This function is resource intensive.
+     */
+    public static function getSessionsByDuration(string $dateFrom, string $dateUntil): array
+    {
+        $results = [
+            '0' => 0,
+            '5' => 0,
+            '10' => 0,
+            '15' => 0,
+            '30' => 0,
+            '60' => 0,
+        ];
+
+        if (!empty($dateFrom) && !empty($dateUntil)) {
+            $table = Database::get_main_table(TABLE_STATISTIC_TRACK_E_LOGIN);
+            $accessUrlRelUserTable = Database::get_main_table(TABLE_MAIN_ACCESS_URL_REL_USER);
+            $urlId = api_get_current_access_url_id();
+            $tableUrl = '';
+            $whereUrl = '';
+
+            $dateFrom = api_get_utc_datetime("$dateFrom 00:00:00");
+            $dateUntil = api_get_utc_datetime("$dateUntil 23:59:59");
+
+            if (api_is_multiple_url_enabled()) {
+                $tableUrl = ", $accessUrlRelUserTable";
+                $whereUrl = " AND login_user_id = user_id AND access_url_id = $urlId";
+            }
+
+            $sql = "SELECT login_id, TIMESTAMPDIFF(SECOND, login_date, logout_date) AS duration
+            FROM $table $tableUrl
+            WHERE login_date >= '$dateFrom'
+            AND logout_date <= '$dateUntil'
+            $whereUrl
+            ";
+
+            $res = Database::query($sql);
+
+            while ($session = Database::fetch_array($res)) {
+                if ($session['duration'] > 3600) {
+                    $results['60']++;
+                } elseif ($session['duration'] > 1800) {
+                    $results['30']++;
+                } elseif ($session['duration'] > 900) {
+                    $results['15']++;
+                } elseif ($session['duration'] > 600) {
+                    $results['10']++;
+                } elseif ($session['duration'] > 300) {
+                    $results['5']++;
+                } else {
+                    $results['0']++;
+                }
+            }
+        }
+
+        return $results;
+    }
+
+    /**
+     * It gets lti learnpath results by date.
+     *
+     * @param $startDate
+     * @param $endDate
+     *
+     * @return array
+     */
+    private static function getLtiLeaningPathByDate($startDate, $endDate)
+    {
+        /** @var DateTime $startDate */
+        $startDate = api_get_utc_datetime("$startDate 00:00:00");
+        /** @var DateTime $endDate */
+        $endDate = api_get_utc_datetime("$endDate 23:59:59");
+
+        if (empty($startDate) || empty($endDate)) {
+            return [];
+        }
+
+        require_once api_get_path(SYS_PLUGIN_PATH).'lti_provider/LtiProviderPlugin.php';
+
+        $plugin = LtiProviderPlugin::create();
+
+        $result = $plugin->getToolLearnPathResult($startDate, $endDate);
+
+        return $result;
+    }
 }
--- a/main/inc/lib/tracking.lib.php
+++ b/main/inc/lib/tracking.lib.php
@ -2578,6 +2578,47 @@ class Tracking
        return -1;
    }

+    /**
+     * Return the total time spent in courses (no the total in platform).
+     *
+     * @return int
+     */
+    public static function getTotalTimeSpentInCourses(
+        string $dateFrom = '',
+        string $dateUntil = ''
+    ) {
+        $tableTrackLogin = Database::get_main_table(TABLE_STATISTIC_TRACK_E_COURSE_ACCESS);
+        $tableUrlRelUser = Database::get_main_table(TABLE_MAIN_ACCESS_URL_REL_USER);
+
+        $tableUrl = null;
+        $urlCondition = null;
+        $conditionTime = null;
+        if (api_is_multiple_url_enabled()) {
+            $accessUrlId = api_get_current_access_url_id();
+            $tableUrl = ", ".$tableUrlRelUser." as url_users";
+            $urlCondition = " AND u.login_user_id = url_users.user_id AND access_url_id = $accessUrlId";
+        }
+
+        if (!empty($dateFrom) && !empty($dateUntil)) {
+            $dateFrom = Database::escape_string($dateFrom);
+            $dateUntil = Database::escape_string($dateUntil);
+            $conditionTime = " (login_course_date >= '$dateFrom' AND logout_course_date <= '$dateUntil' ) ";
+        }
+        $sql = "SELECT SUM(TIMESTAMPDIFF(HOUR, login_course_date, logout_course_date)) diff
+    	        FROM $tableTrackLogin u $tableUrl
+                WHERE $conditionTime $urlCondition";
+
+        $rs = Database::query($sql);
+        $row = Database::fetch_array($rs, 'ASSOC');
+        $diff = $row['diff'];
+
+        if ($diff >= 0) {
+            return $diff;
+        }
+
+        return -1;
+    }
+
    /**
     * Checks if the "lp_minimum_time" feature is available for the course.
     *
--- a/main/inc/lib/usermanager.lib.php
+++ b/main/inc/lib/usermanager.lib.php
@ -4556,27 +4556,32 @@ class UserManager
    /**
     * Get the total count of users.
     *
-     * @param int $status        Status of users to be counted
-     * @param int $access_url_id Access URL ID (optional)
-     * @param int $active
+     * @param int|null $status        Status of users to be counted
+     * @param int|null $access_url_id Access URL ID (optional)
+     * @param int|null $active
     *
     * @return mixed Number of users or false on error
     */
-    public static function get_number_of_users($status = 0, $access_url_id = 1, $active = null)
-    {
-        $t_u = Database::get_main_table(TABLE_MAIN_USER);
-        $t_a = Database::get_main_table(TABLE_MAIN_ACCESS_URL_REL_USER);
+    public static function get_number_of_users(
+        $status = 0,
+        $access_url_id = 1,
+        $active = null,
+        string $dateFrom = null,
+        string $dateUntil = null
+    ) {
+        $tableUser = Database::get_main_table(TABLE_MAIN_USER);
+        $tableAccessUrlRelUser = Database::get_main_table(TABLE_MAIN_ACCESS_URL_REL_USER);

        if (api_is_multiple_url_enabled()) {
            $sql = "SELECT count(u.id)
-                    FROM $t_u u
-                    INNER JOIN $t_a url_user
+                    FROM $tableUser u
+                    INNER JOIN $tableAccessUrlRelUser url_user
                    ON (u.id = url_user.user_id)
                    WHERE url_user.access_url_id = $access_url_id
            ";
        } else {
            $sql = "SELECT count(u.id)
-                    FROM $t_u u
+                    FROM $tableUser u
                    WHERE 1 = 1 ";
        }

@ -4585,11 +4590,21 @@ class UserManager
            $sql .= " AND u.status = $status ";
        }

-        if ($active !== null) {
+        if (isset($active)) {
            $active = (int) $active;
            $sql .= " AND u.active = $active ";
        }

+        if (!empty($dateFrom)) {
+            $dateFrom = api_get_utc_datetime("$dateFrom 00:00:00");
+            $sql .= " AND u.registration_date >= '$dateFrom' ";
+        }
+
+        if (!empty($dateUntil)) {
+            $dateUntil = api_get_utc_datetime("$dateUntil 23:59:59");
+            $sql .= " AND u.registration_date <= '$dateUntil' ";
+        }
+
        $res = Database::query($sql);
        if (Database::num_rows($res) === 1) {
            return (int) Database::result($res, 0, 0);
@ -7705,6 +7720,111 @@ SQL;
        ];
    }

+    /**
+     * Count users in courses and if they have certificate.
+     * This function is resource intensive.
+     *
+     * @return array
+     */
+    public static function countUsersWhoFinishedCourses()
+    {
+        $courses = [];
+        $currentAccessUrlId = api_get_current_access_url_id();
+        $sql = "SELECT course.code, cru.user_id
+                FROM course_rel_user cru
+                    JOIN course ON cru.c_id = course.id
+                    JOIN access_url_rel_user auru on cru.user_id = auru.user_id
+                    JOIN access_url_rel_course ON course.id = access_url_rel_course.c_id
+                WHERE access_url_rel_course.access_url_id = $currentAccessUrlId
+                ORDER BY course.code
+        ";
+
+        $res = Database::query($sql);
+        if (Database::num_rows($res) > 0) {
+            while ($row = Database::fetch_array($res)) {
+                if (!isset($courses[$row['code']])) {
+                    $courses[$row['code']] = [
+                        'subscribed' => 0,
+                        'finished' => 0,
+                    ];
+                }
+
+                $courses[$row['code']]['subscribed']++;
+                $entityManager = Database::getManager();
+                $repository = $entityManager->getRepository('ChamiloCoreBundle:GradebookCategory');
+                //todo check when have more than 1 gradebook
+                /** @var \Chamilo\CoreBundle\Entity\GradebookCategory $gradebook */
+                $gradebook = $repository->findOneBy(['courseCode' => $row['code']]);
+
+                if (!empty($gradebook)) {
+                    $finished = 0;
+                    $gb = Category::createCategoryObjectFromEntity($gradebook);
+                    $finished = $gb->is_certificate_available($row['user_id']);
+                    if (!empty($finished)) {
+                        $courses[$row['code']]['finished']++;
+                    }
+                }
+            }
+        }
+
+        return $courses;
+    }
+
+    /**
+     * Count users in sessions and if they have certificate.
+     * This function is resource intensive.
+     *
+     * @return array
+     */
+    public static function countUsersWhoFinishedCoursesInSessions()
+    {
+        $coursesInSessions = [];
+        $currentAccessUrlId = api_get_current_access_url_id();
+        $sql = "SELECT course.code, srcru.session_id, srcru.user_id, session.name
+                FROM session_rel_course_rel_user srcru
+                    JOIN course ON srcru.c_id = course.id
+                    JOIN access_url_rel_session aurs on srcru.session_id = aurs.session_id
+                    JOIN session ON srcru.session_id = session.id
+                WHERE aurs.access_url_id = $currentAccessUrlId
+                ORDER BY course.code, session.name
+        ";
+
+        $res = Database::query($sql);
+        if (Database::num_rows($res) > 0) {
+            while ($row = Database::fetch_array($res)) {
+                $index = $row['code'].' ('.$row['name'].')';
+                if (!isset($coursesInSessions[$index])) {
+                    $coursesInSessions[$index] = [
+                        'subscribed' => 0,
+                        'finished' => 0,
+                    ];
+                }
+
+                $coursesInSessions[$index]['subscribed']++;
+                $entityManager = Database::getManager();
+                $repository = $entityManager->getRepository('ChamiloCoreBundle:GradebookCategory');
+                /** @var \Chamilo\CoreBundle\Entity\GradebookCategory $gradebook */
+                $gradebook = $repository->findOneBy(
+                    [
+                        'courseCode' => $row['code'],
+                        'sessionId' => $row['session_id'],
+                    ]
+                );
+
+                if (!empty($gradebook)) {
+                    $finished = 0;
+                    $gb = Category::createCategoryObjectFromEntity($gradebook);
+                    $finished = $gb->is_certificate_available($row['user_id']);
+                    if (!empty($finished)) {
+                        $coursesInSessions[$index]['finished']++;
+                    }
+                }
+            }
+        }
+
+        return $coursesInSessions;
+    }
+
    /**
     * @return EncoderFactory
     */
--- a/plugin/dashboard/block_global_info/block_global_info.class.php
+++ b/plugin/dashboard/block_global_info/block_global_info.class.php
@ -140,11 +140,11 @@ class BlockGlobalInfo extends Block
            [get_lang('NumberOfUsersActive'), '<a href="'.$path.'admin/user_list.php?keyword_firstname=&amp;keyword_lastname=&amp;keyword_username=&amp;keyword_email=&amp;keyword_officialcode=&amp;keyword_status=%25&amp;keyword_active=1&amp;submit=&amp;_qf__advanced_search=">'.Statistics::countUsers(null, null, null, true).'</a>'],
            // Check number of courses
            [get_lang('NumberOfCoursesTotal'), '<a href="'.$path.'admin/course_list.php">'.Statistics::countCourses().'</a>'],
-            [get_lang('NumberOfCoursesPublic'), '<a href="'.$path.'admin/course_list.php?keyword_code=&amp;keyword_title=&amp;keyword_language=%25&amp;keyword_category=&amp;keyword_visibility='.COURSE_VISIBILITY_OPEN_WORLD.'&amp;keyword_subscribe=%25&amp;keyword_unsubscribe=%25&amp;submit=&amp;_qf__advanced_course_search=">'.Statistics::countCoursesByVisibility(COURSE_VISIBILITY_OPEN_WORLD).'</a>'],
-            [get_lang('NumberOfCoursesOpen'), '<a href="'.$path.'admin/course_list.php?keyword_code=&amp;keyword_title=&amp;keyword_language=%25&amp;keyword_category=&amp;keyword_visibility='.COURSE_VISIBILITY_OPEN_PLATFORM.'&amp;keyword_subscribe=%25&amp;keyword_unsubscribe=%25&amp;submit=&amp;_qf__advanced_course_search=">'.Statistics::countCoursesByVisibility(COURSE_VISIBILITY_OPEN_PLATFORM).'</a>'],
-            [get_lang('NumberOfCoursesPrivate'), '<a href="'.$path.'admin/course_list.php?keyword_code=&amp;keyword_title=&amp;keyword_language=%25&amp;keyword_category=&amp;keyword_visibility='.COURSE_VISIBILITY_REGISTERED.'&amp;keyword_subscribe=%25&amp;keyword_unsubscribe=%25&amp;submit=&amp;_qf__advanced_course_search=">'.Statistics::countCoursesByVisibility(COURSE_VISIBILITY_REGISTERED).'</a>'],
-            [get_lang('NumberOfCoursesClosed'), '<a href="'.$path.'admin/course_list.php?keyword_code=&amp;keyword_title=&amp;keyword_language=%25&amp;keyword_category=&amp;keyword_visibility='.COURSE_VISIBILITY_CLOSED.'&amp;keyword_subscribe=%25&amp;keyword_unsubscribe=%25&amp;submit=&amp;_qf__advanced_course_search=">'.Statistics::countCoursesByVisibility(COURSE_VISIBILITY_CLOSED).'</a>'],
-            [get_lang('NumberOfCoursesHidden'), '<a href="'.$path.'admin/course_list.php?keyword_code=&amp;keyword_title=&amp;keyword_language=%25&amp;keyword_category=&amp;keyword_visibility='.COURSE_VISIBILITY_HIDDEN.'&amp;keyword_subscribe=%25&amp;keyword_unsubscribe=%25&amp;submit=&amp;_qf__advanced_course_search=">'.Statistics::countCoursesByVisibility(COURSE_VISIBILITY_HIDDEN).'</a>'],
+            [get_lang('NumberOfCoursesPublic'), '<a href="'.$path.'admin/course_list.php?keyword_code=&amp;keyword_title=&amp;keyword_language=%25&amp;keyword_category=&amp;keyword_visibility='.COURSE_VISIBILITY_OPEN_WORLD.'&amp;keyword_subscribe=%25&amp;keyword_unsubscribe=%25&amp;submit=&amp;_qf__advanced_course_search=">'.Statistics::countCoursesByVisibility([COURSE_VISIBILITY_OPEN_WORLD]).'</a>'],
+            [get_lang('NumberOfCoursesOpen'), '<a href="'.$path.'admin/course_list.php?keyword_code=&amp;keyword_title=&amp;keyword_language=%25&amp;keyword_category=&amp;keyword_visibility='.COURSE_VISIBILITY_OPEN_PLATFORM.'&amp;keyword_subscribe=%25&amp;keyword_unsubscribe=%25&amp;submit=&amp;_qf__advanced_course_search=">'.Statistics::countCoursesByVisibility([COURSE_VISIBILITY_OPEN_PLATFORM]).'</a>'],
+            [get_lang('NumberOfCoursesPrivate'), '<a href="'.$path.'admin/course_list.php?keyword_code=&amp;keyword_title=&amp;keyword_language=%25&amp;keyword_category=&amp;keyword_visibility='.COURSE_VISIBILITY_REGISTERED.'&amp;keyword_subscribe=%25&amp;keyword_unsubscribe=%25&amp;submit=&amp;_qf__advanced_course_search=">'.Statistics::countCoursesByVisibility([COURSE_VISIBILITY_REGISTERED]).'</a>'],
+            [get_lang('NumberOfCoursesClosed'), '<a href="'.$path.'admin/course_list.php?keyword_code=&amp;keyword_title=&amp;keyword_language=%25&amp;keyword_category=&amp;keyword_visibility='.COURSE_VISIBILITY_CLOSED.'&amp;keyword_subscribe=%25&amp;keyword_unsubscribe=%25&amp;submit=&amp;_qf__advanced_course_search=">'.Statistics::countCoursesByVisibility([COURSE_VISIBILITY_CLOSED]).'</a>'],
+            [get_lang('NumberOfCoursesHidden'), '<a href="'.$path.'admin/course_list.php?keyword_code=&amp;keyword_title=&amp;keyword_language=%25&amp;keyword_category=&amp;keyword_visibility='.COURSE_VISIBILITY_HIDDEN.'&amp;keyword_subscribe=%25&amp;keyword_unsubscribe=%25&amp;submit=&amp;_qf__advanced_course_search=">'.Statistics::countCoursesByVisibility([COURSE_VISIBILITY_HIDDEN]).'</a>'],
        ];

        return $global_info;