Marown/swad-core
Marown
/
swad-core
mirror of https://github.com/acanas/swad-core.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
swad-core/swad_holiday.c

1193 lines
41 KiB
C
Raw Blame History

// swad_holiday.c: holidays
/*
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-2017 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 <stdlib.h> // For calloc
#include <string.h> // For string functions
#include "swad_database.h"
#include "swad_global.h"
#include "swad_holiday.h"
#include "swad_parameter.h"
#include "swad_text.h"
/*****************************************************************************/
/************** External global variables from others modules ****************/
/*****************************************************************************/
extern struct Globals Gbl;
/*****************************************************************************/
/***************************** Private constants *****************************/
/*****************************************************************************/
/*****************************************************************************/
/******************************* Private types *******************************/
/*****************************************************************************/
/*****************************************************************************/
/***************************** Private variables *****************************/
/*****************************************************************************/
/*****************************************************************************/
/***************************** Private prototypes ****************************/
/*****************************************************************************/
static void Hld_GetParamHldOrder (void);
static void Hld_PutIconToEditHlds (void);
static void Hld_GetDataOfHolidayByCod (struct Holiday *Hld);
static Hld_HolidayType_t Hld_GetParamHldType (void);
static Hld_HolidayType_t Hld_GetTypeOfHoliday (const char *UnsignedStr);
static void Hld_ListHolidaysForEdition (void);
static void Hld_PutParamHldCod (long HldCod);
static void Hld_ChangeDate (Hld_StartOrEndDate_t StartOrEndDate);
static void Hld_PutFormToCreateHoliday (void);
static void Hld_PutHeadHolidays (void);
static void Hld_CreateHoliday (struct Holiday *Hld);
/*****************************************************************************/
/*************************** List all the holidays ***************************/
/*****************************************************************************/
void Hld_SeeHolidays (void)
{
extern const char *Hlp_INSTITUTION_Holidays;
extern const char *Txt_Holidays;
extern const char *Txt_HOLIDAYS_HELP_ORDER[2];
extern const char *Txt_HOLIDAYS_ORDER[2];
extern const char *Txt_End_date;
extern const char *Txt_Holiday;
extern const char *Txt_All_places;
extern const char *Txt_No_holidays;
extern const char *Txt_New_holiday;
Hld_Order_t Order;
unsigned NumHld;
char StrDate[Cns_MAX_BYTES_DATE + 1];
if (Gbl.CurrentIns.Ins.InsCod > 0)
{
/***** Get parameter with the type of order in the list of holidays *****/
Hld_GetParamHldOrder ();
/***** Get list of holidays *****/
Hld_GetListHolidays ();
/***** Table head *****/
Lay_StartRoundFrame (NULL,Txt_Holidays,
Gbl.Usrs.Me.LoggedRole >= Rol_INS_ADM ? Hld_PutIconToEditHlds :
NULL,
Hlp_INSTITUTION_Holidays);
if (Gbl.Hlds.Num)
{
Lay_StartTableWideMargin (2);
fprintf (Gbl.F.Out,"<tr>");
for (Order = Hld_ORDER_BY_PLACE;
Order <= Hld_ORDER_BY_START_DATE;
Order++)
{
fprintf (Gbl.F.Out,"<th class=\"LEFT_MIDDLE\">");
Act_FormStart (ActSeeHld);
Par_PutHiddenParamUnsigned ("Order",(unsigned) Order);
Act_LinkFormSubmit (Txt_HOLIDAYS_HELP_ORDER[Order],"TIT_TBL",NULL);
if (Order == Gbl.Hlds.SelectedOrder)
fprintf (Gbl.F.Out,"<u>");
fprintf (Gbl.F.Out,"%s",Txt_HOLIDAYS_ORDER[Order]);
if (Order == Gbl.Hlds.SelectedOrder)
fprintf (Gbl.F.Out,"</u>");
fprintf (Gbl.F.Out,"</a>");
Act_FormEnd ();
fprintf (Gbl.F.Out,"</th>");
}
fprintf (Gbl.F.Out,"<th class=\"LEFT_MIDDLE\">"
"&nbsp;%s&nbsp;"
"</th>"
"<th class=\"LEFT_MIDDLE\">"
"%s"
"</th>"
"</tr>",
Txt_End_date,
Txt_Holiday);
/***** Write all the holidays *****/
for (NumHld = 0;
NumHld < Gbl.Hlds.Num;
NumHld++)
{
/* Write data of this holiday */
fprintf (Gbl.F.Out,"<tr>"
"<td class=\"DAT LEFT_MIDDLE\">"
"%s"
"</td>",
Gbl.Hlds.Lst[NumHld].PlcCod <= 0 ? Txt_All_places :
Gbl.Hlds.Lst[NumHld].PlaceFullName);
Dat_ConvDateToDateStr (&Gbl.Hlds.Lst[NumHld].StartDate,StrDate);
fprintf (Gbl.F.Out,"<td class=\"DAT LEFT_MIDDLE\">"
"&nbsp;%s"
"</td>",
StrDate);
fprintf (Gbl.F.Out,"<td class=\"DAT LEFT_MIDDLE\">"
"&nbsp;");
switch (Gbl.Hlds.Lst[NumHld].HldTyp)
{
case Hld_HOLIDAY:
break;
case Hld_NON_SCHOOL_PERIOD:
Dat_ConvDateToDateStr (&Gbl.Hlds.Lst[NumHld].EndDate,StrDate);
fprintf (Gbl.F.Out,"%s",StrDate);
break;
}
fprintf (Gbl.F.Out,"</td>"
"<td class=\"DAT LEFT_MIDDLE\">"
"&nbsp;%s"
"</td>"
"</tr>",
Gbl.Hlds.Lst[NumHld].Name);
}
Lay_EndTable ();
}
else // No holidays created in the current institution
Ale_ShowAlert (Ale_INFO,Txt_No_holidays);
/***** Button to create centre *****/
if (Gbl.Usrs.Me.LoggedRole >= Rol_INS_ADM) // Institution admin or system admin
{
Act_FormStart (ActEdiHld);
Lay_PutConfirmButton (Txt_New_holiday);
Act_FormEnd ();
}
/***** End table *****/
Lay_EndRoundFrameTable ();
/***** Free list of holidays *****/
Hld_FreeListHolidays ();
}
}
/*****************************************************************************/
/********* Get parameter with the type or order in list of holidays **********/
/*****************************************************************************/
static void Hld_GetParamHldOrder (void)
{
Gbl.Hlds.SelectedOrder = (Hld_Order_t)
Par_GetParToUnsignedLong ("Order",
0,
Hld_NUM_ORDERS - 1,
(unsigned long) Hld_DEFAULT_ORDER_TYPE);
}
/*****************************************************************************/
/************************* Put icon to edit holidays *************************/
/*****************************************************************************/
static void Hld_PutIconToEditHlds (void)
{
Lay_PutContextualIconToEdit (ActEdiHld,NULL);
}
/*****************************************************************************/
/************************ Put forms to edit degree types *********************/
/*****************************************************************************/
void Hld_EditHolidays (void)
{
/***** Get list of places *****/
Plc_GetListPlaces ();
/***** Get list of holidays *****/
Hld_GetListHolidays ();
/***** Put a form to create a new holiday *****/
Hld_PutFormToCreateHoliday ();
/***** Forms to edit current holidays *****/
if (Gbl.Hlds.Num)
Hld_ListHolidaysForEdition ();
/***** Free list of holidays *****/
Hld_FreeListHolidays ();
/***** Free list of places *****/
Plc_FreeListPlaces ();
}
/*****************************************************************************/
/*************************** List all the holidays ***************************/
/*****************************************************************************/
void Hld_GetListHolidays (void)
{
char OrderBySubQuery[256];
char Query[2048];
MYSQL_RES *mysql_res;
MYSQL_ROW row;
unsigned NumHld;
struct Holiday *Hld;
if (Gbl.DB.DatabaseIsOpen)
{
if (Gbl.Hlds.LstIsRead)
Hld_FreeListHolidays ();
/***** Get holidays from database *****/
switch (Gbl.Hlds.SelectedOrder)
{
case Hld_ORDER_BY_PLACE:
sprintf (OrderBySubQuery,"Place,StartDate");
break;
case Hld_ORDER_BY_START_DATE:
sprintf (OrderBySubQuery,"StartDate,Place");
break;
}
sprintf (Query,"(SELECT holidays.HldCod,holidays.PlcCod,"
"places.FullName as Place,HldTyp,"
"DATE_FORMAT(holidays.StartDate,'%%Y%%m%%d') AS StartDate,"
"DATE_FORMAT(holidays.EndDate,'%%Y%%m%%d') AS EndDate,"
"holidays.Name"
" FROM holidays,places"
" WHERE holidays.InsCod=%ld"
" AND holidays.PlcCod=places.PlcCod"
" AND places.InsCod=%ld)"
" UNION "
"(SELECT HldCod,PlcCod,'' as Place,HldTyp,"
"DATE_FORMAT(StartDate,'%%Y%%m%%d') AS StartDate,"
"DATE_FORMAT(EndDate,'%%Y%%m%%d') AS EndDate,Name"
" FROM holidays"
" WHERE InsCod=%ld"
" AND PlcCod NOT IN"
"(SELECT DISTINCT PlcCod FROM places WHERE InsCod=%ld))"
" ORDER BY %s",
Gbl.CurrentIns.Ins.InsCod,
Gbl.CurrentIns.Ins.InsCod,
Gbl.CurrentIns.Ins.InsCod,
Gbl.CurrentIns.Ins.InsCod,
OrderBySubQuery);
if ((Gbl.Hlds.Num = (unsigned) DB_QuerySELECT (Query,&mysql_res,"can not get holidays"))) // Holidays found...
{
/***** Create list of holidays *****/
if ((Gbl.Hlds.Lst = (struct Holiday *) calloc ((size_t) Gbl.Hlds.Num,sizeof (struct Holiday))) == NULL)
Lay_ShowErrorAndExit ("Not enough memory to store holidays.");
/***** Get the holidays *****/
for (NumHld = 0;
NumHld < Gbl.Hlds.Num;
NumHld++)
{
Hld = &(Gbl.Hlds.Lst[NumHld]);
/* Get next holiday */
row = mysql_fetch_row (mysql_res);
/* Get holiday code (row[0]) */
if ((Hld->HldCod = Str_ConvertStrCodToLongCod (row[0])) < 0)
Lay_ShowErrorAndExit ("Wrong holiday code.");
/* Get place code (row[1]) */
Hld->PlcCod = Str_ConvertStrCodToLongCod (row[1]);
/* Get the full name of the place (row[2]) */
Str_Copy (Hld->PlaceFullName,row[2],
Plc_MAX_BYTES_PLACE_FULL_NAME);
/* Get type (row[3]) */
Hld->HldTyp = Hld_GetTypeOfHoliday (row[3]);
/* Get start date (row[4] holds the start date in YYYYMMDD format) */
if (!(Dat_GetDateFromYYYYMMDD (&(Hld->StartDate),row[4])))
Lay_ShowErrorAndExit ("Wrong start date.");
/* Set / get end date */
switch (Hld->HldTyp)
{
case Hld_HOLIDAY: // Only one day
/* Set end date = start date */
Dat_AssignDate (&Hld->EndDate,&Hld->StartDate);
break;
case Hld_NON_SCHOOL_PERIOD: // One or more days
/* Get end date (row[5] holds the end date in YYYYMMDD format) */
if (!(Dat_GetDateFromYYYYMMDD (&(Hld->EndDate),row[5])))
Lay_ShowErrorAndExit ("Wrong end date.");
break;
}
/* Get the name of the holiday/non school period (row[6]) */
Str_Copy (Hld->Name,row[6],
Hld_MAX_BYTES_HOLIDAY_NAME);
}
}
/***** Free structure that stores the query result *****/
DB_FreeMySQLResult (&mysql_res);
Gbl.Hlds.LstIsRead = true;
}
}
/*****************************************************************************/
/************************* Get holiday data by code **************************/
/*****************************************************************************/
static void Hld_GetDataOfHolidayByCod (struct Holiday *Hld)
{
char Query[2048];
MYSQL_RES *mysql_res;
MYSQL_ROW row;
/***** Clear data *****/
Hld->PlcCod = -1L;
Hld->PlaceFullName[0] = '\0';
Hld->StartDate.Day =
Hld->StartDate.Month =
Hld->StartDate.Year = 0;
Hld->Name[0] = '\0';
/***** Check if holiday code is correct *****/
if (Hld->HldCod <= 0)
Lay_ShowErrorAndExit ("Wrong code of holiday.");
/***** Get data of holiday from database *****/
sprintf (Query,"(SELECT holidays.PlcCod,places.FullName as Place,HldTyp,"
"DATE_FORMAT(holidays.StartDate,'%%Y%%m%%d'),"
"DATE_FORMAT(holidays.EndDate,'%%Y%%m%%d'),holidays.Name"
" FROM holidays,places"
" WHERE holidays.HldCod=%ld"
" AND holidays.InsCod=%ld"
" AND holidays.PlcCod=places.PlcCod"
" AND places.InsCod=%ld)"
" UNION "
"(SELECT PlcCod,'' as Place,HldTyp,"
"DATE_FORMAT(StartDate,'%%Y%%m%%d'),"
"DATE_FORMAT(EndDate,'%%Y%%m%%d'),Name"
" FROM holidays"
" WHERE HldCod=%ld"
" AND InsCod=%ld"
" AND PlcCod NOT IN"
"(SELECT DISTINCT PlcCod FROM places WHERE InsCod=%ld))",
Hld->HldCod,
Gbl.CurrentIns.Ins.InsCod,
Gbl.CurrentIns.Ins.InsCod,
Hld->HldCod,
Gbl.CurrentIns.Ins.InsCod,
Gbl.CurrentIns.Ins.InsCod);
if (DB_QuerySELECT (Query,&mysql_res,"can not get data of a holiday")) // Holiday found...
{
/* Get row */
row = mysql_fetch_row (mysql_res);
/* Get place code (row[0]) */
Hld->PlcCod = Str_ConvertStrCodToLongCod (row[0]);
/* Get the full name of the place (row[1]) */
Str_Copy (Hld->PlaceFullName,row[1],
Plc_MAX_BYTES_PLACE_FULL_NAME);
/* Get type (row[2]) */
Hld->HldTyp = Hld_GetTypeOfHoliday (row[2]);
/* Get start date (row[3] holds the start date in YYYYMMDD format) */
if (!(Dat_GetDateFromYYYYMMDD (&(Hld->StartDate),row[3])))
Lay_ShowErrorAndExit ("Wrong start date.");
/* Set / get end date */
switch (Hld->HldTyp)
{
case Hld_HOLIDAY: // Only one day
/* Assign end date = start date */
Dat_AssignDate (&Hld->EndDate,&Hld->StartDate);
break;
case Hld_NON_SCHOOL_PERIOD: // One or more days
/* Get end date (row[4] holds the end date in YYYYMMDD format) */
if (!(Dat_GetDateFromYYYYMMDD (&(Hld->EndDate),row[4])))
Lay_ShowErrorAndExit ("Wrong end date.");
break;
}
/* Get the name of the holiday/non school period (row[5]) */
Str_Copy (Hld->Name,row[5],
Hld_MAX_BYTES_HOLIDAY_NAME);
}
/***** Free structure that stores the query result *****/
DB_FreeMySQLResult (&mysql_res);
}
/*****************************************************************************/
/************ Get parameter from form with the type of a holiday *************/
/*****************************************************************************/
static Hld_HolidayType_t Hld_GetParamHldType (void)
{
return (Hld_HolidayType_t)
Par_GetParToUnsignedLong ("HldTyp",
0,
Hld_NUM_TYPES_HOLIDAY - 1,
(unsigned long) Hld_HOLIDAY_TYPE_DEFAULT);
}
/*****************************************************************************/
/********************* Get type of holiday from string ***********************/
/*****************************************************************************/
static Hld_HolidayType_t Hld_GetTypeOfHoliday (const char *UnsignedStr)
{
unsigned UnsignedNum;
if (sscanf (UnsignedStr,"%u",&UnsignedNum) != 1)
Lay_ShowErrorAndExit ("Wrong type of holiday.");
if (UnsignedNum >= Hld_NUM_TYPES_HOLIDAY)
Lay_ShowErrorAndExit ("Wrong type of holiday.");
return (Hld_HolidayType_t) UnsignedNum;
}
/*****************************************************************************/
/**************************** Free list of holidays **************************/
/*****************************************************************************/
void Hld_FreeListHolidays (void)
{
if (Gbl.Hlds.LstIsRead && Gbl.Hlds.Lst)
{
/***** Free memory used by the list of courses in degree *****/
free ((void *) Gbl.Hlds.Lst);
Gbl.Hlds.Lst = NULL;
Gbl.Hlds.Num = 0;
Gbl.Hlds.LstIsRead = false;
}
}
/*****************************************************************************/
/********************* List all the holidays for edition *********************/
/*****************************************************************************/
static void Hld_ListHolidaysForEdition (void)
{
extern const char *Hlp_INSTITUTION_Holidays_edit;
extern const char *Txt_Holidays;
extern const char *Txt_All_places;
extern const char *Txt_HOLIDAY_TYPES[Hld_NUM_TYPES_HOLIDAY];
unsigned NumHld;
unsigned NumPlc;
struct Holiday *Hld;
Hld_HolidayType_t HolidayType;
Lay_StartRoundFrameTable (NULL,Txt_Holidays,
NULL,Hlp_INSTITUTION_Holidays_edit,2);
/***** Table head *****/
Hld_PutHeadHolidays ();
/***** Write all the holidays *****/
for (NumHld = 0;
NumHld < Gbl.Hlds.Num;
NumHld++)
{
Hld = &Gbl.Hlds.Lst[NumHld];
/* Put icon to remove holiday */
fprintf (Gbl.F.Out,"<tr>"
"<td class=\"BM\">");
Act_FormStart (ActRemHld);
Hld_PutParamHldCod (Hld->HldCod);
Lay_PutIconRemove ();
Act_FormEnd ();
fprintf (Gbl.F.Out,"</td>");
/* Holiday code */
fprintf (Gbl.F.Out,"<td class=\"DAT RIGHT_MIDDLE\">"
"%ld&nbsp;"
"</td>",
Hld->HldCod);
/* Holiday place */
fprintf (Gbl.F.Out,"<td class=\"CENTER_MIDDLE\">");
Act_FormStart (ActChgHldPlc);
Hld_PutParamHldCod (Hld->HldCod);
fprintf (Gbl.F.Out,"<select name=\"PlcCod\" style=\"width:62px;\""
" onchange=\"document.getElementById('%s').submit();\">"
"<option value=\"-1\"",
Gbl.Form.Id);
if (Hld->PlcCod <= 0)
fprintf (Gbl.F.Out," selected=\"selected\"");
fprintf (Gbl.F.Out,">%s</option>",Txt_All_places);
for (NumPlc = 0;
NumPlc < Gbl.Plcs.Num;
NumPlc++)
fprintf (Gbl.F.Out,"<option value=\"%ld\"%s>%s</option>",
Gbl.Plcs.Lst[NumPlc].PlcCod,
Gbl.Plcs.Lst[NumPlc].PlcCod == Hld->PlcCod ? " selected=\"selected\"" :
"",
Gbl.Plcs.Lst[NumPlc].ShrtName);
fprintf (Gbl.F.Out,"</select>");
Act_FormEnd ();
fprintf (Gbl.F.Out,"</td>");
/* Holiday type */
fprintf (Gbl.F.Out,"<td class=\"CENTER_MIDDLE\">");
Act_FormStart (ActChgHldTyp);
Hld_PutParamHldCod (Hld->HldCod);
fprintf (Gbl.F.Out,"<select name=\"HldTyp\" style=\"width:62px;\""
" onchange=\"document.getElementById('%s').submit();\">",
Gbl.Form.Id);
for (HolidayType = (Hld_HolidayType_t) 0;
HolidayType < Hld_NUM_TYPES_HOLIDAY;
HolidayType++)
fprintf (Gbl.F.Out,"<option value=\"%u\"%s>%s</option>",
(unsigned) HolidayType,
HolidayType == Hld->HldTyp ? " selected=\"selected\"" :
"",
Txt_HOLIDAY_TYPES[HolidayType]);
fprintf (Gbl.F.Out,"</select>");
Act_FormEnd ();
fprintf (Gbl.F.Out,"</td>");
/* Holiday date / Non school period start date */
fprintf (Gbl.F.Out,"<td class=\"CENTER_MIDDLE\">");
Act_FormStart (ActChgHldStrDat);
Hld_PutParamHldCod (Hld->HldCod);
Dat_WriteFormDate (Gbl.Now.Date.Year - 1,
Gbl.Now.Date.Year + 1,
"Start",
&(Gbl.Hlds.Lst[NumHld].StartDate),
true,false);
Act_FormEnd ();
fprintf (Gbl.F.Out,"</td>");
/* Non school period end date */
fprintf (Gbl.F.Out,"<td class=\"CENTER_MIDDLE\">");
Act_FormStart (ActChgHldEndDat);
Hld_PutParamHldCod (Hld->HldCod);
Dat_WriteFormDate (Gbl.Now.Date.Year - 1,
Gbl.Now.Date.Year + 1,
"End",
&(Gbl.Hlds.Lst[NumHld].EndDate),
true,(Hld->HldTyp == Hld_HOLIDAY));
Act_FormEnd ();
fprintf (Gbl.F.Out,"</td>");
/* Holiday name */
fprintf (Gbl.F.Out,"<td class=\"CENTER_MIDDLE\">");
Act_FormStart (ActRenHld);
Hld_PutParamHldCod (Hld->HldCod);
fprintf (Gbl.F.Out,"<input type=\"text\" name=\"Name\""
" size=\"20\" maxlength=\"%u\" value=\"%s\""
" onchange=\"document.getElementById('%s').submit();\" />",
Hld_MAX_CHARS_HOLIDAY_NAME,Hld->Name,Gbl.Form.Id);
Act_FormEnd ();
fprintf (Gbl.F.Out,"</td>"
"</tr>");
}
Lay_EndRoundFrameTable ();
}
/*****************************************************************************/
/******************** Write parameter with code of holiday *******************/
/*****************************************************************************/
static void Hld_PutParamHldCod (long HldCod)
{
Par_PutHiddenParamLong ("HldCod",HldCod);
}
/*****************************************************************************/
/********************* Get parameter with code of holiday ********************/
/*****************************************************************************/
long Hld_GetParamHldCod (void)
{
/***** Get code of holiday *****/
return Par_GetParToLong ("HldCod");
}
/*****************************************************************************/
/******************************* Remove a holiday ****************************/
/*****************************************************************************/
void Hld_RemoveHoliday1 (void)
{
extern const char *Txt_Holiday_X_removed;
char Query[128];
struct Holiday Hld;
/***** Get holiday code *****/
if ((Hld.HldCod = Hld_GetParamHldCod ()) == -1L)
Lay_ShowErrorAndExit ("Code of holiday is missing.");
/***** Get data of the holiday from database *****/
Hld_GetDataOfHolidayByCod (&Hld);
/***** Remove holiday *****/
sprintf (Query,"DELETE FROM holidays WHERE HldCod=%ld",
Hld.HldCod);
DB_QueryDELETE (Query,"can not remove a holiday");
/***** Write message to show the change made *****/
Gbl.Alert.Type = Ale_SUCCESS;
sprintf (Gbl.Alert.Txt,Txt_Holiday_X_removed,Hld.Name);
}
void Hld_RemoveHoliday2 (void)
{
/***** Show success message *****/
Ale_ShowPendingAlert ();
/***** Show the form again *****/
Hld_EditHolidays ();
}
/*****************************************************************************/
/************************* Change the place of a holiday *********************/
/*****************************************************************************/
void Hld_ChangeHolidayPlace1 (void)
{
extern const char *Txt_The_place_of_the_holiday_X_has_changed_to_Y;
char Query[128];
struct Holiday *Hld;
struct Place NewPlace;
Hld = &Gbl.Hlds.EditingHld;
/***** Get parameters from form *****/
/* Get the code of the holiday */
if ((Hld->HldCod = Hld_GetParamHldCod ()) == -1L)
Lay_ShowErrorAndExit ("Code of holiday is missing.");
/* Get the new place for the holiday */
NewPlace.PlcCod = Plc_GetParamPlcCod ();
/***** Get from the database the data of the place *****/
Plc_GetDataOfPlaceByCod (&NewPlace);
/***** Get from the database the data of the holiday *****/
Hld_GetDataOfHolidayByCod (Hld);
/***** Update the place in database *****/
sprintf (Query,"UPDATE holidays SET PlcCod=%ld WHERE HldCod=%ld",
NewPlace.PlcCod,Hld->HldCod);
DB_QueryUPDATE (Query,"can not update the place of a holiday");
Hld->PlcCod = NewPlace.PlcCod;
Str_Copy (Hld->PlaceFullName,NewPlace.FullName,
Plc_MAX_BYTES_PLACE_FULL_NAME);
/***** Write message to show the change made *****/
Gbl.Alert.Type = Ale_SUCCESS;
sprintf (Gbl.Alert.Txt,Txt_The_place_of_the_holiday_X_has_changed_to_Y,
Hld->Name,NewPlace.FullName);
}
void Hld_ChangeHolidayPlace2 (void)
{
/***** Show success message *****/
Ale_ShowPendingAlert ();
/***** Show the form again *****/
Hld_EditHolidays ();
}
/*****************************************************************************/
/************************* Change the type of a holiday **********************/
/*****************************************************************************/
void Hld_ChangeHolidayType1 (void)
{
extern const char *Txt_The_type_of_the_holiday_X_has_changed;
char Query[256];
struct Holiday *Hld;
Hld = &Gbl.Hlds.EditingHld;
/***** Get the code of the holiday *****/
if ((Hld->HldCod = Hld_GetParamHldCod ()) == -1L)
Lay_ShowErrorAndExit ("Code of holiday is missing.");
/***** Get from the database the data of the holiday *****/
Hld_GetDataOfHolidayByCod (Hld);
/***** Get the new type for the holiday *****/
Hld->HldTyp = Hld_GetParamHldType ();
/***** Update holiday/no school period in database *****/
Dat_AssignDate (&Hld->EndDate,&Hld->StartDate);
sprintf (Query,"UPDATE holidays SET HldTyp=%u,EndDate=StartDate"
" WHERE HldCod=%ld",
(unsigned) Hld->HldTyp,Hld->HldCod);
DB_QueryUPDATE (Query,"can not update the type of a holiday");
/***** Write message to show the change made *****/
Gbl.Alert.Type = Ale_SUCCESS;
sprintf (Gbl.Alert.Txt,Txt_The_type_of_the_holiday_X_has_changed,
Hld->Name);
}
void Hld_ChangeHolidayType2 (void)
{
/***** Show success message *****/
Ale_ShowPendingAlert ();
/***** Show the form again *****/
Hld_EditHolidays ();
}
/*****************************************************************************/
/*** Change the date of a holiday / the start date of a non school period ****/
/*****************************************************************************/
void Hld_ChangeStartDate1 (void)
{
Hld_ChangeDate (HLD_START_DATE);
}
/*****************************************************************************/
/*************** Change the end date of a non school period ******************/
/*****************************************************************************/
void Hld_ChangeEndDate1 (void)
{
Hld_ChangeDate (HLD_END_DATE);
}
/*****************************************************************************/
/**************** Change the start/end date of a holiday *********************/
/*****************************************************************************/
static void Hld_ChangeDate (Hld_StartOrEndDate_t StartOrEndDate)
{
extern const char *Txt_The_date_of_the_holiday_X_has_changed_to_Y;
char Query[128];
struct Holiday *Hld;
struct Date NewDate;
struct Date *PtrDate = NULL; // Initialized to avoid warning
const char *StrStartOrEndDate = NULL; // Initialized to avoid warning
char StrDate[Cns_MAX_BYTES_DATE + 1];
Hld = &Gbl.Hlds.EditingHld;
/***** Get the code of the holiday *****/
if ((Hld->HldCod = Hld_GetParamHldCod ()) == -1L)
Lay_ShowErrorAndExit ("Code of holiday is missing.");
/***** Get from the database the data of the holiday *****/
Hld_GetDataOfHolidayByCod (Hld);
/***** Get the new date for the holiday *****/
switch (StartOrEndDate)
{
case HLD_START_DATE:
StrStartOrEndDate = "StartDate";
PtrDate = &(Hld->StartDate);
Dat_GetDateFromForm ("StartDay","StartMonth","StartYear",
&(NewDate.Day),&(NewDate.Month),&(NewDate.Year));
if (NewDate.Day == 0 ||
NewDate.Month == 0 ||
NewDate.Year == 0)
Dat_AssignDate (&NewDate,&Gbl.Now.Date);
break;
case HLD_END_DATE:
StrStartOrEndDate = "EndDate";
PtrDate = &(Hld->EndDate);
switch (Hld->HldTyp)
{
case Hld_HOLIDAY:
Dat_AssignDate (&NewDate,&Hld->StartDate);
break;
case Hld_NON_SCHOOL_PERIOD:
Dat_GetDateFromForm ("EndDay","EndMonth","EndYear",
&(NewDate.Day),&(NewDate.Month),&(NewDate.Year));
if (NewDate.Day == 0 ||
NewDate.Month == 0 ||
NewDate.Year == 0)
Dat_AssignDate (&NewDate,&Gbl.Now.Date);
break;
}
break;
}
/***** Update the date in database *****/
sprintf (Query,"UPDATE holidays SET %s='%04u%02u%02u' WHERE HldCod=%ld",
StrStartOrEndDate,
NewDate.Year,
NewDate.Month,
NewDate.Day,
Hld->HldCod);
DB_QueryUPDATE (Query,"can not update the date of a holiday");
Dat_AssignDate (PtrDate,&NewDate);
/***** Write message to show the change made *****/
Gbl.Alert.Type = Ale_SUCCESS;
Dat_ConvDateToDateStr (&NewDate,StrDate);
sprintf (Gbl.Alert.Txt,Txt_The_date_of_the_holiday_X_has_changed_to_Y,
Hld->Name,StrDate);
}
/*****************************************************************************/
/*********** Show message and form after changing a holiday date *************/
/*****************************************************************************/
void Hld_ChangeDate2 (void)
{
/***** Show success message *****/
Ale_ShowPendingAlert ();
/***** Show the form again *****/
Hld_EditHolidays ();
}
/*****************************************************************************/
/************************ Change the name of a degree ************************/
/*****************************************************************************/
void Hld_RenameHoliday1 (void)
{
extern const char *Txt_You_can_not_leave_the_name_of_the_holiday_X_empty;
extern const char *Txt_The_name_of_the_holiday_X_has_changed_to_Y;
extern const char *Txt_The_name_of_the_holiday_X_has_not_changed;
char Query[128 + Hld_MAX_BYTES_HOLIDAY_NAME];
struct Holiday *Hld;
char NewHldName[Hld_MAX_BYTES_HOLIDAY_NAME + 1];
Hld = &Gbl.Hlds.EditingHld;
/***** Get parameters from form *****/
/* Get the code of the holiday */
if ((Hld->HldCod = Hld_GetParamHldCod ()) == -1L)
Lay_ShowErrorAndExit ("Code of holiday is missing.");
/* Get the new name for the holiday */
Par_GetParToText ("Name",NewHldName,Hld_MAX_BYTES_HOLIDAY_NAME);
/***** Get from the database the old names of the holiday *****/
Hld_GetDataOfHolidayByCod (Hld);
/***** Check if new name is empty *****/
if (!NewHldName[0])
{
Gbl.Alert.Type = Ale_WARNING;
sprintf (Gbl.Alert.Txt,Txt_You_can_not_leave_the_name_of_the_holiday_X_empty,
Hld->Name);
}
else
{
/***** Check if old and new names are the same (this happens when user press enter with no changes in the form) *****/
if (strcmp (Hld->Name,NewHldName)) // Different names
{
/***** If degree was in database... *****/
/* Update the table changing old name by new name */
sprintf (Query,"UPDATE holidays SET Name='%s' WHERE HldCod=%ld",
NewHldName,Hld->HldCod);
DB_QueryUPDATE (Query,"can not update the text of a holiday");
Str_Copy (Hld->Name,NewHldName,
Hld_MAX_BYTES_HOLIDAY_NAME);
/***** Write message to show the change made *****/
Gbl.Alert.Type = Ale_SUCCESS;
sprintf (Gbl.Alert.Txt,Txt_The_name_of_the_holiday_X_has_changed_to_Y,
Hld->Name,NewHldName);
}
else // The same name
{
Gbl.Alert.Type = Ale_INFO;
sprintf (Gbl.Alert.Txt,Txt_The_name_of_the_holiday_X_has_not_changed,
Hld->Name);
}
}
}
void Hld_RenameHoliday2 (void)
{
/***** Write error/success message *****/
Ale_ShowPendingAlert ();
/***** Show the form again *****/
Hld_EditHolidays ();
}
/*****************************************************************************/
/********************* Put a form to create a new holiday ********************/
/*****************************************************************************/
static void Hld_PutFormToCreateHoliday (void)
{
extern const char *Hlp_INSTITUTION_Holidays_edit;
extern const char *Txt_All_places;
extern const char *Txt_New_holiday;
extern const char *Txt_Place;
extern const char *Txt_Type;
extern const char *Txt_START_END_TIME[Dat_NUM_START_END_TIME];
extern const char *Txt_Holiday;
extern const char *Txt_HOLIDAY_TYPES[Hld_NUM_TYPES_HOLIDAY];
extern const char *Txt_Create_holiday;
struct Holiday *Hld;
unsigned NumPlc;
Hld_HolidayType_t HolidayType;
Hld = &Gbl.Hlds.EditingHld;
/***** Start form *****/
Act_FormStart (ActNewHld);
/***** Start of frame *****/
Lay_StartRoundFrameTable (NULL,Txt_New_holiday,
NULL,Hlp_INSTITUTION_Holidays_edit,2);
/***** Write heading *****/
fprintf (Gbl.F.Out,"<tr>"
"<th class=\"LEFT_MIDDLE\">"
"%s"
"</th>"
"<th class=\"LEFT_MIDDLE\">"
"%s"
"</th>"
"<th class=\"LEFT_MIDDLE\">"
"%s"
"</th>"
"<th class=\"LEFT_MIDDLE\">"
"%s"
"</th>"
"<th class=\"LEFT_MIDDLE\">"
"%s"
"</th>"
"</tr>",
Txt_Place,
Txt_Type,
Txt_START_END_TIME[Dat_START_TIME],
Txt_START_END_TIME[Dat_END_TIME],
Txt_Holiday);
/***** Holiday place *****/
fprintf (Gbl.F.Out,"<tr>"
"<td class=\"CENTER_MIDDLE\">"
"<select name=\"PlcCod\" style=\"width:62px;\">"
"<option value=\"-1\"");
if (Hld->PlcCod <= 0)
fprintf (Gbl.F.Out," selected=\"selected\"");
fprintf (Gbl.F.Out,">%s</option>",Txt_All_places);
for (NumPlc = 0;
NumPlc < Gbl.Plcs.Num;
NumPlc++)
fprintf (Gbl.F.Out,"<option value=\"%ld\"%s>%s</option>",
Gbl.Plcs.Lst[NumPlc].PlcCod,
Gbl.Plcs.Lst[NumPlc].PlcCod == Hld->PlcCod ? " selected=\"selected\"" :
"",
Gbl.Plcs.Lst[NumPlc].ShrtName);
fprintf (Gbl.F.Out,"</select>"
"</td>");
/***** Holiday type *****/
fprintf (Gbl.F.Out,"<td class=\"CENTER_MIDDLE\">"
"<select name=\"HldTyp\" style=\"width:62px;\">");
for (HolidayType = (Hld_HolidayType_t) 0;
HolidayType < Hld_NUM_TYPES_HOLIDAY;
HolidayType++)
fprintf (Gbl.F.Out,"<option value=\"%u\"%s>%s</option>",
(unsigned) HolidayType,
HolidayType == Hld->HldTyp ? " selected=\"selected\"" :
"",
Txt_HOLIDAY_TYPES[HolidayType]);
fprintf (Gbl.F.Out,"</select>"
"</td>");
/***** Holiday date / Non school period start date *****/
fprintf (Gbl.F.Out,"<td class=\"CENTER_MIDDLE\">");
Dat_WriteFormDate (Gbl.Now.Date.Year - 1,
Gbl.Now.Date.Year + 1,
"Start",
&(Hld->StartDate),
false,false);
fprintf (Gbl.F.Out,"</td>");
/***** Non school period end date *****/
fprintf (Gbl.F.Out,"<td class=\"CENTER_MIDDLE\">");
Dat_WriteFormDate (Gbl.Now.Date.Year - 1,
Gbl.Now.Date.Year + 1,
"End",
&(Hld->EndDate),
false,false);
fprintf (Gbl.F.Out,"</td>");
/***** Holiday name *****/
fprintf (Gbl.F.Out,"<td class=\"CENTER_MIDDLE\">"
"<input type=\"text\" name=\"Name\""
" size=\"20\" maxlength=\"%u\" value=\"%s\""
" required=\"required\" />"
"</td>"
"<td></td>"
"</tr>",
Hld_MAX_CHARS_HOLIDAY_NAME,Hld->Name);
/***** Send button and end of frame *****/
Lay_EndRoundFrameTableWithButton (Lay_CREATE_BUTTON,Txt_Create_holiday);
/***** End of form *****/
Act_FormEnd ();
}
/*****************************************************************************/
/******************* Write header with fields of a holiday *******************/
/*****************************************************************************/
static void Hld_PutHeadHolidays (void)
{
extern const char *Txt_Code;
extern const char *Txt_Place;
extern const char *Txt_Type;
extern const char *Txt_START_END_TIME[Dat_NUM_START_END_TIME];
extern const char *Txt_Holiday;
fprintf (Gbl.F.Out,"<tr>"
"<th class=\"BM\"></th>"
"<th class=\"RIGHT_MIDDLE\">"
"%s"
"</th>"
"<th class=\"LEFT_MIDDLE\">"
"%s"
"</th>"
"<th class=\"LEFT_MIDDLE\">"
"%s"
"</th>"
"<th class=\"LEFT_MIDDLE\">"
"%s"
"</th>"
"<th class=\"LEFT_MIDDLE\">"
"%s"
"</th>"
"<th class=\"LEFT_MIDDLE\">"
"%s"
"</th>"
"</tr>",
Txt_Code,
Txt_Place,
Txt_Type,
Txt_START_END_TIME[Dat_START_TIME],
Txt_START_END_TIME[Dat_END_TIME],
Txt_Holiday);
}
/*****************************************************************************/
/******************* Receive form to create a new holiday ********************/
/*****************************************************************************/
void Hld_RecFormNewHoliday1 (void)
{
extern const char *Txt_Created_new_holiday_X;
extern const char *Txt_You_must_specify_the_name_of_the_new_holiday;
struct Holiday *Hld;
Hld = &Gbl.Hlds.EditingHld;
/***** Get place code *****/
Hld->PlcCod = Plc_GetParamPlcCod ();
/***** Get the type of holiday *****/
Hld->HldTyp = Hld_GetParamHldType ();
/***** Get start date *****/
Dat_GetDateFromForm ("StartDay","StartMonth","StartYear",
&(Hld->StartDate.Day),&(Hld->StartDate.Month),&(Hld->StartDate.Year));
if (Hld->StartDate.Day == 0 ||
Hld->StartDate.Month == 0 ||
Hld->StartDate.Year == 0)
Dat_AssignDate (&Hld->StartDate,&Gbl.Now.Date);
/***** Set end date *****/
switch (Hld->HldTyp)
{
case Hld_HOLIDAY:
/* Set end date = start date (ignore end date from form) */
Dat_AssignDate (&Hld->EndDate,&Hld->StartDate);
break;
case Hld_NON_SCHOOL_PERIOD:
/* Get end date from form */
Dat_GetDateFromForm ("EndDay","EndMonth","EndYear",
&(Hld->EndDate.Day),&(Hld->EndDate.Month),&(Hld->EndDate.Year));
if (Hld->EndDate.Day == 0 ||
Hld->EndDate.Month == 0 ||
Hld->EndDate.Year == 0)
Dat_AssignDate (&Hld->EndDate,&Gbl.Now.Date);
break;
}
/***** Get holiday name *****/
Par_GetParToText ("Name",Hld->Name,Hld_MAX_BYTES_HOLIDAY_NAME);
/***** Create the new holiday or set warning message *****/
if (Hld->Name[0]) // If there's a holiday name
{
/* Create the new holiday */
Hld_CreateHoliday (Hld);
/* Success message */
Gbl.Alert.Type = Ale_SUCCESS;
sprintf (Gbl.Alert.Txt,Txt_Created_new_holiday_X,Hld->Name);
}
else // If there is not a holiday name
{
/* Error message */
Gbl.Alert.Type = Ale_WARNING;
sprintf (Gbl.Alert.Txt,"%s",Txt_You_must_specify_the_name_of_the_new_holiday);
}
}
void Hld_RecFormNewHoliday2 (void)
{
/***** Write error/success message *****/
Ale_ShowPendingAlert ();
/***** Show the form again *****/
Hld_EditHolidays ();
}
/*****************************************************************************/
/**************************** Create a new holiday ***************************/
/*****************************************************************************/
static void Hld_CreateHoliday (struct Holiday *Hld)
{
char Query[256 + Hld_MAX_BYTES_HOLIDAY_NAME];
/***** Create a new holiday or no school period *****/
sprintf (Query,"INSERT INTO holidays"
" (InsCod,PlcCod,HldTyp,StartDate,EndDate,Name)"
" VALUES"
" (%ld,%ld,%u,'%04u%02u%02u','%04u%02u%02u','%s')",
Gbl.CurrentIns.Ins.InsCod,Hld->PlcCod,(unsigned) Hld->HldTyp,
Hld->StartDate.Year,
Hld->StartDate.Month,
Hld->StartDate.Day,
Hld->EndDate.Year,
Hld->EndDate.Month,
Hld->EndDate.Day,
Hld->Name);
DB_QueryINSERT (Query,"can not create holiday");
}
Reference in New Issue View Git Blame Copy Permalink