mirror of
https://github.com/acanas/swad-core.git
synced 2024-09-24 00:01:03 +02:00
1651 lines
64 KiB
C
1651 lines
64 KiB
C
// swad_indicators.c: indicators of courses
|
|
|
|
/*
|
|
SWAD (Shared Workspace At a Distance),
|
|
is a web platform developed at the University of Granada (Spain),
|
|
and used to support university teaching.
|
|
|
|
This file is part of SWAD core.
|
|
Copyright (C) 1999-2018 Antonio Cañas Vargas
|
|
|
|
This program is free software: you can redistribute it and/or modify
|
|
it under the terms of the GNU Affero General Public License as
|
|
published by the Free Software Foundation, either version 3 of the
|
|
License, or (at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU Affero General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Affero General Public License
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
/*****************************************************************************/
|
|
/********************************* Headers ***********************************/
|
|
/*****************************************************************************/
|
|
|
|
#include <linux/stddef.h> // For NULL
|
|
#include <stdio.h> // For fprintf
|
|
#include <mysql/mysql.h> // To access MySQL databases
|
|
|
|
#include "swad_action.h"
|
|
#include "swad_box.h"
|
|
#include "swad_database.h"
|
|
#include "swad_global.h"
|
|
#include "swad_indicator.h"
|
|
#include "swad_parameter.h"
|
|
#include "swad_table.h"
|
|
#include "swad_theme.h"
|
|
|
|
/*****************************************************************************/
|
|
/************** External global variables from others modules ****************/
|
|
/*****************************************************************************/
|
|
|
|
extern struct Globals Gbl;
|
|
|
|
/*****************************************************************************/
|
|
/*************************** Internal constants ******************************/
|
|
/*****************************************************************************/
|
|
|
|
/*****************************************************************************/
|
|
/******************************* Internal types ******************************/
|
|
/*****************************************************************************/
|
|
|
|
typedef enum
|
|
{
|
|
Ind_INDICATORS_BRIEF,
|
|
Ind_INDICATORS_FULL,
|
|
} Ind_IndicatorsLayout_t;
|
|
|
|
/*****************************************************************************/
|
|
/***************************** Internal prototypes ***************************/
|
|
/*****************************************************************************/
|
|
|
|
static void Ind_GetParamsIndicators (void);
|
|
static void Ind_GetParamNumIndicators (void);
|
|
static unsigned Ind_GetTableOfCourses (MYSQL_RES **mysql_res);
|
|
static bool Ind_GetIfShowBigList (unsigned NumCrss);
|
|
static void Ind_PutButtonToConfirmIWantToSeeBigList (unsigned NumCrss);
|
|
static void Ind_PutParamsConfirmIWantToSeeBigList (void);
|
|
|
|
static void Ind_GetNumCoursesWithIndicators (unsigned NumCrssWithIndicatorYes[1 + Ind_NUM_INDICATORS],
|
|
unsigned NumCrss,MYSQL_RES *mysql_res);
|
|
static void Ind_ShowNumCoursesWithIndicators (unsigned NumCrssWithIndicatorYes[1 + Ind_NUM_INDICATORS],
|
|
unsigned NumCrss,bool PutForm);
|
|
static void Ind_ShowTableOfCoursesWithIndicators (Ind_IndicatorsLayout_t IndicatorsLayout,
|
|
unsigned NumCrss,MYSQL_RES *mysql_res);
|
|
static unsigned Ind_GetAndUpdateNumIndicatorsCrs (long CrsCod);
|
|
static void Ind_StoreIndicatorsCrsIntoDB (long CrsCod,unsigned NumIndicators);
|
|
static unsigned long Ind_GetNumFilesInDocumZonesOfCrsFromDB (long CrsCod);
|
|
static unsigned long Ind_GetNumFilesInShareZonesOfCrsFromDB (long CrsCod);
|
|
static unsigned long Ind_GetNumFilesInAssigZonesOfCrsFromDB (long CrsCod);
|
|
static unsigned long Ind_GetNumFilesInWorksZonesOfCrsFromDB (long CrsCod);
|
|
|
|
/*****************************************************************************/
|
|
/******************* Request showing statistics of courses *******************/
|
|
/*****************************************************************************/
|
|
|
|
void Ind_ReqIndicatorsCourses (void)
|
|
{
|
|
extern const char *Hlp_ANALYTICS_Indicators;
|
|
extern const char *The_ClassForm[The_NUM_THEMES];
|
|
extern const char *Txt_Scope;
|
|
extern const char *Txt_Types_of_degree;
|
|
extern const char *Txt_only_if_the_scope_is_X;
|
|
extern const char *Txt_Department;
|
|
extern const char *Txt_Any_department;
|
|
extern const char *Txt_No_of_indicators;
|
|
extern const char *Txt_Indicators_of_courses;
|
|
extern const char *Txt_Show_more_details;
|
|
MYSQL_RES *mysql_res;
|
|
unsigned NumCrss;
|
|
unsigned NumCrssWithIndicatorYes[1 + Ind_NUM_INDICATORS];
|
|
unsigned NumCrssToList;
|
|
unsigned Ind;
|
|
|
|
/***** Get parameters *****/
|
|
Ind_GetParamsIndicators ();
|
|
|
|
/***** Start box *****/
|
|
Box_StartBox (NULL,Txt_Indicators_of_courses,NULL,
|
|
Hlp_ANALYTICS_Indicators,Box_NOT_CLOSABLE);
|
|
|
|
/***** Form to update indicators *****/
|
|
/* Start form and table */
|
|
Act_FormStart (ActReqStaCrs);
|
|
Tbl_StartTableWide (2);
|
|
|
|
/* Scope */
|
|
fprintf (Gbl.F.Out,"<tr>"
|
|
"<td class=\"RIGHT_MIDDLE\">"
|
|
"<label for=\"ScopeInd\" class=\"%s\">%s:</label>"
|
|
"</td>"
|
|
"<td class=\"LEFT_MIDDLE\">",
|
|
The_ClassForm[Gbl.Prefs.Theme],Txt_Scope);
|
|
Sco_PutSelectorScope ("ScopeInd",true);
|
|
fprintf (Gbl.F.Out,"</td>"
|
|
"</tr>");
|
|
|
|
/* Compute stats for a type of degree */
|
|
fprintf (Gbl.F.Out,"<tr>"
|
|
"<td class=\"RIGHT_MIDDLE\">"
|
|
"<label for=\"OthDegTypCod\" class=\"%s\">%s:</label>"
|
|
"</td>"
|
|
"<td class=\"DAT LEFT_MIDDLE\">",
|
|
The_ClassForm[Gbl.Prefs.Theme],Txt_Types_of_degree);
|
|
DT_WriteSelectorDegreeTypes ();
|
|
fprintf (Gbl.F.Out," (");
|
|
fprintf (Gbl.F.Out,Txt_only_if_the_scope_is_X,
|
|
Cfg_PLATFORM_SHORT_NAME);
|
|
fprintf (Gbl.F.Out,")</td>"
|
|
"</tr>");
|
|
|
|
/* Compute stats for courses with teachers belonging to any department or to a particular departament? */
|
|
fprintf (Gbl.F.Out,"<tr>"
|
|
"<td class=\"RIGHT_MIDDLE\">"
|
|
"<label for=\"%s\" class=\"%s\">%s:</label>"
|
|
"</td>"
|
|
"<td class=\"LEFT_MIDDLE\">",
|
|
Dpt_PARAM_DPT_COD_NAME,
|
|
The_ClassForm[Gbl.Prefs.Theme],Txt_Department);
|
|
Dpt_WriteSelectorDepartment (Gbl.CurrentIns.Ins.InsCod, // Departments in current insitution
|
|
Gbl.Stat.DptCod, // Selected department
|
|
"INDICATORS_INPUT", // Selector class
|
|
-1L, // First option
|
|
Txt_Any_department, // Text when no department selected
|
|
true); // Submit on change
|
|
fprintf (Gbl.F.Out,"</td>"
|
|
"</tr>");
|
|
|
|
/***** Get courses from database *****/
|
|
/* The result will contain courses with any number of indicators
|
|
If Gbl.Stat.NumIndicators < 0 ==> all courses in result will be listed
|
|
If Gbl.Stat.NumIndicators >= 0 ==> only those courses in result
|
|
with Gbl.Stat.NumIndicators set to yes
|
|
will be listed */
|
|
NumCrss = Ind_GetTableOfCourses (&mysql_res);
|
|
|
|
/***** Get vector with numbers of courses with 0, 1, 2... indicators set to yes *****/
|
|
Ind_GetNumCoursesWithIndicators (NumCrssWithIndicatorYes,NumCrss,mysql_res);
|
|
|
|
/* Selection of the number of indicators */
|
|
fprintf (Gbl.F.Out,"<tr>"
|
|
"<td class=\"RIGHT_TOP %s\">"
|
|
"%s:"
|
|
"</td>"
|
|
"<td class=\"LEFT_TOP\">",
|
|
The_ClassForm[Gbl.Prefs.Theme],
|
|
Txt_No_of_indicators);
|
|
Ind_ShowNumCoursesWithIndicators (NumCrssWithIndicatorYes,NumCrss,true);
|
|
fprintf (Gbl.F.Out,"</td>"
|
|
"</tr>");
|
|
|
|
/* End table and form */
|
|
Tbl_EndTable ();
|
|
Act_FormEnd ();
|
|
|
|
/***** Show the stats of courses *****/
|
|
for (Ind = 0, NumCrssToList = 0;
|
|
Ind <= Ind_NUM_INDICATORS;
|
|
Ind++)
|
|
if (Gbl.Stat.IndicatorsSelected[Ind])
|
|
NumCrssToList += NumCrssWithIndicatorYes[Ind];
|
|
if (Ind_GetIfShowBigList (NumCrssToList))
|
|
{
|
|
/* Show table */
|
|
Ind_ShowTableOfCoursesWithIndicators (Ind_INDICATORS_BRIEF,NumCrss,mysql_res);
|
|
|
|
/* Button to show more details */
|
|
Act_FormStart (ActSeeAllStaCrs);
|
|
Sco_PutParamScope ("ScopeInd",Gbl.Scope.Current);
|
|
Par_PutHiddenParamLong ("OthDegTypCod",Gbl.Stat.DegTypCod);
|
|
Par_PutHiddenParamLong (Dpt_PARAM_DPT_COD_NAME,Gbl.Stat.DptCod);
|
|
if (Gbl.Stat.StrIndicatorsSelected[0])
|
|
Par_PutHiddenParamString ("Indicators",Gbl.Stat.StrIndicatorsSelected);
|
|
Btn_PutConfirmButton (Txt_Show_more_details);
|
|
Act_FormEnd ();
|
|
}
|
|
|
|
/***** End box *****/
|
|
Box_EndBox ();
|
|
|
|
/***** Free structure that stores the query result *****/
|
|
DB_FreeMySQLResult (&mysql_res);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/************* Get parameters related to indicators of courses ***************/
|
|
/*****************************************************************************/
|
|
|
|
static void Ind_GetParamsIndicators (void)
|
|
{
|
|
/***** Get scope *****/
|
|
Gbl.Scope.Allowed = 1 << Sco_SCOPE_SYS |
|
|
1 << Sco_SCOPE_CTY |
|
|
1 << Sco_SCOPE_INS |
|
|
1 << Sco_SCOPE_CTR |
|
|
1 << Sco_SCOPE_DEG |
|
|
1 << Sco_SCOPE_CRS;
|
|
Gbl.Scope.Default = Sco_SCOPE_CRS;
|
|
Sco_GetScope ("ScopeInd");
|
|
|
|
/***** Get degree type code *****/
|
|
Gbl.Stat.DegTypCod = (Gbl.Scope.Current == Sco_SCOPE_SYS) ?
|
|
DT_GetAndCheckParamOtherDegTypCod (-1L) : // -1L (any degree type) is allowed here
|
|
-1L;
|
|
|
|
/***** Get department code *****/
|
|
Gbl.Stat.DptCod = Dpt_GetAndCheckParamDptCod (-1L); // -1L (any department) is allowed here
|
|
|
|
/***** Get number of indicators *****/
|
|
Ind_GetParamNumIndicators ();
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/*********************** Show statistics of courses **************************/
|
|
/*****************************************************************************/
|
|
|
|
void Ind_ShowIndicatorsCourses (void)
|
|
{
|
|
MYSQL_RES *mysql_res;
|
|
unsigned NumCrss;
|
|
unsigned NumCrssWithIndicatorYes[1 + Ind_NUM_INDICATORS];
|
|
|
|
/***** Get parameters *****/
|
|
Ind_GetParamsIndicators ();
|
|
|
|
/***** Get courses from database *****/
|
|
NumCrss = Ind_GetTableOfCourses (&mysql_res);
|
|
|
|
/***** Get vector with numbers of courses with 0, 1, 2... indicators set to yes *****/
|
|
Ind_GetNumCoursesWithIndicators (NumCrssWithIndicatorYes,NumCrss,mysql_res);
|
|
|
|
/***** Show table with numbers of courses with 0, 1, 2... indicators set to yes *****/
|
|
Ind_ShowNumCoursesWithIndicators (NumCrssWithIndicatorYes,NumCrss,false);
|
|
|
|
/***** Show the stats of courses *****/
|
|
Ind_ShowTableOfCoursesWithIndicators (Ind_INDICATORS_FULL,NumCrss,mysql_res);
|
|
|
|
/***** Free structure that stores the query result *****/
|
|
DB_FreeMySQLResult (&mysql_res);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/*************** Get parameter with the number of indicators *****************/
|
|
/*****************************************************************************/
|
|
|
|
static void Ind_GetParamNumIndicators (void)
|
|
{
|
|
unsigned Ind;
|
|
const char *Ptr;
|
|
char LongStr[1 + 10 + 1];
|
|
long Indicator;
|
|
|
|
/***** Get parameter multiple with list of indicators selected *****/
|
|
Par_GetParMultiToText ("Indicators",Gbl.Stat.StrIndicatorsSelected,Ind_MAX_SIZE_INDICATORS_SELECTED);
|
|
|
|
/***** Set which indicators have been selected (checkboxes on) *****/
|
|
if (Gbl.Stat.StrIndicatorsSelected[0])
|
|
{
|
|
/* Reset all indicators */
|
|
for (Ind = 0;
|
|
Ind <= Ind_NUM_INDICATORS;
|
|
Ind++)
|
|
Gbl.Stat.IndicatorsSelected[Ind] = false;
|
|
|
|
/* Set indicators selected */
|
|
for (Ptr = Gbl.Stat.StrIndicatorsSelected;
|
|
*Ptr;
|
|
)
|
|
{
|
|
/* Get next indicator selected */
|
|
Par_GetNextStrUntilSeparParamMult (&Ptr,LongStr,1 + 10);
|
|
Indicator = Str_ConvertStrCodToLongCod (LongStr);
|
|
|
|
/* Set each indicator in list StrIndicatorsSelected as selected */
|
|
for (Ind = 0;
|
|
Ind <= Ind_NUM_INDICATORS;
|
|
Ind++)
|
|
if ((long) Ind == Indicator)
|
|
Gbl.Stat.IndicatorsSelected[Ind] = true;
|
|
}
|
|
}
|
|
else
|
|
/* Set all indicators */
|
|
for (Ind = 0;
|
|
Ind <= Ind_NUM_INDICATORS;
|
|
Ind++)
|
|
Gbl.Stat.IndicatorsSelected[Ind] = true;
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/******************* Build query to get table of courses *********************/
|
|
/*****************************************************************************/
|
|
// Return the number of courses found
|
|
|
|
static unsigned Ind_GetTableOfCourses (MYSQL_RES **mysql_res)
|
|
{
|
|
char Query[1024];
|
|
|
|
switch (Gbl.Scope.Current)
|
|
{
|
|
case Sco_SCOPE_SYS:
|
|
if (Gbl.Stat.DptCod >= 0) // 0 means another department
|
|
{
|
|
if (Gbl.Stat.DegTypCod > 0)
|
|
sprintf (Query,"SELECT DISTINCTROW degrees.FullName,courses.FullName,courses.CrsCod,courses.InsCrsCod"
|
|
" FROM degrees,courses,crs_usr,usr_data"
|
|
" WHERE degrees.DegTypCod=%ld"
|
|
" AND degrees.DegCod=courses.DegCod"
|
|
" AND courses.CrsCod=crs_usr.CrsCod"
|
|
" AND crs_usr.Role=%u"
|
|
" AND crs_usr.UsrCod=usr_data.UsrCod"
|
|
" AND usr_data.DptCod=%ld"
|
|
" ORDER BY degrees.FullName,courses.FullName",
|
|
Gbl.Stat.DegTypCod,
|
|
(unsigned) Rol_TCH,
|
|
Gbl.Stat.DptCod);
|
|
else
|
|
sprintf (Query,"SELECT DISTINCTROW degrees.FullName,courses.FullName,courses.CrsCod,courses.InsCrsCod"
|
|
" FROM degrees,courses,crs_usr,usr_data"
|
|
" WHERE degrees.DegCod=courses.DegCod"
|
|
" AND courses.CrsCod=crs_usr.CrsCod"
|
|
" AND crs_usr.Role=%u"
|
|
" AND crs_usr.UsrCod=usr_data.UsrCod"
|
|
" AND usr_data.DptCod=%ld"
|
|
" ORDER BY degrees.FullName,courses.FullName",
|
|
(unsigned) Rol_TCH,
|
|
Gbl.Stat.DptCod);
|
|
}
|
|
else
|
|
{
|
|
if (Gbl.Stat.DegTypCod > 0)
|
|
sprintf (Query,"SELECT degrees.FullName,courses.FullName,courses.CrsCod,courses.InsCrsCod"
|
|
" FROM degrees,courses"
|
|
" WHERE degrees.DegTypCod=%ld"
|
|
" AND degrees.DegCod=courses.DegCod"
|
|
" ORDER BY degrees.FullName,courses.FullName",
|
|
Gbl.Stat.DegTypCod);
|
|
else
|
|
sprintf (Query,"SELECT degrees.FullName,courses.FullName,courses.CrsCod,courses.InsCrsCod"
|
|
" FROM degrees,courses"
|
|
" WHERE degrees.DegCod=courses.DegCod"
|
|
" ORDER BY degrees.FullName,courses.FullName");
|
|
}
|
|
break;
|
|
case Sco_SCOPE_CTY:
|
|
if (Gbl.Stat.DptCod >= 0) // 0 means another department
|
|
sprintf (Query,"SELECT DISTINCTROW degrees.FullName,courses.FullName,courses.CrsCod,courses.InsCrsCod"
|
|
" FROM institutions,centres,degrees,courses,crs_usr,usr_data"
|
|
" WHERE institutions.CtyCod=%ld"
|
|
" AND institutions.InsCod=centres.InsCod"
|
|
" AND centres.CtrCod=degrees.CtrCod"
|
|
" AND degrees.DegCod=courses.DegCod"
|
|
" AND courses.CrsCod=crs_usr.CrsCod"
|
|
" AND crs_usr.Role=%u"
|
|
" AND crs_usr.UsrCod=usr_data.UsrCod"
|
|
" AND usr_data.DptCod=%ld"
|
|
" ORDER BY degrees.FullName,courses.FullName",
|
|
Gbl.CurrentCty.Cty.CtyCod,
|
|
(unsigned) Rol_TCH,
|
|
Gbl.Stat.DptCod);
|
|
else
|
|
sprintf (Query,"SELECT degrees.FullName,courses.FullName,courses.CrsCod,courses.InsCrsCod"
|
|
" FROM institutions,centres,degrees,courses"
|
|
" WHERE institutions.CtyCod=%ld"
|
|
" AND institutions.InsCod=centres.InsCod"
|
|
" AND centres.CtrCod=degrees.CtrCod"
|
|
" AND degrees.DegCod=courses.DegCod"
|
|
" ORDER BY degrees.FullName,courses.FullName",
|
|
Gbl.CurrentCty.Cty.CtyCod);
|
|
break;
|
|
case Sco_SCOPE_INS:
|
|
if (Gbl.Stat.DptCod >= 0) // 0 means another department
|
|
sprintf (Query,"SELECT DISTINCTROW degrees.FullName,courses.FullName,courses.CrsCod,courses.InsCrsCod"
|
|
" FROM centres,degrees,courses,crs_usr,usr_data"
|
|
" WHERE centres.InsCod=%ld"
|
|
" AND centres.CtrCod=degrees.CtrCod"
|
|
" AND degrees.DegCod=courses.DegCod"
|
|
" AND courses.CrsCod=crs_usr.CrsCod"
|
|
" AND crs_usr.Role=%u"
|
|
" AND crs_usr.UsrCod=usr_data.UsrCod"
|
|
" AND usr_data.DptCod=%ld"
|
|
" ORDER BY degrees.FullName,courses.FullName",
|
|
Gbl.CurrentIns.Ins.InsCod,
|
|
(unsigned) Rol_TCH,
|
|
Gbl.Stat.DptCod);
|
|
else
|
|
sprintf (Query,"SELECT degrees.FullName,courses.FullName,courses.CrsCod,courses.InsCrsCod"
|
|
" FROM centres,degrees,courses"
|
|
" WHERE centres.InsCod=%ld"
|
|
" AND centres.CtrCod=degrees.CtrCod"
|
|
" AND degrees.DegCod=courses.DegCod"
|
|
" ORDER BY degrees.FullName,courses.FullName",
|
|
Gbl.CurrentIns.Ins.InsCod);
|
|
break;
|
|
case Sco_SCOPE_CTR:
|
|
if (Gbl.Stat.DptCod >= 0) // 0 means another department
|
|
sprintf (Query,"SELECT DISTINCTROW degrees.FullName,courses.FullName,courses.CrsCod,courses.InsCrsCod"
|
|
" FROM degrees,courses,crs_usr,usr_data"
|
|
" WHERE degrees.CtrCod=%ld"
|
|
" AND degrees.DegCod=courses.DegCod"
|
|
" AND courses.CrsCod=crs_usr.CrsCod"
|
|
" AND crs_usr.Role=%u"
|
|
" AND crs_usr.UsrCod=usr_data.UsrCod"
|
|
" AND usr_data.DptCod=%ld"
|
|
" ORDER BY degrees.FullName,courses.FullName",
|
|
Gbl.CurrentCtr.Ctr.CtrCod,
|
|
(unsigned) Rol_TCH,
|
|
Gbl.Stat.DptCod);
|
|
else
|
|
sprintf (Query,"SELECT degrees.FullName,courses.FullName,courses.CrsCod,courses.InsCrsCod"
|
|
" FROM degrees,courses"
|
|
" WHERE degrees.CtrCod=%ld"
|
|
" AND degrees.DegCod=courses.DegCod"
|
|
" ORDER BY degrees.FullName,courses.FullName",
|
|
Gbl.CurrentCtr.Ctr.CtrCod);
|
|
break;
|
|
case Sco_SCOPE_DEG:
|
|
if (Gbl.Stat.DptCod >= 0) // 0 means another department
|
|
sprintf (Query,"SELECT DISTINCTROW degrees.FullName,courses.FullName,courses.CrsCod,courses.InsCrsCod"
|
|
" FROM degrees,courses,crs_usr,usr_data"
|
|
" WHERE degrees.DegCod=%ld"
|
|
" AND degrees.DegCod=courses.DegCod"
|
|
" AND courses.CrsCod=crs_usr.CrsCod"
|
|
" AND crs_usr.Role=%u"
|
|
" AND crs_usr.UsrCod=usr_data.UsrCod"
|
|
" AND usr_data.DptCod=%ld"
|
|
" ORDER BY degrees.FullName,courses.FullName",
|
|
Gbl.CurrentDeg.Deg.DegCod,
|
|
(unsigned) Rol_TCH,
|
|
Gbl.Stat.DptCod);
|
|
else
|
|
sprintf (Query,"SELECT degrees.FullName,courses.FullName,courses.CrsCod,courses.InsCrsCod"
|
|
" FROM degrees,courses"
|
|
" WHERE degrees.DegCod=%ld"
|
|
" AND degrees.DegCod=courses.DegCod"
|
|
" ORDER BY degrees.FullName,courses.FullName",
|
|
Gbl.CurrentDeg.Deg.DegCod);
|
|
break;
|
|
case Sco_SCOPE_CRS:
|
|
if (Gbl.Stat.DptCod >= 0) // 0 means another department
|
|
sprintf (Query,"SELECT DISTINCTROW degrees.FullName,courses.FullName,courses.CrsCod,courses.InsCrsCod"
|
|
" FROM degrees,courses,crs_usr,usr_data"
|
|
" WHERE courses.CrsCod=%ld"
|
|
" AND degrees.DegCod=courses.DegCod"
|
|
" AND courses.CrsCod=crs_usr.CrsCod"
|
|
" AND crs_usr.CrsCod=%ld"
|
|
" AND crs_usr.Role=%u"
|
|
" AND crs_usr.UsrCod=usr_data.UsrCod"
|
|
" AND usr_data.DptCod=%ld"
|
|
" ORDER BY degrees.FullName,courses.FullName",
|
|
Gbl.CurrentCrs.Crs.CrsCod,
|
|
Gbl.CurrentCrs.Crs.CrsCod,
|
|
(unsigned) Rol_TCH,
|
|
Gbl.Stat.DptCod);
|
|
else
|
|
sprintf (Query,"SELECT degrees.FullName,courses.FullName,courses.CrsCod,courses.InsCrsCod"
|
|
" FROM degrees,courses"
|
|
" WHERE courses.CrsCod=%ld"
|
|
" AND degrees.DegCod=courses.DegCod"
|
|
" ORDER BY degrees.FullName,courses.FullName",
|
|
Gbl.CurrentCrs.Crs.CrsCod);
|
|
break;
|
|
default:
|
|
Lay_ShowErrorAndExit ("Wrong scope.");
|
|
break;
|
|
}
|
|
|
|
return (unsigned) DB_QuerySELECT (Query,mysql_res,"can not get courses");
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/******* Show form to confirm that I want to see a big list of courses *******/
|
|
/*****************************************************************************/
|
|
|
|
static bool Ind_GetIfShowBigList (unsigned NumCrss)
|
|
{
|
|
bool ShowBigList;
|
|
|
|
/***** If list of courses is too big... *****/
|
|
if (NumCrss <= Cfg_MIN_NUM_COURSES_TO_CONFIRM_SHOW_BIG_LIST)
|
|
return true; // List is not too big ==> show it
|
|
|
|
/***** Get parameter with user's confirmation to see a big list of courses *****/
|
|
if (!(ShowBigList = Par_GetParToBool ("ShowBigList")))
|
|
Ind_PutButtonToConfirmIWantToSeeBigList (NumCrss);
|
|
|
|
return ShowBigList;
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/****** Show form to confirm that I want to see a big list of courses ********/
|
|
/*****************************************************************************/
|
|
|
|
static void Ind_PutButtonToConfirmIWantToSeeBigList (unsigned NumCrss)
|
|
{
|
|
extern const char *Txt_The_list_of_X_courses_is_too_large_to_be_displayed;
|
|
extern const char *Txt_Show_anyway;
|
|
|
|
/***** Show alert and button to confirm that I want to see the big list *****/
|
|
sprintf (Gbl.Alert.Txt,Txt_The_list_of_X_courses_is_too_large_to_be_displayed,
|
|
NumCrss);
|
|
Ale_ShowAlertAndButton (Ale_WARNING,Gbl.Alert.Txt,
|
|
Gbl.Action.Act,NULL,NULL,
|
|
Ind_PutParamsConfirmIWantToSeeBigList,
|
|
Btn_CONFIRM_BUTTON,Txt_Show_anyway);
|
|
}
|
|
|
|
static void Ind_PutParamsConfirmIWantToSeeBigList (void)
|
|
{
|
|
Sco_PutParamScope ("ScopeInd",Gbl.Scope.Current);
|
|
Par_PutHiddenParamLong ("OthDegTypCod",Gbl.Stat.DegTypCod);
|
|
Par_PutHiddenParamLong (Dpt_PARAM_DPT_COD_NAME,Gbl.Stat.DptCod);
|
|
if (Gbl.Stat.StrIndicatorsSelected[0])
|
|
Par_PutHiddenParamString ("Indicators",Gbl.Stat.StrIndicatorsSelected);
|
|
Par_PutHiddenParamChar ("ShowBigList",'Y');
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/** Get vector with numbers of courses with 0, 1, 2... indicators set to yes */
|
|
/*****************************************************************************/
|
|
|
|
static void Ind_GetNumCoursesWithIndicators (unsigned NumCrssWithIndicatorYes[1 + Ind_NUM_INDICATORS],
|
|
unsigned NumCrss,MYSQL_RES *mysql_res)
|
|
{
|
|
MYSQL_ROW row;
|
|
unsigned NumCrs;
|
|
long CrsCod;
|
|
unsigned Ind;
|
|
unsigned NumIndicators;
|
|
|
|
/***** Reset counters of courses with each number of indicators *****/
|
|
for (Ind = 0;
|
|
Ind <= Ind_NUM_INDICATORS;
|
|
Ind++)
|
|
NumCrssWithIndicatorYes[Ind] = 0;
|
|
|
|
/***** List courses *****/
|
|
for (Gbl.RowEvenOdd = 1, NumCrs = 0;
|
|
NumCrs < NumCrss;
|
|
NumCrs++, Gbl.RowEvenOdd = 1 - Gbl.RowEvenOdd)
|
|
{
|
|
/* Get next course */
|
|
row = mysql_fetch_row (mysql_res);
|
|
|
|
/* Get course code (row[2]) */
|
|
if ((CrsCod = Str_ConvertStrCodToLongCod (row[2])) < 0)
|
|
Lay_ShowErrorAndExit ("Wrong code of course.");
|
|
|
|
/* Get stored number of indicators of this course */
|
|
NumIndicators = Ind_GetAndUpdateNumIndicatorsCrs (CrsCod);
|
|
NumCrssWithIndicatorYes[NumIndicators]++;
|
|
}
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/** Show table with numbers of courses with 0, 1, 2... indicators set to yes */
|
|
/*****************************************************************************/
|
|
|
|
static void Ind_ShowNumCoursesWithIndicators (unsigned NumCrssWithIndicatorYes[1 + Ind_NUM_INDICATORS],
|
|
unsigned NumCrss,bool PutForm)
|
|
{
|
|
extern const char *Txt_Indicators;
|
|
extern const char *Txt_Courses;
|
|
extern const char *Txt_Total;
|
|
unsigned Ind;
|
|
const char *Class;
|
|
const char *ClassNormal = "DAT_LIGHT RIGHT_MIDDLE";
|
|
const char *ClassHighlight = "DAT RIGHT_MIDDLE LIGHT_BLUE";
|
|
|
|
/***** Write number of courses with each number of indicators valid *****/
|
|
Tbl_StartTable (2);
|
|
|
|
fprintf (Gbl.F.Out,"<tr>");
|
|
if (PutForm)
|
|
fprintf (Gbl.F.Out,"<th></th>");
|
|
fprintf (Gbl.F.Out,"<th class=\"RIGHT_MIDDLE\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th colspan=\"2\" class=\"RIGHT_MIDDLE\">"
|
|
"%s"
|
|
"</th>"
|
|
"</tr>",
|
|
Txt_Indicators,
|
|
Txt_Courses);
|
|
for (Ind = 0;
|
|
Ind <= Ind_NUM_INDICATORS;
|
|
Ind++)
|
|
{
|
|
Class = Gbl.Stat.IndicatorsSelected[Ind] ? ClassHighlight :
|
|
ClassNormal;
|
|
fprintf (Gbl.F.Out,"<tr>");
|
|
if (PutForm)
|
|
{
|
|
fprintf (Gbl.F.Out,"<td class=\"%s\">"
|
|
"<input type=\"checkbox\""
|
|
" id=\"Indicators%u\" name=\"Indicators\""
|
|
" value=\"%u\"",
|
|
Class,Ind,Ind);
|
|
if (Gbl.Stat.IndicatorsSelected[Ind])
|
|
fprintf (Gbl.F.Out," checked=\"checked\"");
|
|
fprintf (Gbl.F.Out," onchange=\"document.getElementById('%s').submit();\" />"
|
|
"</td>",
|
|
Gbl.Form.Id);
|
|
}
|
|
fprintf (Gbl.F.Out,"<td class=\"%s\">"
|
|
"<label for=\"Indicators%u\">%u</label>"
|
|
"</td>"
|
|
"<td class=\"%s\">"
|
|
"%u"
|
|
"</td>"
|
|
"<td class=\"%s\">"
|
|
"(%.1f%%)"
|
|
"</td>"
|
|
"</tr>",
|
|
Class,
|
|
Ind,Ind,
|
|
Class,
|
|
NumCrssWithIndicatorYes[Ind],
|
|
Class,
|
|
NumCrss ? (float) NumCrssWithIndicatorYes[Ind] * 100.0 / (float) NumCrss :
|
|
0.0);
|
|
}
|
|
|
|
/***** Write total of courses *****/
|
|
fprintf (Gbl.F.Out,"<tr>");
|
|
if (PutForm)
|
|
fprintf (Gbl.F.Out,"<td>"
|
|
"</td>");
|
|
fprintf (Gbl.F.Out,"<td class=\"DAT_N_LINE_TOP RIGHT_MIDDLE\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"DAT_N_LINE_TOP RIGHT_MIDDLE\">"
|
|
"%u"
|
|
"</td>"
|
|
"<td class=\"DAT_N_LINE_TOP RIGHT_MIDDLE\">"
|
|
"(%.1f%%)"
|
|
"</td>"
|
|
"</tr>",
|
|
Txt_Total,
|
|
NumCrss,
|
|
100.0);
|
|
|
|
Tbl_EndTable ();
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/****************** Get and show total number of courses *********************/
|
|
/*****************************************************************************/
|
|
|
|
static void Ind_ShowTableOfCoursesWithIndicators (Ind_IndicatorsLayout_t IndicatorsLayout,
|
|
unsigned NumCrss,MYSQL_RES *mysql_res)
|
|
{
|
|
extern const char *Txt_Degree;
|
|
extern const char *Txt_Course;
|
|
extern const char *Txt_Institutional_BR_code;
|
|
extern const char *Txt_Web_page_of_the_course;
|
|
extern const char *Txt_ROLES_PLURAL_BRIEF_Abc[Rol_NUM_ROLES];
|
|
extern const char *Txt_Indicators;
|
|
extern const char *Txt_No_INDEX;
|
|
extern const char *Txt_Syllabus_of_the_course;
|
|
extern const char *Txt_INFO_TITLE[Inf_NUM_INFO_TYPES];
|
|
extern const char *Txt_No_of_files_in_SHARE_zones;
|
|
extern const char *Txt_No_of_files_in_DOCUM_zones;
|
|
extern const char *Txt_Guided_academic_assignments;
|
|
extern const char *Txt_Assignments;
|
|
extern const char *Txt_Files_assignments;
|
|
extern const char *Txt_Files_works;
|
|
extern const char *Txt_Online_tutoring;
|
|
extern const char *Txt_Forum_threads;
|
|
extern const char *Txt_Forum_posts;
|
|
extern const char *Txt_Messages_sent_by_teachers;
|
|
extern const char *Txt_Materials;
|
|
extern const char *Txt_Assessment_criteria;
|
|
extern const char *Txt_YES;
|
|
extern const char *Txt_NO;
|
|
extern const char *Txt_INFO_SRC_SHORT_TEXT[Inf_NUM_INFO_SOURCES];
|
|
extern const char *Txt_Courses;
|
|
MYSQL_ROW row;
|
|
unsigned NumCrs;
|
|
long CrsCod;
|
|
unsigned NumTchs;
|
|
unsigned NumStds;
|
|
unsigned NumIndicators;
|
|
struct Ind_IndicatorsCrs Indicators;
|
|
long ActCod;
|
|
|
|
/***** Start table *****/
|
|
fprintf (Gbl.F.Out,"<table class=\"INDICATORS\">");
|
|
|
|
/***** Write table heading *****/
|
|
switch (IndicatorsLayout)
|
|
{
|
|
case Ind_INDICATORS_BRIEF:
|
|
fprintf (Gbl.F.Out,"<tr>"
|
|
"<th rowspan=\"3\" class=\"LEFT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th rowspan=\"3\" class=\"LEFT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th rowspan=\"3\" class=\"LEFT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th rowspan=\"3\" class=\"LEFT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th colspan=\"11\" class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"</tr>"
|
|
"<tr>"
|
|
"<th rowspan=\"2\" class=\"CENTER_TOP COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th colspan=\"2\" class=\"CENTER_TOP COLOR0\">"
|
|
"(A) %s"
|
|
"</th>"
|
|
"<th colspan=\"2\" class=\"CENTER_TOP COLOR0\">"
|
|
"(B) %s"
|
|
"</th>"
|
|
"<th colspan=\"2\" class=\"CENTER_TOP COLOR0\">"
|
|
"(C) %s"
|
|
"</th>"
|
|
"<th colspan=\"2\" class=\"CENTER_TOP COLOR0\">"
|
|
"(D) %s"
|
|
"</th>"
|
|
"<th colspan=\"2\" class=\"CENTER_TOP COLOR0\">"
|
|
"(E) %s"
|
|
"</th>"
|
|
"</tr>"
|
|
"<tr>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"</tr>",
|
|
Txt_Degree,
|
|
Txt_Course,
|
|
Txt_Institutional_BR_code,
|
|
Txt_Web_page_of_the_course,
|
|
Txt_Indicators,
|
|
|
|
Txt_No_INDEX,
|
|
Txt_Syllabus_of_the_course,
|
|
Txt_Guided_academic_assignments,
|
|
Txt_Online_tutoring,
|
|
Txt_Materials,
|
|
Txt_Assessment_criteria,
|
|
|
|
Txt_YES,
|
|
Txt_NO,
|
|
|
|
Txt_YES,
|
|
Txt_NO,
|
|
|
|
Txt_YES,
|
|
Txt_NO,
|
|
|
|
Txt_YES,
|
|
Txt_NO,
|
|
|
|
Txt_YES,
|
|
Txt_NO);
|
|
break;
|
|
case Ind_INDICATORS_FULL:
|
|
fprintf (Gbl.F.Out,"<tr>"
|
|
"<th rowspan=\"3\" class=\"LEFT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th rowspan=\"3\" class=\"LEFT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th rowspan=\"3\" class=\"LEFT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th rowspan=\"3\" class=\"LEFT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th rowspan=\"3\" class=\"LEFT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th rowspan=\"3\" class=\"LEFT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th colspan=\"24\" class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"</tr>"
|
|
"<tr>"
|
|
"<th rowspan=\"2\" class=\"CENTER_TOP COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th colspan=\"5\" class=\"CENTER_TOP COLOR0\">"
|
|
"(A) %s"
|
|
"</th>"
|
|
"<th colspan=\"5\" class=\"CENTER_TOP COLOR0\">"
|
|
"(B) %s"
|
|
"</th>"
|
|
"<th colspan=\"5\" class=\"CENTER_TOP COLOR0\">"
|
|
"(C) %s"
|
|
"</th>"
|
|
"<th colspan=\"4\" class=\"CENTER_TOP COLOR0\">"
|
|
"(D) %s"
|
|
"</th>"
|
|
"<th colspan=\"4\" class=\"CENTER_TOP COLOR0\">"
|
|
"(E) %s"
|
|
"</th>"
|
|
"</tr>"
|
|
"<tr>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"LEFT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"LEFT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"LEFT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"RIGHT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"RIGHT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"RIGHT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"RIGHT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"RIGHT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"RIGHT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"RIGHT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"RIGHT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"CENTER_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"LEFT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"LEFT_MIDDLE COLOR0\">"
|
|
"%s"
|
|
"</th>"
|
|
"</tr>",
|
|
Txt_Degree,
|
|
Txt_Course,
|
|
Txt_Institutional_BR_code,
|
|
Txt_Web_page_of_the_course,
|
|
Txt_ROLES_PLURAL_BRIEF_Abc[Rol_TCH],
|
|
Txt_ROLES_PLURAL_BRIEF_Abc[Rol_STD],
|
|
Txt_Indicators,
|
|
|
|
Txt_No_INDEX,
|
|
Txt_Syllabus_of_the_course,
|
|
Txt_Guided_academic_assignments,
|
|
Txt_Online_tutoring,
|
|
Txt_Materials,
|
|
Txt_Assessment_criteria,
|
|
|
|
Txt_YES,
|
|
Txt_NO,
|
|
Txt_INFO_TITLE[Inf_LECTURES],
|
|
Txt_INFO_TITLE[Inf_PRACTICALS],
|
|
Txt_INFO_TITLE[Inf_TEACHING_GUIDE],
|
|
|
|
Txt_YES,
|
|
Txt_NO,
|
|
Txt_Assignments,
|
|
Txt_Files_assignments,
|
|
Txt_Files_works,
|
|
|
|
Txt_YES,
|
|
Txt_NO,
|
|
Txt_Forum_threads,
|
|
Txt_Forum_posts,
|
|
Txt_Messages_sent_by_teachers,
|
|
|
|
Txt_YES,
|
|
Txt_NO,
|
|
Txt_No_of_files_in_DOCUM_zones,
|
|
Txt_No_of_files_in_SHARE_zones,
|
|
|
|
Txt_YES,
|
|
Txt_NO,
|
|
Txt_INFO_TITLE[Inf_ASSESSMENT],
|
|
Txt_INFO_TITLE[Inf_TEACHING_GUIDE]);
|
|
break;
|
|
}
|
|
|
|
/***** List courses *****/
|
|
mysql_data_seek (mysql_res,0);
|
|
for (Gbl.RowEvenOdd = 1, NumCrs = 0;
|
|
NumCrs < NumCrss;
|
|
NumCrs++, Gbl.RowEvenOdd = 1 - Gbl.RowEvenOdd)
|
|
{
|
|
/* Get next course */
|
|
row = mysql_fetch_row (mysql_res);
|
|
|
|
/* Get course code (row[2]) */
|
|
if ((CrsCod = Str_ConvertStrCodToLongCod (row[2])) < 0)
|
|
Lay_ShowErrorAndExit ("Wrong code of course.");
|
|
|
|
/* Get stored number of indicators of this course */
|
|
NumIndicators = Ind_GetAndUpdateNumIndicatorsCrs (CrsCod);
|
|
if (Gbl.Stat.IndicatorsSelected[NumIndicators])
|
|
{
|
|
/* Compute and store indicators */
|
|
Ind_ComputeAndStoreIndicatorsCrs (CrsCod,(int) NumIndicators,&Indicators);
|
|
|
|
/* The number of indicators may have changed */
|
|
if (Gbl.Stat.IndicatorsSelected[Indicators.NumIndicators])
|
|
{
|
|
ActCod = Act_GetActCod (ActReqStaCrs);
|
|
|
|
/* Write a row for this course */
|
|
switch (IndicatorsLayout)
|
|
{
|
|
case Ind_INDICATORS_BRIEF:
|
|
fprintf (Gbl.F.Out,"<tr>"
|
|
"<td class=\"%s LEFT_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s LEFT_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s LEFT_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"DAT_SMALL LEFT_MIDDLE COLOR%u\">"
|
|
"<a href=\"%s/?crs=%ld&act=%ld\" target=\"_blank\">"
|
|
"%s/?crs=%ld&act=%ld"
|
|
"</a>"
|
|
"</td>"
|
|
|
|
"<td class=\"%s RIGHT_MIDDLE COLOR%u\">"
|
|
"%u"
|
|
"</td>"
|
|
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"</tr>",
|
|
Indicators.CourseAllOK ? "DAT_SMALL_GREEN" :
|
|
(Indicators.CoursePartiallyOK ? "DAT_SMALL" :
|
|
"DAT_SMALL_RED"),
|
|
Gbl.RowEvenOdd,
|
|
row[0],
|
|
Indicators.CourseAllOK ? "DAT_SMALL_GREEN" :
|
|
(Indicators.CoursePartiallyOK ? "DAT_SMALL" :
|
|
"DAT_SMALL_RED"),
|
|
Gbl.RowEvenOdd,
|
|
row[1],
|
|
Indicators.CourseAllOK ? "DAT_SMALL_GREEN" :
|
|
(Indicators.CoursePartiallyOK ? "DAT_SMALL" :
|
|
"DAT_SMALL_RED"),
|
|
Gbl.RowEvenOdd,
|
|
row[3],
|
|
Gbl.RowEvenOdd,Cfg_URL_SWAD_CGI,CrsCod,ActCod,
|
|
Cfg_URL_SWAD_CGI,CrsCod,ActCod,
|
|
|
|
Indicators.CourseAllOK ? "DAT_SMALL_GREEN" :
|
|
(Indicators.CoursePartiallyOK ? "DAT_SMALL" :
|
|
"DAT_SMALL_RED"),
|
|
Gbl.RowEvenOdd,
|
|
Indicators.NumIndicators,
|
|
|
|
"DAT_SMALL_GREEN",Gbl.RowEvenOdd,
|
|
Indicators.ThereIsSyllabus ? Txt_YES :
|
|
"",
|
|
"DAT_SMALL_RED",Gbl.RowEvenOdd,
|
|
Indicators.ThereIsSyllabus ? "" :
|
|
Txt_NO,
|
|
|
|
"DAT_SMALL_GREEN",Gbl.RowEvenOdd,
|
|
Indicators.ThereAreAssignments ? Txt_YES :
|
|
"",
|
|
"DAT_SMALL_RED",Gbl.RowEvenOdd,
|
|
Indicators.ThereAreAssignments ? "" :
|
|
Txt_NO,
|
|
|
|
"DAT_SMALL_GREEN",Gbl.RowEvenOdd,
|
|
Indicators.ThereIsOnlineTutoring ? Txt_YES :
|
|
"",
|
|
"DAT_SMALL_RED",Gbl.RowEvenOdd,
|
|
Indicators.ThereIsOnlineTutoring ? "" :
|
|
Txt_NO,
|
|
|
|
"DAT_SMALL_GREEN",Gbl.RowEvenOdd,
|
|
Indicators.ThereAreMaterials ? Txt_YES :
|
|
"",
|
|
"DAT_SMALL_RED",Gbl.RowEvenOdd,
|
|
Indicators.ThereAreMaterials ? "" :
|
|
Txt_NO,
|
|
|
|
"DAT_SMALL_GREEN",Gbl.RowEvenOdd,
|
|
Indicators.ThereIsAssessment ? Txt_YES :
|
|
"",
|
|
"DAT_SMALL_RED",Gbl.RowEvenOdd,
|
|
Indicators.ThereIsAssessment ? "" :
|
|
Txt_NO);
|
|
break;
|
|
case Ind_INDICATORS_FULL:
|
|
/* Get number of users */
|
|
NumStds = Usr_GetNumUsrsInCrs (Rol_STD,CrsCod); // Students
|
|
NumTchs = Usr_GetNumUsrsInCrs (Rol_NET,CrsCod) + // Non-editing teachers
|
|
Usr_GetNumUsrsInCrs (Rol_TCH,CrsCod); // Teachers
|
|
|
|
fprintf (Gbl.F.Out,"<tr>"
|
|
"<td class=\"%s LEFT_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s LEFT_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s LEFT_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"DAT_SMALL LEFT_MIDDLE COLOR%u\">"
|
|
"<a href=\"%s/?crs=%ld&act=%ld\" target=\"_blank\">"
|
|
"%s/?crs=%ld&act=%ld"
|
|
"</a>"
|
|
"</td>"
|
|
|
|
"<td class=\"%s RIGHT_MIDDLE COLOR%u\">"
|
|
"%u"
|
|
"</td>"
|
|
"<td class=\"%s RIGHT_MIDDLE COLOR%u\">"
|
|
"%u"
|
|
"</td>"
|
|
|
|
"<td class=\"%s RIGHT_MIDDLE COLOR%u\">"
|
|
"%u"
|
|
"</td>"
|
|
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s LEFT_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s LEFT_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s LEFT_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s RIGHT_MIDDLE COLOR%u\">"
|
|
"%u"
|
|
"</td>"
|
|
"<td class=\"%s RIGHT_MIDDLE COLOR%u\">"
|
|
"%lu"
|
|
"</td>"
|
|
"<td class=\"%s RIGHT_MIDDLE COLOR%u\">"
|
|
"%lu"
|
|
"</td>"
|
|
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s RIGHT_MIDDLE COLOR%u\">"
|
|
"%u"
|
|
"</td>"
|
|
"<td class=\"%s RIGHT_MIDDLE COLOR%u\">"
|
|
"%u"
|
|
"</td>"
|
|
"<td class=\"%s RIGHT_MIDDLE COLOR%u\">"
|
|
"%u"
|
|
"</td>"
|
|
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s RIGHT_MIDDLE COLOR%u\">"
|
|
"%lu"
|
|
"</td>"
|
|
"<td class=\"%s RIGHT_MIDDLE COLOR%u\">"
|
|
"%lu"
|
|
"</td>"
|
|
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s CENTER_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s LEFT_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"<td class=\"%s LEFT_MIDDLE COLOR%u\">"
|
|
"%s"
|
|
"</td>"
|
|
"</tr>",
|
|
Indicators.CourseAllOK ? "DAT_SMALL_GREEN" :
|
|
(Indicators.CoursePartiallyOK ? "DAT_SMALL" :
|
|
"DAT_SMALL_RED"),
|
|
Gbl.RowEvenOdd,
|
|
row[0],
|
|
Indicators.CourseAllOK ? "DAT_SMALL_GREEN" :
|
|
(Indicators.CoursePartiallyOK ? "DAT_SMALL" :
|
|
"DAT_SMALL_RED"),
|
|
Gbl.RowEvenOdd,
|
|
row[1],
|
|
Indicators.CourseAllOK ? "DAT_SMALL_GREEN" :
|
|
(Indicators.CoursePartiallyOK ? "DAT_SMALL" :
|
|
"DAT_SMALL_RED"),
|
|
Gbl.RowEvenOdd,
|
|
row[3],
|
|
Gbl.RowEvenOdd,Cfg_URL_SWAD_CGI,CrsCod,ActCod,
|
|
Cfg_URL_SWAD_CGI,CrsCod,ActCod,
|
|
|
|
NumTchs != 0 ? "DAT_SMALL_GREEN" :
|
|
"DAT_SMALL_RED",
|
|
Gbl.RowEvenOdd,
|
|
NumTchs,
|
|
NumStds != 0 ? "DAT_SMALL_GREEN" :
|
|
"DAT_SMALL_RED",
|
|
Gbl.RowEvenOdd,
|
|
NumStds,
|
|
|
|
Indicators.CourseAllOK ? "DAT_SMALL_GREEN" :
|
|
(Indicators.CoursePartiallyOK ? "DAT_SMALL" :
|
|
"DAT_SMALL_RED"),
|
|
Gbl.RowEvenOdd,
|
|
Indicators.NumIndicators,
|
|
|
|
"DAT_SMALL_GREEN",Gbl.RowEvenOdd,
|
|
Indicators.ThereIsSyllabus ? Txt_YES :
|
|
"",
|
|
"DAT_SMALL_RED",Gbl.RowEvenOdd,
|
|
Indicators.ThereIsSyllabus ? "" :
|
|
Txt_NO,
|
|
(Indicators.SyllabusLecSrc != Inf_INFO_SRC_NONE) ? "DAT_SMALL_GREEN" :
|
|
"DAT_SMALL_RED",
|
|
Gbl.RowEvenOdd,
|
|
Txt_INFO_SRC_SHORT_TEXT[Indicators.SyllabusLecSrc],
|
|
(Indicators.SyllabusPraSrc != Inf_INFO_SRC_NONE) ? "DAT_SMALL_GREEN" :
|
|
"DAT_SMALL_RED",
|
|
Gbl.RowEvenOdd,
|
|
Txt_INFO_SRC_SHORT_TEXT[Indicators.SyllabusPraSrc],
|
|
(Indicators.TeachingGuideSrc != Inf_INFO_SRC_NONE) ? "DAT_SMALL_GREEN" :
|
|
"DAT_SMALL_RED",
|
|
Gbl.RowEvenOdd,
|
|
Txt_INFO_SRC_SHORT_TEXT[Indicators.TeachingGuideSrc],
|
|
|
|
"DAT_SMALL_GREEN",Gbl.RowEvenOdd,
|
|
Indicators.ThereAreAssignments ? Txt_YES :
|
|
"",
|
|
"DAT_SMALL_RED",Gbl.RowEvenOdd,
|
|
Indicators.ThereAreAssignments ? "" :
|
|
Txt_NO,
|
|
(Indicators.NumAssignments != 0) ? "DAT_SMALL_GREEN" :
|
|
"DAT_SMALL_RED",
|
|
Gbl.RowEvenOdd,
|
|
Indicators.NumAssignments,
|
|
(Indicators.NumFilesAssignments != 0) ? "DAT_SMALL_GREEN" :
|
|
"DAT_SMALL_RED",
|
|
Gbl.RowEvenOdd,
|
|
Indicators.NumFilesAssignments,
|
|
(Indicators.NumFilesWorks != 0) ? "DAT_SMALL_GREEN" :
|
|
"DAT_SMALL_RED",
|
|
Gbl.RowEvenOdd,
|
|
Indicators.NumFilesWorks,
|
|
|
|
"DAT_SMALL_GREEN",Gbl.RowEvenOdd,
|
|
Indicators.ThereIsOnlineTutoring ? Txt_YES :
|
|
"",
|
|
"DAT_SMALL_RED",Gbl.RowEvenOdd,
|
|
Indicators.ThereIsOnlineTutoring ? "" :
|
|
Txt_NO,
|
|
(Indicators.NumThreads != 0) ? "DAT_SMALL_GREEN" :
|
|
"DAT_SMALL_RED",
|
|
Gbl.RowEvenOdd,
|
|
Indicators.NumThreads,
|
|
(Indicators.NumPosts != 0) ? "DAT_SMALL_GREEN" :
|
|
"DAT_SMALL_RED",
|
|
Gbl.RowEvenOdd,
|
|
Indicators.NumPosts,
|
|
(Indicators.NumMsgsSentByTchs != 0) ? "DAT_SMALL_GREEN" :
|
|
"DAT_SMALL_RED",
|
|
Gbl.RowEvenOdd,
|
|
Indicators.NumMsgsSentByTchs,
|
|
|
|
"DAT_SMALL_GREEN",Gbl.RowEvenOdd,
|
|
Indicators.ThereAreMaterials ? Txt_YES :
|
|
"",
|
|
"DAT_SMALL_RED",Gbl.RowEvenOdd,
|
|
Indicators.ThereAreMaterials ? "" :
|
|
Txt_NO,
|
|
(Indicators.NumFilesInDocumentZones != 0) ? "DAT_SMALL_GREEN" :
|
|
"DAT_SMALL_RED",
|
|
Gbl.RowEvenOdd,
|
|
Indicators.NumFilesInDocumentZones,
|
|
(Indicators.NumFilesInSharedZones != 0) ? "DAT_SMALL_GREEN" :
|
|
"DAT_SMALL_RED",
|
|
Gbl.RowEvenOdd,
|
|
Indicators.NumFilesInSharedZones,
|
|
|
|
"DAT_SMALL_GREEN",Gbl.RowEvenOdd,
|
|
Indicators.ThereIsAssessment ? Txt_YES :
|
|
"",
|
|
"DAT_SMALL_RED",Gbl.RowEvenOdd,
|
|
Indicators.ThereIsAssessment ? "" :
|
|
Txt_NO,
|
|
(Indicators.AssessmentSrc != Inf_INFO_SRC_NONE) ? "DAT_SMALL_GREEN" :
|
|
"DAT_SMALL_RED",
|
|
Gbl.RowEvenOdd,
|
|
Txt_INFO_SRC_SHORT_TEXT[Indicators.AssessmentSrc],
|
|
(Indicators.TeachingGuideSrc != Inf_INFO_SRC_NONE) ? "DAT_SMALL_GREEN" :
|
|
"DAT_SMALL_RED",
|
|
Gbl.RowEvenOdd,
|
|
Txt_INFO_SRC_SHORT_TEXT[Indicators.TeachingGuideSrc]);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
/***** End table *****/
|
|
fprintf (Gbl.F.Out,"</table>");
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/************ Get number of indicators of a course from database *************/
|
|
/************ If not stored ==> compute and store it *************/
|
|
/*****************************************************************************/
|
|
|
|
static unsigned Ind_GetAndUpdateNumIndicatorsCrs (long CrsCod)
|
|
{
|
|
unsigned NumIndicators;
|
|
struct Ind_IndicatorsCrs Indicators;
|
|
int NumIndicatorsFromDB = Ind_GetNumIndicatorsCrsFromDB (CrsCod);
|
|
|
|
/***** If number of indicators is not already computed ==> compute it! *****/
|
|
if (NumIndicatorsFromDB >= 0)
|
|
NumIndicators = (unsigned) NumIndicatorsFromDB;
|
|
else // Number of indicators is not already computed
|
|
{
|
|
/***** Compute and store number of indicators *****/
|
|
Ind_ComputeAndStoreIndicatorsCrs (CrsCod,NumIndicatorsFromDB,&Indicators);
|
|
NumIndicators = Indicators.NumIndicators;
|
|
}
|
|
return NumIndicators;
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/************ Get number of indicators of a course from database *************/
|
|
/*****************************************************************************/
|
|
// This function returns -1 if number of indicators is not yet calculated
|
|
|
|
int Ind_GetNumIndicatorsCrsFromDB (long CrsCod)
|
|
{
|
|
char Query[128];
|
|
MYSQL_RES *mysql_res;
|
|
MYSQL_ROW row;
|
|
int NumIndicatorsFromDB = -1; // -1 means not yet calculated
|
|
|
|
/***** Get number of indicators of a course from database *****/
|
|
sprintf (Query,"SELECT NumIndicators FROM courses WHERE CrsCod=%ld",
|
|
CrsCod);
|
|
if (DB_QuerySELECT (Query,&mysql_res,"can not get number of indicators"))
|
|
{
|
|
/***** Get row *****/
|
|
row = mysql_fetch_row (mysql_res);
|
|
|
|
/***** Get number of indicators (row[0]) *****/
|
|
if (sscanf (row[0],"%d",&NumIndicatorsFromDB) != 1)
|
|
Lay_ShowErrorAndExit ("Error when getting number of indicators.");
|
|
}
|
|
|
|
/***** Free structure that stores the query result *****/
|
|
DB_FreeMySQLResult (&mysql_res);
|
|
|
|
return NumIndicatorsFromDB;
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/************ Store number of indicators of a course in database *************/
|
|
/*****************************************************************************/
|
|
|
|
static void Ind_StoreIndicatorsCrsIntoDB (long CrsCod,unsigned NumIndicators)
|
|
{
|
|
char Query[128];
|
|
|
|
/***** Store number of indicators of a course in database *****/
|
|
sprintf (Query,"UPDATE courses SET NumIndicators=%u WHERE CrsCod=%ld",
|
|
NumIndicators,CrsCod);
|
|
DB_QueryUPDATE (Query,"can not store number of indicators of a course");
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/********************* Compute indicators of a course ************************/
|
|
/*****************************************************************************/
|
|
/* NumIndicatorsFromDB (number of indicators stored in database)
|
|
must be retrieved before calling this function.
|
|
If NumIndicatorsFromDB is different from number of indicators just computed
|
|
==> update it into database */
|
|
|
|
void Ind_ComputeAndStoreIndicatorsCrs (long CrsCod,int NumIndicatorsFromDB,
|
|
struct Ind_IndicatorsCrs *Indicators)
|
|
{
|
|
/***** Initialize number of indicators *****/
|
|
Indicators->NumIndicators = 0;
|
|
|
|
/***** Get whether download zones are empty or not *****/
|
|
Indicators->NumFilesInDocumentZones = Ind_GetNumFilesInDocumZonesOfCrsFromDB (CrsCod);
|
|
Indicators->NumFilesInSharedZones = Ind_GetNumFilesInShareZonesOfCrsFromDB (CrsCod);
|
|
|
|
/***** Indicator #1: information about syllabus *****/
|
|
Indicators->SyllabusLecSrc = Inf_GetInfoSrcFromDB (CrsCod,Inf_LECTURES);
|
|
Indicators->SyllabusPraSrc = Inf_GetInfoSrcFromDB (CrsCod,Inf_PRACTICALS);
|
|
Indicators->TeachingGuideSrc = Inf_GetInfoSrcFromDB (CrsCod,Inf_TEACHING_GUIDE);
|
|
Indicators->ThereIsSyllabus = (Indicators->SyllabusLecSrc != Inf_INFO_SRC_NONE) ||
|
|
(Indicators->SyllabusPraSrc != Inf_INFO_SRC_NONE) ||
|
|
(Indicators->TeachingGuideSrc != Inf_INFO_SRC_NONE);
|
|
if (Indicators->ThereIsSyllabus)
|
|
Indicators->NumIndicators++;
|
|
|
|
/***** Indicator #2: information about assignments *****/
|
|
Indicators->NumAssignments = Asg_GetNumAssignmentsInCrs (CrsCod);
|
|
Indicators->NumFilesAssignments = Ind_GetNumFilesInAssigZonesOfCrsFromDB (CrsCod);
|
|
Indicators->NumFilesWorks = Ind_GetNumFilesInWorksZonesOfCrsFromDB (CrsCod);
|
|
Indicators->ThereAreAssignments = (Indicators->NumAssignments != 0) ||
|
|
(Indicators->NumFilesAssignments != 0) ||
|
|
(Indicators->NumFilesWorks != 0);
|
|
if (Indicators->ThereAreAssignments)
|
|
Indicators->NumIndicators++;
|
|
|
|
/***** Indicator #3: information about online tutoring *****/
|
|
Indicators->NumThreads = For_GetNumTotalThrsInForumsOfType (For_FORUM_COURSE_USRS,-1L,-1L,-1L,-1L,CrsCod);
|
|
Indicators->NumPosts = For_GetNumTotalPstsInForumsOfType (For_FORUM_COURSE_USRS,-1L,-1L,-1L,-1L,CrsCod,&(Indicators->NumUsrsToBeNotifiedByEMail));
|
|
Indicators->NumMsgsSentByTchs = Msg_GetNumMsgsSentByTchsCrs (CrsCod);
|
|
Indicators->ThereIsOnlineTutoring = (Indicators->NumThreads != 0) ||
|
|
(Indicators->NumPosts != 0) ||
|
|
(Indicators->NumMsgsSentByTchs != 0);
|
|
if (Indicators->ThereIsOnlineTutoring)
|
|
Indicators->NumIndicators++;
|
|
|
|
/***** Indicator #4: information about materials *****/
|
|
Indicators->ThereAreMaterials = (Indicators->NumFilesInDocumentZones != 0) ||
|
|
(Indicators->NumFilesInSharedZones != 0);
|
|
if (Indicators->ThereAreMaterials)
|
|
Indicators->NumIndicators++;
|
|
|
|
/***** Indicator #5: information about assessment *****/
|
|
Indicators->AssessmentSrc = Inf_GetInfoSrcFromDB (CrsCod,Inf_ASSESSMENT);
|
|
Indicators->ThereIsAssessment = (Indicators->AssessmentSrc != Inf_INFO_SRC_NONE) ||
|
|
(Indicators->TeachingGuideSrc != Inf_INFO_SRC_NONE);
|
|
if (Indicators->ThereIsAssessment)
|
|
Indicators->NumIndicators++;
|
|
|
|
/***** All the indicators are OK? *****/
|
|
Indicators->CoursePartiallyOK = Indicators->NumIndicators >= 1 &&
|
|
Indicators->NumIndicators < Ind_NUM_INDICATORS;
|
|
Indicators->CourseAllOK = Indicators->NumIndicators == Ind_NUM_INDICATORS;
|
|
|
|
/***** Update number of indicators into database
|
|
if different to the stored one *****/
|
|
if (NumIndicatorsFromDB != (int) Indicators->NumIndicators)
|
|
Ind_StoreIndicatorsCrsIntoDB (CrsCod,Indicators->NumIndicators);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/*********** Get the number of files in document zones of a course ***********/
|
|
/*****************************************************************************/
|
|
|
|
static unsigned long Ind_GetNumFilesInDocumZonesOfCrsFromDB (long CrsCod)
|
|
{
|
|
extern const Brw_FileBrowser_t Brw_FileBrowserForDB_files[Brw_NUM_TYPES_FILE_BROWSER];
|
|
char Query[1024];
|
|
MYSQL_RES *mysql_res;
|
|
MYSQL_ROW row;
|
|
unsigned long NumFiles;
|
|
|
|
/***** Get number of files in document zones of a course from database *****/
|
|
sprintf (Query,"SELECT"
|
|
" (SELECT COALESCE(SUM(NumFiles),0)"
|
|
" FROM file_browser_size"
|
|
" WHERE FileBrowser=%u AND Cod=%ld) +"
|
|
" (SELECT COALESCE(SUM(file_browser_size.NumFiles),0)"
|
|
" FROM crs_grp_types,crs_grp,file_browser_size"
|
|
" WHERE crs_grp_types.CrsCod=%ld"
|
|
" AND crs_grp_types.GrpTypCod=crs_grp.GrpTypCod"
|
|
" AND file_browser_size.FileBrowser=%u"
|
|
" AND file_browser_size.Cod=crs_grp.GrpCod)",
|
|
(unsigned) Brw_FileBrowserForDB_files[Brw_ADMI_DOC_CRS],
|
|
CrsCod,
|
|
CrsCod,
|
|
(unsigned) Brw_FileBrowserForDB_files[Brw_ADMI_DOC_GRP]);
|
|
DB_QuerySELECT (Query,&mysql_res,"can not get the number of files");
|
|
|
|
/***** Get row *****/
|
|
row = mysql_fetch_row (mysql_res);
|
|
|
|
/***** Get number of files (row[0]) *****/
|
|
if (sscanf (row[0],"%lu",&NumFiles) != 1)
|
|
Lay_ShowErrorAndExit ("Error when getting the number of files.");
|
|
|
|
/***** Free structure that stores the query result *****/
|
|
DB_FreeMySQLResult (&mysql_res);
|
|
|
|
return NumFiles;
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/*********** Get the number of files in shared zones of a course ***********/
|
|
/*****************************************************************************/
|
|
|
|
static unsigned long Ind_GetNumFilesInShareZonesOfCrsFromDB (long CrsCod)
|
|
{
|
|
extern const Brw_FileBrowser_t Brw_FileBrowserForDB_files[Brw_NUM_TYPES_FILE_BROWSER];
|
|
char Query[1024];
|
|
MYSQL_RES *mysql_res;
|
|
MYSQL_ROW row;
|
|
unsigned long NumFiles;
|
|
|
|
/***** Get number of files in document zones of a course from database *****/
|
|
sprintf (Query,"SELECT"
|
|
" (SELECT COALESCE(SUM(NumFiles),0)"
|
|
" FROM file_browser_size"
|
|
" WHERE FileBrowser=%u AND Cod=%ld) +"
|
|
" (SELECT COALESCE(SUM(file_browser_size.NumFiles),0)"
|
|
" FROM crs_grp_types,crs_grp,file_browser_size"
|
|
" WHERE crs_grp_types.CrsCod=%ld"
|
|
" AND crs_grp_types.GrpTypCod=crs_grp.GrpTypCod"
|
|
" AND file_browser_size.FileBrowser=%u"
|
|
" AND file_browser_size.Cod=crs_grp.GrpCod)",
|
|
(unsigned) Brw_FileBrowserForDB_files[Brw_ADMI_SHR_CRS],
|
|
CrsCod,
|
|
CrsCod,
|
|
(unsigned) Brw_FileBrowserForDB_files[Brw_ADMI_SHR_GRP]);
|
|
DB_QuerySELECT (Query,&mysql_res,"can not get the number of files");
|
|
|
|
/***** Get row *****/
|
|
row = mysql_fetch_row (mysql_res);
|
|
|
|
/***** Get number of files (row[0]) *****/
|
|
if (sscanf (row[0],"%lu",&NumFiles) != 1)
|
|
Lay_ShowErrorAndExit ("Error when getting the number of files.");
|
|
|
|
/***** Free structure that stores the query result *****/
|
|
DB_FreeMySQLResult (&mysql_res);
|
|
|
|
return NumFiles;
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/********* Get the number of files in assignment zones of a course ***********/
|
|
/*****************************************************************************/
|
|
|
|
static unsigned long Ind_GetNumFilesInAssigZonesOfCrsFromDB (long CrsCod)
|
|
{
|
|
extern const Brw_FileBrowser_t Brw_FileBrowserForDB_files[Brw_NUM_TYPES_FILE_BROWSER];
|
|
char Query[256];
|
|
MYSQL_RES *mysql_res;
|
|
MYSQL_ROW row;
|
|
unsigned long NumFiles;
|
|
|
|
/***** Get number of files in document zones of a course from database *****/
|
|
sprintf (Query,"SELECT COALESCE(SUM(NumFiles),0)"
|
|
" FROM file_browser_size"
|
|
" WHERE FileBrowser=%u AND Cod=%ld",
|
|
(unsigned) Brw_FileBrowserForDB_files[Brw_ADMI_ASG_USR],
|
|
CrsCod);
|
|
DB_QuerySELECT (Query,&mysql_res,"can not get the number of files");
|
|
|
|
/***** Get row *****/
|
|
row = mysql_fetch_row (mysql_res);
|
|
|
|
/***** Get number of files (row[0]) *****/
|
|
if (sscanf (row[0],"%lu",&NumFiles) != 1)
|
|
Lay_ShowErrorAndExit ("Error when getting the number of files.");
|
|
|
|
/***** Free structure that stores the query result *****/
|
|
DB_FreeMySQLResult (&mysql_res);
|
|
|
|
return NumFiles;
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/************* Get the number of files in works zones of a course ************/
|
|
/*****************************************************************************/
|
|
|
|
static unsigned long Ind_GetNumFilesInWorksZonesOfCrsFromDB (long CrsCod)
|
|
{
|
|
extern const Brw_FileBrowser_t Brw_FileBrowserForDB_files[Brw_NUM_TYPES_FILE_BROWSER];
|
|
char Query[256];
|
|
MYSQL_RES *mysql_res;
|
|
MYSQL_ROW row;
|
|
unsigned long NumFiles;
|
|
|
|
/***** Get number of files in document zones of a course from database *****/
|
|
sprintf (Query,"SELECT COALESCE(SUM(NumFiles),0)"
|
|
" FROM file_browser_size"
|
|
" WHERE FileBrowser=%u AND Cod=%ld",
|
|
(unsigned) Brw_FileBrowserForDB_files[Brw_ADMI_WRK_USR],
|
|
CrsCod);
|
|
DB_QuerySELECT (Query,&mysql_res,"can not get the number of files");
|
|
|
|
/***** Get row *****/
|
|
row = mysql_fetch_row (mysql_res);
|
|
|
|
/***** Get number of files (row[0]) *****/
|
|
if (sscanf (row[0],"%lu",&NumFiles) != 1)
|
|
Lay_ShowErrorAndExit ("Error when getting the number of files.");
|
|
|
|
/***** Free structure that stores the query result *****/
|
|
DB_FreeMySQLResult (&mysql_res);
|
|
|
|
return NumFiles;
|
|
}
|