");
Act_PutContextualLink (ActEdiDpt,NULL,"edit",Txt_Edit);
fprintf (Gbl.F.Out,"
");
}
/*****************************************************************************/
/******* Put forms to edit the departments of the current institution ********/
/*****************************************************************************/
// An institution must be selected
void Dpt_EditDepartments (void)
{
extern const char *Txt_There_are_no_departments;
/***** Check if institution is selected *****/
if (Gbl.CurrentIns.Ins.InsCod <= 0)
Lay_ShowErrorAndExit ("No institution selected."); // This should not happen
/***** Get list of institutions *****/
Ins_GetListInstitutions (Gbl.CurrentCty.Cty.CtyCod,Ins_GET_MINIMAL_DATA);
if (!Gbl.Inss.Num)
Lay_ShowErrorAndExit ("There is no list of institutions."); // This should not happen
/***** Get list of departments *****/
Dpt_GetListDepartments (Gbl.CurrentIns.Ins.InsCod);
if (Gbl.Dpts.Num)
/***** Put link (form) to view departments *****/
Lay_PutFormToView (ActSeeDpt);
else
/***** Help message *****/
Lay_ShowAlert (Lay_INFO,Txt_There_are_no_departments);
/***** Put a form to create a new department *****/
Dpt_PutFormToCreateDepartment ();
/***** Forms to edit current departments *****/
if (Gbl.Dpts.Num)
Dpt_ListDepartmentsForEdition ();
/***** Free list of departments *****/
Dpt_FreeListDepartments ();
/***** Free list of institutions *****/
Ins_FreeListInstitutions ();
}
/*****************************************************************************/
/************************** Get list of departments **************************/
/*****************************************************************************/
// If InsCod <= 0 ==> get all the departments
// If InsCod > 0 ==> get departments of an institution
void Dpt_GetListDepartments (long InsCod)
{
char OrderBySubQuery[256];
char Query[1024];
MYSQL_RES *mysql_res;
MYSQL_ROW row;
unsigned long NumRows;
unsigned NumDpt;
struct Department *Dpt;
/***** Get departments from database *****/
switch (Gbl.Dpts.SelectedOrderType)
{
case Dpt_ORDER_BY_DEPARTMENT:
sprintf (OrderBySubQuery,"FullName");
break;
case Dpt_ORDER_BY_NUM_TCHS:
sprintf (OrderBySubQuery,"NumTchs DESC,FullName");
break;
}
if (InsCod > 0) // Only the departments of an institution
sprintf (Query,"(SELECT departments.DptCod,departments.InsCod,"
"departments.ShortName,departments.FullName,departments.WWW,"
"COUNT(DISTINCT usr_data.UsrCod) AS NumTchs"
" FROM departments,usr_data,crs_usr"
" WHERE departments.InsCod='%ld'"
" AND departments.DptCod=usr_data.DptCod"
" AND usr_data.UsrCod=crs_usr.UsrCod"
" AND crs_usr.Role='%u'"
" GROUP BY departments.DptCod)"
" UNION "
"(SELECT DptCod,InsCod,ShortName,FullName,WWW,0 AS NumTchs"
" FROM departments"
" WHERE InsCod='%ld' AND DptCod NOT IN"
" (SELECT DISTINCT usr_data.DptCod FROM usr_data,crs_usr"
" WHERE crs_usr.Role='%u' AND crs_usr.UsrCod=usr_data.UsrCod))"
" ORDER BY %s",
InsCod,(unsigned) Rol_TEACHER,
InsCod,(unsigned) Rol_TEACHER,
OrderBySubQuery);
else // All the departments
sprintf (Query,"(SELECT departments.DptCod,departments.InsCod,"
"departments.ShortName,departments.FullName,departments.WWW,"
"COUNT(DISTINCT usr_data.UsrCod) AS NumTchs"
" FROM departments,usr_data,crs_usr"
" WHERE departments.DptCod=usr_data.DptCod"
" AND usr_data.UsrCod=crs_usr.UsrCod"
" AND crs_usr.Role='%u'"
" GROUP BY departments.DptCod)"
" UNION "
"(SELECT DptCod,InsCod,ShortName,FullName,WWW,0 AS NumTchs"
" FROM departments"
" WHERE DptCod NOT IN"
" (SELECT DISTINCT usr_data.DptCod FROM usr_data,crs_usr"
" WHERE crs_usr.Role='%u' AND crs_usr.UsrCod=usr_data.UsrCod))"
" ORDER BY %s",
(unsigned) Rol_TEACHER,
(unsigned) Rol_TEACHER,
OrderBySubQuery);
NumRows = DB_QuerySELECT (Query,&mysql_res,"can not get departments");
if (NumRows) // Departments found...
{
// NumRows should be equal to Deg->NumCourses
Gbl.Dpts.Num = (unsigned) NumRows;
/***** Create list with courses in degree *****/
if ((Gbl.Dpts.Lst = (struct Department *) calloc (NumRows,sizeof (struct Department))) == NULL)
Lay_ShowErrorAndExit ("Not enough memory to store departments.");
/***** Get the departments *****/
for (NumDpt = 0;
NumDpt < Gbl.Dpts.Num;
NumDpt++)
{
Dpt = &(Gbl.Dpts.Lst[NumDpt]);
/* Get next department */
row = mysql_fetch_row (mysql_res);
/* Get department code (row[0]) */
if ((Dpt->DptCod = Str_ConvertStrCodToLongCod (row[0])) < 0)
Lay_ShowErrorAndExit ("Wrong code of department.");
/* Get institution code (row[1]) */
if ((Dpt->InsCod = Str_ConvertStrCodToLongCod (row[1])) < 0)
Lay_ShowErrorAndExit ("Wrong code of institution.");
/* Get the short name of the department (row[2]) */
strcpy (Dpt->ShortName,row[2]);
/* Get the full name of the department (row[3]) */
strcpy (Dpt->FullName,row[3]);
/* Get the URL of the department (row[4]) */
strcpy (Dpt->WWW,row[4]);
/* Get number of teachers in this department (row[5]) */
if (sscanf (row[5],"%u",&Dpt->NumTchs) != 1)
Dpt->NumTchs = 0;
}
}
else
Gbl.Dpts.Num = 0;
/***** Free structure that stores the query result *****/
DB_FreeMySQLResult (&mysql_res);
}
/*****************************************************************************/
/************************** Get department full name *************************/
/*****************************************************************************/
void Dpt_GetDataOfDepartmentByCod (struct Department *Dpt)
{
extern const char *Txt_Another_department;
char Query[1024];
MYSQL_RES *mysql_res;
MYSQL_ROW row;
unsigned long NumRows;
/***** Clear data *****/
Dpt->InsCod = -1L;
Dpt->ShortName[0] = Dpt->FullName[0] = Dpt->WWW[0] = '\0';
Dpt->NumTchs = 0;
/***** Check if department code is correct *****/
if (Dpt->DptCod == 0)
{
strcpy (Dpt->ShortName,Txt_Another_department);
strcpy (Dpt->FullName,Txt_Another_department);
}
else if (Dpt->DptCod > 0)
{
/***** Get data of a department from database *****/
sprintf (Query,"(SELECT departments.InsCod,departments.ShortName,departments.FullName,departments.WWW,"
"COUNT(DISTINCT usr_data.UsrCod) AS NumTchs"
" FROM departments,usr_data,crs_usr"
" WHERE departments.DptCod='%ld'"
" AND departments.DptCod=usr_data.DptCod"
" AND usr_data.UsrCod=crs_usr.UsrCod"
" AND crs_usr.Role='%u'"
" GROUP BY departments.DptCod)"
" UNION "
"(SELECT InsCod,ShortName,FullName,WWW,0"
" FROM departments"
" WHERE DptCod='%ld' AND DptCod NOT IN"
" (SELECT DISTINCT usr_data.DptCod FROM usr_data,crs_usr"
" WHERE crs_usr.Role='%u' AND crs_usr.UsrCod=usr_data.UsrCod))",
Dpt->DptCod,(unsigned) Rol_TEACHER,
Dpt->DptCod,(unsigned) Rol_TEACHER);
NumRows = DB_QuerySELECT (Query,&mysql_res,"can not get data of a department");
if (NumRows) // Department found...
{
/* Get row */
row = mysql_fetch_row (mysql_res);
/* Get the code of the institution (row[0]) */
Dpt->InsCod = Str_ConvertStrCodToLongCod (row[0]);
/* Get the short name of the department (row[1]) */
strcpy (Dpt->ShortName,row[1]);
/* Get the full name of the department (row[2]) */
strcpy (Dpt->FullName,row[2]);
/* Get the URL of the department (row[3]) */
strcpy (Dpt->WWW,row[3]);
/* Get number of teachers in this department (row[4]) */
if (sscanf (row[4],"%u",&Dpt->NumTchs) != 1)
Dpt->NumTchs = 0;
}
/***** Free structure that stores the query result *****/
DB_FreeMySQLResult (&mysql_res);
}
}
/*****************************************************************************/
/************************** Free list of departments *************************/
/*****************************************************************************/
void Dpt_FreeListDepartments (void)
{
if (Gbl.Dpts.Lst)
{
/***** Free memory used by the list of courses in degree *****/
free ((void *) Gbl.Dpts.Lst);
Gbl.Dpts.Lst = NULL;
Gbl.Dpts.Num = 0;
}
}
/*****************************************************************************/
/************** Get number of departments in an institution ******************/
/*****************************************************************************/
unsigned Dpt_GetNumDepartmentsInInstitution (long InsCod)
{
char Query[128];
/***** Get number of departments in an institution from database *****/
sprintf (Query,"SELECT COUNT(*) FROM departments"
" WHERE InsCod='%ld'",
InsCod);
return (unsigned) DB_QueryCOUNT (Query,"can not get number of departments in an institution");
}
/*****************************************************************************/
/************************** List all the departments *************************/
/*****************************************************************************/
static void Dpt_ListDepartmentsForEdition (void)
{
extern const char *Txt_Departments;
extern const char *Txt_Remove_department;
extern const char *Txt_Another_institution;
unsigned NumDpt;
struct Department *Dpt;
struct Institution Ins;
unsigned NumIns;
Lay_StartRoundFrameTable10 (NULL,2,Txt_Departments);
/***** Table head *****/
Dpt_PutHeadDepartments ();
/***** Write all the departments *****/
for (NumDpt = 0;
NumDpt < Gbl.Dpts.Num;
NumDpt++)
{
Dpt = &Gbl.Dpts.Lst[NumDpt];
/* Get data of institution of this department */
Ins.InsCod = Dpt->InsCod;
Ins_GetDataOfInstitutionByCod (&Ins,Ins_GET_MINIMAL_DATA);
/* Put icon to remove department */
fprintf (Gbl.F.Out,"![\"\"](\"%s/deloff16x16.gif\"")
",
Gbl.Prefs.IconsURL);
else
{
Act_FormStart (ActRemDpt);
Dpt_PutParamDptCod (Dpt->DptCod);
fprintf (Gbl.F.Out,"",
Gbl.Prefs.IconsURL,
Txt_Remove_department,
Txt_Remove_department);
Act_FormEnd ();
}
fprintf (Gbl.F.Out,"