");
-
/* Institution short name */
fprintf (Gbl.F.Out,"
");
if (ICanEdit)
@@ -1756,70 +1724,6 @@ void Ins_ContEditAfterChgInsInConfig (void)
Ins_ShowConfiguration ();
}
-/*****************************************************************************/
-/******************* Change the country of a institution *********************/
-/*****************************************************************************/
-
-void Ins_ChangeInsCty (void)
- {
- extern const char *Txt_The_institution_X_already_exists;
- extern const char *Txt_The_country_of_the_institution_X_has_changed_to_Y;
- struct Institution *Ins;
- struct Country NewCty;
-
- Ins = &Gbl.Inss.EditingIns;
-
- /***** Get parameters from form *****/
- /* Get the code of the institution */
- if ((Ins->InsCod = Ins_GetParamOtherInsCod ()) < 0)
- Lay_ShowErrorAndExit ("Code of institution is missing.");
-
- /* Get the new country code for the institution */
- if ((NewCty.CtyCod = Cty_GetParamOtherCtyCod ()) < 0)
- Lay_ShowErrorAndExit ("Code of country is missing.");
-
- /***** Get data of the institution from database *****/
- Ins_GetDataOfInstitutionByCod (Ins,Ins_GET_BASIC_DATA);
-
- /***** Get data of the country from database *****/
- Cty_GetDataOfCountryByCod (&NewCty,Cty_GET_BASIC_DATA);
-
- /***** Check if country has changed *****/
- if (NewCty.CtyCod != Ins->CtyCod)
- {
- /***** Check if it already exists an institution with the same name in the new country *****/
- if (Ins_CheckIfInsNameExistsInCty ("ShortName",Ins->ShortName,-1L,NewCty.CtyCod))
- {
- sprintf (Gbl.Message,Txt_The_institution_X_already_exists,
- Ins->ShortName);
- Lay_ShowAlert (Lay_WARNING,Gbl.Message);
- }
- else if (Ins_CheckIfInsNameExistsInCty ("FullName",Ins->FullName,-1L,NewCty.CtyCod))
- {
- sprintf (Gbl.Message,Txt_The_institution_X_already_exists,
- Ins->FullName);
- Lay_ShowAlert (Lay_WARNING,Gbl.Message);
- }
- else
- {
- /***** Update the table changing the country of the institution *****/
- Ins_UpdateInsCtyDB (Ins->InsCod,NewCty.CtyCod);
- Ins->CtyCod = NewCty.CtyCod;
-
- /***** Write message to show the change made *****/
- sprintf (Gbl.Message,Txt_The_country_of_the_institution_X_has_changed_to_Y,
- Ins->FullName,NewCty.Name[Gbl.Prefs.Language]);
- Lay_ShowAlert (Lay_SUCCESS,Gbl.Message);
-
- /***** Put button to go to institution changed *****/
- Ins_PutButtonToGoToIns (Ins);
- }
- }
-
- /***** Show the form again *****/
- Ins_EditInstitutions ();
- }
-
/*****************************************************************************/
/****************** Update country in table of institutions ******************/
/*****************************************************************************/
@@ -2045,18 +1949,6 @@ static void Ins_PutFormToCreateInstitution (void)
Log_DrawLogo (Sco_SCOPE_INS,-1L,"",20,NULL,true);
fprintf (Gbl.F.Out,"
");
- /***** Country *****/
- fprintf (Gbl.F.Out,"
"
- ""
- "
",
- Gbl.CurrentCty.Cty.CtyCod,
- Gbl.CurrentCty.Cty.Name[Gbl.Prefs.Language]);
-
/***** Institution short name *****/
fprintf (Gbl.F.Out,"