// swad_department.c: departments /* 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-2019 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 . */ /*****************************************************************************/ /********************************* Headers ***********************************/ /*****************************************************************************/ #include // For NULL #include // For boolean type #include // For calloc #include // For string functions #include "swad_box.h" #include "swad_constant.h" #include "swad_database.h" #include "swad_department.h" #include "swad_form.h" #include "swad_global.h" #include "swad_institution.h" #include "swad_language.h" #include "swad_parameter.h" #include "swad_string.h" #include "swad_table.h" /*****************************************************************************/ /************** External global variables from others modules ****************/ /*****************************************************************************/ extern struct Globals Gbl; /*****************************************************************************/ /***************************** Private constants *****************************/ /*****************************************************************************/ /*****************************************************************************/ /******************************* Private types *******************************/ /*****************************************************************************/ /*****************************************************************************/ /***************************** Private variables *****************************/ /*****************************************************************************/ static struct Department *Dpt_EditingDpt = NULL; // Static variable to keep the department being edited /*****************************************************************************/ /***************************** Private prototypes ****************************/ /*****************************************************************************/ static void Dpt_GetParamDptOrder (void); static void Dpt_PutIconToEditDpts (void); static void Dpt_EditDepartmentsInternal (void); static void Dpt_ListDepartmentsForEdition (void); static void Dpt_PutParamDptCod (long DptCod); static void Dpt_RenameDepartment (Cns_ShrtOrFullName_t ShrtOrFullName); static bool Dpt_CheckIfDepartmentNameExists (const char *FieldName,const char *Name,long DptCod); static void Dpt_UpdateDegNameDB (long DptCod,const char *FieldName,const char *NewDptName); static void Dpt_PutFormToCreateDepartment (void); static void Dpt_PutHeadDepartments (void); static void Dpt_CreateDepartment (struct Department *Dpt); static void Dpt_EditingDepartmentConstructor (void); static void Dpt_EditingDepartmentDestructor (void); /*****************************************************************************/ /************************* List all the departments **************************/ /*****************************************************************************/ void Dpt_SeeDepts (void) { extern const char *Hlp_INSTITUTION_Departments; extern const char *Txt_Departments_of_INSTITUTION_X; extern const char *Txt_DEPARTMENTS_HELP_ORDER[2]; extern const char *Txt_DEPARTMENTS_ORDER[2]; extern const char *Txt_Other_departments; extern const char *Txt_Department_unspecified; Dpt_Order_t Order; unsigned NumDpt; unsigned NumTchsInsWithDpt = 0; // Number of teachers from the current institution with department unsigned NumTchsInOtherDpts; /***** Trivial check *****/ if (Gbl.Hierarchy.Ins.InsCod <= 0) // No institution selected return; /***** Get parameter with the type of order in the list of departments *****/ Dpt_GetParamDptOrder (); /***** Get list of departments *****/ Dpt_GetListDepartments (Gbl.Hierarchy.Ins.InsCod); /***** Start box and table *****/ snprintf (Gbl.Title,sizeof (Gbl.Title), Txt_Departments_of_INSTITUTION_X, Gbl.Hierarchy.Ins.FullName); Box_StartBoxTable (NULL,Gbl.Title, Gbl.Usrs.Me.Role.Logged == Rol_SYS_ADM ? Dpt_PutIconToEditDpts : NULL, Hlp_INSTITUTION_Departments,Box_NOT_CLOSABLE,2); /***** Write heading *****/ fprintf (Gbl.F.Out,""); for (Order = Dpt_ORDER_BY_DEPARTMENT; Order <= Dpt_ORDER_BY_NUM_TCHS; Order++) { fprintf (Gbl.F.Out,""); Frm_StartForm (ActSeeDpt); Par_PutHiddenParamUnsigned ("Order",(unsigned) Order); Frm_LinkFormSubmit (Txt_DEPARTMENTS_HELP_ORDER[Order],"TIT_TBL",NULL); if (Order == Gbl.Dpts.SelectedOrder) fprintf (Gbl.F.Out,""); fprintf (Gbl.F.Out,"%s",Txt_DEPARTMENTS_ORDER[Order]); if (Order == Gbl.Dpts.SelectedOrder) fprintf (Gbl.F.Out,""); fprintf (Gbl.F.Out,""); Frm_EndForm (); fprintf (Gbl.F.Out,""); } fprintf (Gbl.F.Out,""); /***** Write all the departments and their nuber of teachers *****/ for (NumDpt = 0; NumDpt < Gbl.Dpts.Num; NumDpt++) { /* Write data of this department */ fprintf (Gbl.F.Out,"" "" "" "%s" "" "" "" "%u" "" "", Gbl.Dpts.Lst[NumDpt].WWW, Gbl.Dpts.Lst[NumDpt].FullName, Gbl.Dpts.Lst[NumDpt].NumTchs); /* Update number of teachers from the current institution with department */ NumTchsInsWithDpt += Gbl.Dpts.Lst[NumDpt].NumTchs; } /***** Separation row *****/ fprintf (Gbl.F.Out,"" "" " " "" ""); /***** Write teachers with other department *****/ NumTchsInOtherDpts = Usr_GetNumTchsCurrentInsInDepartment (0); fprintf (Gbl.F.Out,"" "" "%s" "" "" "%u" "" "", Txt_Other_departments,NumTchsInOtherDpts); NumTchsInsWithDpt += NumTchsInOtherDpts; /***** Write teachers with no department *****/ fprintf (Gbl.F.Out,"" "" "%s" "" "" "%u" "" "", Txt_Department_unspecified, Usr_GetTotalNumberOfUsersInCourses (Hie_INS, 1 << Rol_NET | 1 << Rol_TCH) - NumTchsInsWithDpt); /***** End table and box *****/ Box_EndBoxTable (); /***** Free list of departments *****/ Dpt_FreeListDepartments (); } /*****************************************************************************/ /******** Get parameter with the type or order in list of departments ********/ /*****************************************************************************/ static void Dpt_GetParamDptOrder (void) { Gbl.Dpts.SelectedOrder = (Dpt_Order_t) Par_GetParToUnsignedLong ("Order", 0, Dpt_NUM_ORDERS - 1, (unsigned long) Dpt_ORDER_DEFAULT); } /*****************************************************************************/ /************************ Put icon to edit departments ***********************/ /*****************************************************************************/ static void Dpt_PutIconToEditDpts (void) { Ico_PutContextualIconToEdit (ActEdiDpt,NULL); } /*****************************************************************************/ /******* Put forms to edit the departments of the current institution ********/ /*****************************************************************************/ void Dpt_EditDepartments (void) { /***** Department constructor *****/ Dpt_EditingDepartmentConstructor (); /***** Edit departments *****/ Dpt_EditDepartmentsInternal (); /***** Department destructor *****/ Dpt_EditingDepartmentDestructor (); } static void Dpt_EditDepartmentsInternal (void) { extern const char *Hlp_INSTITUTION_Departments_edit; extern const char *Txt_Departments_of_INSTITUTION_X; /***** Trivial check *****/ if (Gbl.Hierarchy.Ins.InsCod <= 0) // An institution must be selected return; /***** Get list of institutions *****/ Ins_GetListInstitutions (Gbl.Hierarchy.Cty.CtyCod,Ins_GET_BASIC_DATA); /***** Get list of departments *****/ Dpt_GetListDepartments (Gbl.Hierarchy.Ins.InsCod); /***** Start box *****/ snprintf (Gbl.Title,sizeof (Gbl.Title), Txt_Departments_of_INSTITUTION_X, Gbl.Hierarchy.Ins.FullName); Box_StartBox (NULL,Gbl.Title,NULL, Hlp_INSTITUTION_Departments_edit,Box_NOT_CLOSABLE); /***** Put a form to create a new department *****/ Dpt_PutFormToCreateDepartment (); /***** Forms to edit current departments *****/ if (Gbl.Dpts.Num) Dpt_ListDepartmentsForEdition (); /***** End box *****/ Box_EndBox (); /***** Free list of departments *****/ Dpt_FreeListDepartments (); /***** Free list of institutions *****/ Ins_FreeListInstitutions (); } /*****************************************************************************/ /************************** Get list of departments **************************/ /*****************************************************************************/ // If InsCod > 0 ==> get departments of an institution // If InsCod <= 0 ==> an empty list is returned void Dpt_GetListDepartments (long InsCod) { static const char *OrderBySubQuery[Dpt_NUM_ORDERS] = { "FullName", // Dpt_ORDER_BY_DEPARTMENT "NumTchs DESC,FullName", // Dpt_ORDER_BY_NUM_TCHS }; MYSQL_RES *mysql_res; MYSQL_ROW row; unsigned NumDpt; struct Department *Dpt; /***** Free list of departments *****/ Dpt_FreeListDepartments (); // List is initialized to empty if (InsCod > 0) // Institution specified { /***** Get departments from database *****/ Gbl.Dpts.Num = (unsigned) DB_QuerySELECT (&mysql_res,"can not get departments", "(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 IN (%u,%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 IN (%u,%u) AND crs_usr.UsrCod=usr_data.UsrCod))" " ORDER BY %s", InsCod,(unsigned) Rol_NET,(unsigned) Rol_TCH, InsCod,(unsigned) Rol_NET,(unsigned) Rol_TCH, OrderBySubQuery[Gbl.Dpts.SelectedOrder]); if (Gbl.Dpts.Num) // Departments found... { /***** Create list with courses in degree *****/ if ((Gbl.Dpts.Lst = (struct Department *) calloc ((size_t) Gbl.Dpts.Num, sizeof (struct Department))) == NULL) Lay_NotEnoughMemoryExit (); /***** 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]) */ Str_Copy (Dpt->ShrtName,row[2], Hie_MAX_BYTES_SHRT_NAME); /* Get the full name of the department (row[3]) */ Str_Copy (Dpt->FullName,row[3], Hie_MAX_BYTES_FULL_NAME); /* Get the URL of the department (row[4]) */ Str_Copy (Dpt->WWW,row[4], Cns_MAX_BYTES_WWW); /* Get number of non-editing teachers and teachers in this department (row[5]) */ if (sscanf (row[5],"%u",&Dpt->NumTchs) != 1) Dpt->NumTchs = 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; MYSQL_RES *mysql_res; MYSQL_ROW row; unsigned long NumRows; /***** Clear data *****/ Dpt->InsCod = -1L; Dpt->ShrtName[0] = Dpt->FullName[0] = Dpt->WWW[0] = '\0'; Dpt->NumTchs = 0; /***** Check if department code is correct *****/ if (Dpt->DptCod == 0) { Str_Copy (Dpt->ShrtName,Txt_Another_department, Hie_MAX_BYTES_SHRT_NAME); Str_Copy (Dpt->FullName,Txt_Another_department, Hie_MAX_BYTES_FULL_NAME); } else if (Dpt->DptCod > 0) { /***** Get data of a department from database *****/ NumRows = DB_QuerySELECT (&mysql_res,"can not get data of a department", "(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_TCH, Dpt->DptCod,(unsigned) Rol_TCH); 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]) */ Str_Copy (Dpt->ShrtName,row[1], Hie_MAX_BYTES_SHRT_NAME); /* Get the full name of the department (row[2]) */ Str_Copy (Dpt->FullName,row[2], Hie_MAX_BYTES_FULL_NAME); /* Get the URL of the department (row[3]) */ Str_Copy (Dpt->WWW,row[3], Cns_MAX_BYTES_WWW); /* 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 departments *****/ 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) { /***** Get number of departments in an institution from database *****/ return (unsigned) DB_QueryCOUNT ("can not get number of departments" " in an institution", "SELECT COUNT(*) FROM departments" " WHERE InsCod=%ld", InsCod); } /*****************************************************************************/ /************************** List all the departments *************************/ /*****************************************************************************/ static void Dpt_ListDepartmentsForEdition (void) { extern const char *Txt_Another_institution; unsigned NumDpt; struct Department *Dpt; struct Instit Ins; unsigned NumIns; /***** Start table *****/ Tbl_StartTable (2); /***** Write heading *****/ 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_BASIC_DATA); /* Put icon to remove department */ fprintf (Gbl.F.Out,"" ""); if (Dpt->NumTchs) // Department has teachers ==> deletion forbidden Ico_PutIconRemovalNotAllowed (); else { Frm_StartForm (ActRemDpt); Dpt_PutParamDptCod (Dpt->DptCod); Ico_PutIconRemove (); Frm_EndForm (); } fprintf (Gbl.F.Out,""); /* Department code */ fprintf (Gbl.F.Out,"" "%ld " "", Dpt->DptCod); /* Institution */ fprintf (Gbl.F.Out,""); Frm_StartForm (ActChgDptIns); Dpt_PutParamDptCod (Dpt->DptCod); fprintf (Gbl.F.Out,""); Frm_EndForm (); fprintf (Gbl.F.Out,""); /* Department short name */ fprintf (Gbl.F.Out,""); Frm_StartForm (ActRenDptSho); Dpt_PutParamDptCod (Dpt->DptCod); fprintf (Gbl.F.Out,"", Hie_MAX_CHARS_SHRT_NAME,Dpt->ShrtName,Gbl.Form.Id); Frm_EndForm (); fprintf (Gbl.F.Out,""); /* Department full name */ fprintf (Gbl.F.Out,""); Frm_StartForm (ActRenDptFul); Dpt_PutParamDptCod (Dpt->DptCod); fprintf (Gbl.F.Out,"", Hie_MAX_CHARS_FULL_NAME,Dpt->FullName,Gbl.Form.Id); Frm_EndForm (); fprintf (Gbl.F.Out,""); /* Department WWW */ fprintf (Gbl.F.Out,""); Frm_StartForm (ActChgDptWWW); Dpt_PutParamDptCod (Dpt->DptCod); fprintf (Gbl.F.Out,"", Cns_MAX_CHARS_WWW,Dpt->WWW,Gbl.Form.Id); Frm_EndForm (); fprintf (Gbl.F.Out,""); /* Number of teachers */ fprintf (Gbl.F.Out,"" "%u" "" "", Dpt->NumTchs); } /***** End table *****/ Tbl_EndTable (); } /*****************************************************************************/ /****************** Write parameter with code of department ******************/ /*****************************************************************************/ static void Dpt_PutParamDptCod (long DptCod) { Par_PutHiddenParamLong (Dpt_PARAM_DPT_COD_NAME,DptCod); } /*****************************************************************************/ /******************* Get parameter with code of department *******************/ /*****************************************************************************/ long Dpt_GetAndCheckParamDptCod (long MinCodAllowed) { long DptCod; /***** Get and check parameter with code of department *****/ if ((DptCod = Par_GetParToLong (Dpt_PARAM_DPT_COD_NAME)) < MinCodAllowed) Lay_ShowErrorAndExit ("Code of department is missing or invalid."); return DptCod; } /*****************************************************************************/ /***************************** Remove a department ***************************/ /*****************************************************************************/ void Dpt_RemoveDepartment (void) { extern const char *Txt_To_remove_a_department_you_must_first_remove_all_teachers_in_the_department; extern const char *Txt_Department_X_removed; /***** Department constructor *****/ Dpt_EditingDepartmentConstructor (); /***** Get department code *****/ Dpt_EditingDpt->DptCod = Dpt_GetAndCheckParamDptCod (1); /***** Get data of the department from database *****/ Dpt_GetDataOfDepartmentByCod (Dpt_EditingDpt); /***** Check if this department has teachers *****/ if (Dpt_EditingDpt->NumTchs) // Department has teachers ==> don't remove Ale_CreateAlert (Ale_WARNING,NULL, Txt_To_remove_a_department_you_must_first_remove_all_teachers_in_the_department); else // Department has no teachers ==> remove it { /***** Remove department *****/ DB_QueryDELETE ("can not remove a department", "DELETE FROM departments WHERE DptCod=%ld", Dpt_EditingDpt->DptCod); /***** Write message to show the change made *****/ Ale_CreateAlert (Ale_SUCCESS,NULL, Txt_Department_X_removed, Dpt_EditingDpt->FullName); } } /*****************************************************************************/ /****************** Change the institution of a department *******************/ /*****************************************************************************/ void Dpt_ChangeDepartIns (void) { extern const char *Txt_The_institution_of_the_department_has_changed; long NewInsCod; /***** Department constructor *****/ Dpt_EditingDepartmentConstructor (); /***** Get parameters from form *****/ /* Get the code of the department */ Dpt_EditingDpt->DptCod = Dpt_GetAndCheckParamDptCod (1); /* Get parameter with institution code */ NewInsCod = Ins_GetAndCheckParamOtherInsCod (1); /***** Get data of the department from database *****/ Dpt_GetDataOfDepartmentByCod (Dpt_EditingDpt); /***** Update institution in table of departments *****/ DB_QueryUPDATE ("can not update the institution of a department", "UPDATE departments SET InsCod=%ld WHERE DptCod=%ld", NewInsCod,Dpt_EditingDpt->DptCod); /***** Write message to show the change made *****/ Ale_CreateAlert (Ale_SUCCESS,NULL, Txt_The_institution_of_the_department_has_changed); } /*****************************************************************************/ /******************* Change the short name of a department *******************/ /*****************************************************************************/ void Dpt_RenameDepartShort (void) { /***** Department constructor *****/ Dpt_EditingDepartmentConstructor (); /***** Rename department *****/ Dpt_RenameDepartment (Cns_SHRT_NAME); } /*****************************************************************************/ /******************* Change the full name of a department ********************/ /*****************************************************************************/ void Dpt_RenameDepartFull (void) { /***** Department constructor *****/ Dpt_EditingDepartmentConstructor (); /***** Rename department *****/ Dpt_RenameDepartment (Cns_FULL_NAME); } /*****************************************************************************/ /************************ Change the name of a degree ************************/ /*****************************************************************************/ static void Dpt_RenameDepartment (Cns_ShrtOrFullName_t ShrtOrFullName) { extern const char *Txt_You_can_not_leave_the_name_of_the_department_X_empty; extern const char *Txt_The_department_X_already_exists; extern const char *Txt_The_department_X_has_been_renamed_as_Y; extern const char *Txt_The_name_of_the_department_X_has_not_changed; const char *ParamName = NULL; // Initialized to avoid warning const char *FieldName = NULL; // Initialized to avoid warning size_t MaxBytes = 0; // Initialized to avoid warning char *CurrentDptName = NULL; // Initialized to avoid warning char NewDptName[Hie_MAX_BYTES_FULL_NAME + 1]; switch (ShrtOrFullName) { case Cns_SHRT_NAME: ParamName = "ShortName"; FieldName = "ShortName"; MaxBytes = Hie_MAX_BYTES_SHRT_NAME; CurrentDptName = Dpt_EditingDpt->ShrtName; break; case Cns_FULL_NAME: ParamName = "FullName"; FieldName = "FullName"; MaxBytes = Hie_MAX_BYTES_FULL_NAME; CurrentDptName = Dpt_EditingDpt->FullName; break; } /***** Get parameters from form *****/ /* Get the code of the department */ Dpt_EditingDpt->DptCod = Dpt_GetAndCheckParamDptCod (1); /* Get the new name for the department */ Par_GetParToText (ParamName,NewDptName,MaxBytes); /***** Get from the database the old names of the department *****/ Dpt_GetDataOfDepartmentByCod (Dpt_EditingDpt); /***** Check if new name is empty *****/ if (!NewDptName[0]) Ale_CreateAlert (Ale_WARNING,NULL, Txt_You_can_not_leave_the_name_of_the_department_X_empty, CurrentDptName); else { /***** Check if old and new names are the same (this happens when return is pressed without changes) *****/ if (strcmp (CurrentDptName,NewDptName)) // Different names { /***** If degree was in database... *****/ if (Dpt_CheckIfDepartmentNameExists (ParamName,NewDptName,Dpt_EditingDpt->DptCod)) Ale_CreateAlert (Ale_WARNING,NULL, Txt_The_department_X_already_exists, NewDptName); else { /* Update the table changing old name by new name */ Dpt_UpdateDegNameDB (Dpt_EditingDpt->DptCod,FieldName,NewDptName); /* Write message to show the change made */ Ale_CreateAlert (Ale_SUCCESS,NULL, Txt_The_department_X_has_been_renamed_as_Y, CurrentDptName,NewDptName); } } else // The same name Ale_CreateAlert (Ale_INFO,NULL, Txt_The_name_of_the_department_X_has_not_changed, CurrentDptName); } /***** Update name *****/ Str_Copy (CurrentDptName,NewDptName, MaxBytes); } /*****************************************************************************/ /******************* Check if the name of department exists ******************/ /*****************************************************************************/ static bool Dpt_CheckIfDepartmentNameExists (const char *FieldName,const char *Name,long DptCod) { /***** Get number of departments with a name from database *****/ return (DB_QueryCOUNT ("can not check if the name" " of a department already existed", "SELECT COUNT(*) FROM departments" " WHERE %s='%s' AND DptCod<>%ld", FieldName,Name,DptCod) != 0); } /*****************************************************************************/ /************* Update department name in table of departments ****************/ /*****************************************************************************/ static void Dpt_UpdateDegNameDB (long DptCod,const char *FieldName,const char *NewDptName) { /***** Update department changing old name by new name *****/ DB_QueryUPDATE ("can not update the name of a department", "UPDATE departments SET %s='%s' WHERE DptCod=%ld", FieldName,NewDptName,DptCod); } /******************************************************************************/ /*********************** Change the URL of a department *********************/ /*****************************************************************************/ void Dpt_ChangeDptWWW (void) { extern const char *Txt_The_new_web_address_is_X; extern const char *Txt_You_can_not_leave_the_web_address_empty; char NewWWW[Cns_MAX_BYTES_WWW + 1]; /***** Department constructor *****/ Dpt_EditingDepartmentConstructor (); /***** Get parameters from form *****/ /* Get the code of the department */ Dpt_EditingDpt->DptCod = Dpt_GetAndCheckParamDptCod (1); /* Get the new WWW for the department */ Par_GetParToText ("WWW",NewWWW,Cns_MAX_BYTES_WWW); /***** Get data of the department from database *****/ Dpt_GetDataOfDepartmentByCod (Dpt_EditingDpt); /***** Check if new WWW is empty *****/ if (NewWWW[0]) { /* Update the table changing old WWW by new WWW */ DB_QueryUPDATE ("can not update the web of a department", "UPDATE departments SET WWW='%s' WHERE DptCod=%ld", NewWWW,Dpt_EditingDpt->DptCod); /***** Write message to show the change made *****/ Ale_CreateAlert (Ale_SUCCESS,NULL, Txt_The_new_web_address_is_X, NewWWW); } else Ale_CreateAlert (Ale_WARNING,NULL, Txt_You_can_not_leave_the_web_address_empty); /***** Update web *****/ Str_Copy (Dpt_EditingDpt->WWW,NewWWW, Cns_MAX_BYTES_WWW); } /*****************************************************************************/ /******* Show alerts after changing a department and continue editing ********/ /*****************************************************************************/ void Dpt_ContEditAfterChgDpt (void) { /***** Write message to show the change made *****/ Ale_ShowAlerts (NULL); /***** Show the form again *****/ Dpt_EditDepartmentsInternal (); /***** Department destructor *****/ Dpt_EditingDepartmentDestructor (); } /*****************************************************************************/ /******************* Put a form to create a new department *******************/ /*****************************************************************************/ static void Dpt_PutFormToCreateDepartment (void) { extern const char *Txt_New_department; extern const char *Txt_Institution; extern const char *Txt_Short_name; extern const char *Txt_Full_name; extern const char *Txt_WWW; extern const char *Txt_Another_institution; extern const char *Txt_Create_department; unsigned NumIns; /***** Start form *****/ Frm_StartForm (ActNewDpt); /***** Start box and table *****/ Box_StartBoxTable (NULL,Txt_New_department,NULL, NULL,Box_NOT_CLOSABLE,2); /***** Write heading *****/ fprintf (Gbl.F.Out,"" "" "%s" "" "" "%s" "" "" "%s" "" "" "%s" "" "", Txt_Institution, Txt_Short_name, Txt_Full_name, Txt_WWW); /***** Institution *****/ fprintf (Gbl.F.Out,"" "" "" ""); /***** Department short name *****/ fprintf (Gbl.F.Out,"" "" "", Hie_MAX_CHARS_SHRT_NAME,Dpt_EditingDpt->ShrtName); /***** Department full name *****/ fprintf (Gbl.F.Out,"" "" "", Hie_MAX_CHARS_FULL_NAME,Dpt_EditingDpt->FullName); /***** Department WWW *****/ fprintf (Gbl.F.Out,"" "" "" "", Cns_MAX_CHARS_WWW,Dpt_EditingDpt->WWW); /***** End table, send button and end box *****/ Box_EndBoxTableWithButton (Btn_CREATE_BUTTON,Txt_Create_department); /***** End form *****/ Frm_EndForm (); } /*****************************************************************************/ /******************** Write header with fields of a degree *******************/ /*****************************************************************************/ static void Dpt_PutHeadDepartments (void) { extern const char *Txt_Code; extern const char *Txt_Institution; extern const char *Txt_Short_name; extern const char *Txt_Full_name; extern const char *Txt_WWW; extern const char *Txt_ROLES_PLURAL_BRIEF_Abc[Rol_NUM_ROLES]; fprintf (Gbl.F.Out,"" "" "" "" "%s" "" "" "%s" "" "" "%s" "" "" "%s" "" "" "%s" "" "" "%s" "" "", Txt_Code, Txt_Institution, Txt_Short_name, Txt_Full_name, Txt_WWW, Txt_ROLES_PLURAL_BRIEF_Abc[Rol_TCH]); } /*****************************************************************************/ /***************** Receive form to create a new department *******************/ /*****************************************************************************/ void Dpt_RecFormNewDpt (void) { extern const char *Txt_The_department_X_already_exists; extern const char *Txt_Created_new_department_X; extern const char *Txt_You_must_specify_the_web_address_of_the_new_department; extern const char *Txt_You_must_specify_the_short_name_and_the_full_name_of_the_new_department; /***** Department constructor *****/ Dpt_EditingDepartmentConstructor (); /***** Get parameters from form *****/ /* Get institution */ Dpt_EditingDpt->InsCod = Ins_GetAndCheckParamOtherInsCod (1); /* Get department short name */ Par_GetParToText ("ShortName",Dpt_EditingDpt->ShrtName,Hie_MAX_BYTES_SHRT_NAME); /* Get department full name */ Par_GetParToText ("FullName",Dpt_EditingDpt->FullName,Hie_MAX_BYTES_FULL_NAME); /* Get department WWW */ Par_GetParToText ("WWW",Dpt_EditingDpt->WWW,Cns_MAX_BYTES_WWW); if (Dpt_EditingDpt->ShrtName[0] && Dpt_EditingDpt->FullName[0]) // If there's a department name { if (Dpt_EditingDpt->WWW[0]) { /***** If name of department was in database... *****/ if (Dpt_CheckIfDepartmentNameExists ("ShortName",Dpt_EditingDpt->ShrtName,-1L)) Ale_CreateAlert (Ale_WARNING,NULL, Txt_The_department_X_already_exists, Dpt_EditingDpt->ShrtName); else if (Dpt_CheckIfDepartmentNameExists ("FullName",Dpt_EditingDpt->FullName,-1L)) Ale_CreateAlert (Ale_WARNING,NULL, Txt_The_department_X_already_exists, Dpt_EditingDpt->FullName); else // Add new department to database { Dpt_CreateDepartment (Dpt_EditingDpt); Ale_CreateAlert (Ale_SUCCESS,NULL, Txt_Created_new_department_X, Dpt_EditingDpt->FullName); } } else // If there is not a web Ale_CreateAlert (Ale_WARNING,NULL, Txt_You_must_specify_the_web_address_of_the_new_department); } else // If there is not a department name Ale_CreateAlert (Ale_WARNING,NULL, Txt_You_must_specify_the_short_name_and_the_full_name_of_the_new_department); } /*****************************************************************************/ /************************** Create a new department **************************/ /*****************************************************************************/ static void Dpt_CreateDepartment (struct Department *Dpt) { /***** Create a new department *****/ DB_QueryINSERT ("can not create a new department", "INSERT INTO departments" " (InsCod,ShortName,FullName,WWW)" " VALUES" " (%ld,'%s','%s','%s')", Dpt->InsCod,Dpt->ShrtName,Dpt->FullName,Dpt->WWW); } /*****************************************************************************/ /************************** Get number of departments ************************/ /*****************************************************************************/ unsigned Dpt_GetTotalNumberOfDepartments (void) { /***** Get number of departments from database *****/ return (unsigned) DB_GetNumRowsTable ("departments"); } /*****************************************************************************/ /**************** Get number of departments in a institution *****************/ /*****************************************************************************/ unsigned Dpt_GetNumDptsInIns (long InsCod) { /***** Get departments in an institution from database *****/ return (unsigned) DB_QueryCOUNT ("can not get number of departments" " in an institution", "SELECT COUNT(*) FROM departments" " WHERE InsCod=%ld", InsCod); } /*****************************************************************************/ /*********************** Put selector for department *************************/ /*****************************************************************************/ void Dpt_WriteSelectorDepartment (long InsCod,long DptCod, const char *SelectClass, long FirstOption, const char *TextWhenNoDptSelected, bool SubmitFormOnChange) { extern const char *Txt_Another_department; unsigned NumDpt; bool NoDptSelectable; /***** Get list of departments *****/ Dpt_GetListDepartments (InsCod); /***** Selector to select department *****/ /* Start selector */ fprintf (Gbl.F.Out,""); /***** Free list of departments *****/ Dpt_FreeListDepartments (); } /*****************************************************************************/ /********************** Department constructor/destructor ********************/ /*****************************************************************************/ static void Dpt_EditingDepartmentConstructor (void) { /***** Pointer must be NULL *****/ if (Dpt_EditingDpt != NULL) Lay_ShowErrorAndExit ("Error initializing department."); /***** Allocate memory for department *****/ if ((Dpt_EditingDpt = (struct Department *) malloc (sizeof (struct Department))) == NULL) Lay_ShowErrorAndExit ("Error allocating memory for department."); /***** Reset department *****/ Dpt_EditingDpt->DptCod = -1L; Dpt_EditingDpt->InsCod = -1L; Dpt_EditingDpt->ShrtName[0] = '\0'; Dpt_EditingDpt->FullName[0] = '\0'; Dpt_EditingDpt->WWW[0] = '\0'; Dpt_EditingDpt->NumTchs = 0; } static void Dpt_EditingDepartmentDestructor (void) { /***** Free memory used for department *****/ if (Dpt_EditingDpt != NULL) { free ((void *) Dpt_EditingDpt); Dpt_EditingDpt = NULL; } }