",
+ The_ClassForm[Gbl.Prefs.Theme],
+ Txt_Place);
+ if (!PrintView &&
+ Gbl.Usrs.Me.Role.Logged >= Rol_CTR_ADM)
+ // Only centre admins, institution admins and system admins
+ // can change centre place
+ {
+ /* Get list of places of the current institution */
+ Gbl.Plcs.SelectedOrder = Plc_ORDER_BY_PLACE;
+ Plc_GetListPlaces ();
+
+ /* Put form to select place */
+ Act_FormStart (ActChgCtrPlcCfg);
+ fprintf (Gbl.F.Out,"");
+ Act_FormEnd ();
+
+ /* Free list of places */
+ Plc_FreeListPlaces ();
+ }
+ else // I can not change centre place
+ fprintf (Gbl.F.Out,"%s",Plc.FullName);
+ fprintf (Gbl.F.Out,"
"
+ "
");
+
/***** Centre WWW *****/
fprintf (Gbl.F.Out,"
",
- The_ClassForm[Gbl.Prefs.Theme],
- Txt_Place,
- Plc.FullName);
-
/***** Number of users who claim to belong to this centre *****/
fprintf (Gbl.F.Out,"
"
"
"
@@ -1836,11 +1871,10 @@ static void Ctr_UpdateCtrInsDB (long CtrCod,long InsCod)
/************************ Change the place of a centre ***********************/
/*****************************************************************************/
-void Ctr_ChangeCentrePlace (void)
+void Ctr_ChangeCtrPlc (void)
{
extern const char *Txt_The_place_of_the_centre_has_changed;
long NewPlcCod;
- char Query[512];
/***** Get centre code *****/
Gbl.Ctrs.EditingCtr.CtrCod = Ctr_GetAndCheckParamOtherCtrCod (1);
@@ -1852,9 +1886,7 @@ void Ctr_ChangeCentrePlace (void)
Ctr_GetDataOfCentreByCod (&Gbl.Ctrs.EditingCtr);
/***** Update place in table of centres *****/
- sprintf (Query,"UPDATE centres SET PlcCod=%ld WHERE CtrCod=%ld",
- NewPlcCod,Gbl.Ctrs.EditingCtr.CtrCod);
- DB_QueryUPDATE (Query,"can not update the place of a centre");
+ Ctr_UpdateCtrPlcDB (Gbl.Ctrs.EditingCtr.CtrCod,NewPlcCod);
Gbl.Ctrs.EditingCtr.PlcCod = NewPlcCod;
/***** Write message to show the change made
@@ -1867,6 +1899,38 @@ void Ctr_ChangeCentrePlace (void)
Ctr_EditCentres ();
}
+void Ctr_ChangeCtrPlcInConfig (void)
+ {
+ extern const char *Txt_The_place_of_the_centre_has_changed;
+ long NewPlcCod;
+
+ /***** Get parameter with place code *****/
+ NewPlcCod = Plc_GetParamPlcCod ();
+
+ /***** Update place in table of centres *****/
+ Ctr_UpdateCtrPlcDB (Gbl.CurrentCtr.Ctr.CtrCod,NewPlcCod);
+ Gbl.CurrentCtr.Ctr.PlcCod = NewPlcCod;
+
+ /***** Write message to show the change made *****/
+ Ale_ShowAlert (Ale_SUCCESS,Txt_The_place_of_the_centre_has_changed);
+
+ /***** Show the form again *****/
+ Ctr_ShowConfiguration ();
+ }
+
+/*****************************************************************************/
+/************** Update database changing old place by new place **************/
+/*****************************************************************************/
+
+static void Ctr_UpdateCtrPlcDB (long CtrCod,long NewPlcCod)
+ {
+ char Query[256];
+
+ sprintf (Query,"UPDATE centres SET PlcCod=%ld WHERE CtrCod=%ld",
+ NewPlcCod,CtrCod);
+ DB_QueryUPDATE (Query,"can not update the place of a centre");
+ }
+
/*****************************************************************************/
/********************* Change the short name of a centre *********************/
/*****************************************************************************/
diff --git a/swad_centre.h b/swad_centre.h
index 28e4751c..3196ea1b 100644
--- a/swad_centre.h
+++ b/swad_centre.h
@@ -106,7 +106,8 @@ long Ctr_GetAndCheckParamOtherCtrCod (long MinCodAllowed);
void Ctr_RemoveCentre (void);
void Ctr_ChangeCtrInsInConfig (void);
void Ctr_ContEditAfterChgCtrInConfig (void);
-void Ctr_ChangeCentrePlace (void);
+void Ctr_ChangeCtrPlc (void);
+void Ctr_ChangeCtrPlcInConfig (void);
void Ctr_RenameCentreShort (void);
void Ctr_RenameCentreShortInConfig (void);
void Ctr_RenameCentreFull (void);
diff --git a/swad_changelog.h b/swad_changelog.h
index e67a81f8..05067d34 100644
--- a/swad_changelog.h
+++ b/swad_changelog.h
@@ -230,21 +230,20 @@
// TODO: Link names are too short ==> add more length, for example: "A guide to building and understanding the physics of Water Rockets"
// TODO: Fix bug: Error when a link end in a dot. Example: "A guide to building..." --> "A guide to building._..url" (two dots)
-// TODO: In centre configuration, place should be editable
-
// TODO: Cuando sólo se cambian los grupos y no el rol de un profesor ya existente, no sale ningún mensaje. se haga lo que se haga en la edición debería salir un mensaje del tipo "Cambios realizados"
/*****************************************************************************/
/****************************** Public constants *****************************/
/*****************************************************************************/
-#define Log_PLATFORM_VERSION "SWAD 16.244 (2017-06-11)"
+#define Log_PLATFORM_VERSION "SWAD 16.245 (2017-06-11)"
#define CSS_FILE "swad16.235.1.css"
#define JS_FILE "swad16.206.3.js"
// Number of lines (includes comments but not blank lines) has been got with the following command:
// nl swad*.c swad*.h css/swad*.css py/swad*.py js/swad*.js soap/swad*?.h sql/swad*.sql | tail -1
/*
+ Version 16.245: Jun 12, 2017 Place editable in centre configuration. (221876 lines)
Version 16.244.1: Jun 12, 2017 Fix bug in edition of centres. (221817 lines)
Version 16.244: Jun 12, 2017 Code refactoring related with boxes. (221815 lines)
Version 16.243: Jun 12, 2017 Code refactoring related with boxes. (222174 lines)