Context Navigation

close Warning: Failed to sync with repository "ogBrowser-Git": (1366, "Incorrect string value: '\\xF0\\x9F\\x93\\xA6 I...' for column 'message' at row 1"); repository information may be out of date. Look in the Trac log for more information including mitigation strategies.

source: admin/WebConsole/idiomas/php/eng/clases/Calendario_eng.php

Visit:

lgromero-new-oglive

Last change on this file was beebc19, checked in by Irina Gomez <irinagomez@…>, 7 years ago
#842 Consola: se revisan todos los ficheros de idioma en inglés.
Property mode set to `100644`
File size: 16.5 KB

Line
1	<?php
2	/*========================================================================================================
3	This class generates HTML tables for selecting dates (English version)
4
5	Class attributes:
6
7	class: Class [CSS] of HTML table that will be generated.
8	onmouseover: The Javascript function that will be run when generating the event.
9	onmouseout: Javascript function that will be run when generating the event.
10	onclick: Javascript function that will be run when clicking over the object.
11
12	=========================================================================================================*/
13	class Calendario{
14	var $aula;
15	var $horaresevini;
16	var $horaresevfin;
17	var $clase ;
18	var $onmouseover;
19	var $onmouseout;
20	var $onclick;
21
22	var $desplazamiento_dias=6; // Fine tunning depending on the algorithm start year
23	var $nombre_mes=array();
24	var $nombre_dia=array();
25	var $numero_annos=array();
26	var $dias_meses=array();
27
28	function __construct($pclase="", $ponmouseover="sobre(this)", $ponmouseout="fuera(this)", $ponclick="clic(this)"){ //Constructor
29	$this->clase=$pclase;
30	$this->onmouseover=$ponmouseover;
31	$this->onmouseout=$ponmouseout;
32	$this->onclick=$ponclick;
33
34	$this->nombre_mes[1]=array ("January",0x0001);
35	$this->nombre_mes[2]=array ("February",0x0002);
36	$this->nombre_mes[3]=array ("March",0x0004);
37	$this->nombre_mes[4]=array ("April",0x0008);
38	$this->nombre_mes[5]=array ("May",0x0010);
39	$this->nombre_mes[6]=array ("June",0x0020);
40	$this->nombre_mes[7]=array ("July",0x0040);
41	$this->nombre_mes[8]=array ("August",0x0080);
42	$this->nombre_mes[9]=array ("September",0x0100);
43	$this->nombre_mes[10]=array ("October",0x0200);
44	$this->nombre_mes[11]=array ("November",0x0400);
45	$this->nombre_mes[12]=array ("December",0x0800);
46
47
48	$this->numero_annos[1]=array ("2004",0x01); // size 1 bytes
49	$this->numero_annos[2]=array ("2005",0x02);
50	$this->numero_annos[3]=array ("2006",0x04);
51	$this->numero_annos[4]=array ("2007",0x08);
52	$this->numero_annos[5]=array ("2008",0x10);
53	$this->numero_annos[6]=array ("2009",0x20);
54	$this->numero_annos[7]=array ("2010",0x40);
55	$this->numero_annos[8]=array ("2011",0x80);
56
57	$this->dias_meses[1]=31;
58	$this->dias_meses[2]=28;
59	$this->dias_meses[3]=31;
60	$this->dias_meses[4]=30;
61	$this->dias_meses[5]=31;
62	$this->dias_meses[6]=30;
63	$this->dias_meses[7]=31;
64	$this->dias_meses[8]=31;
65	$this->dias_meses[9]=30;
66	$this->dias_meses[10]=31;
67	$this->dias_meses[11]=30;
68	$this->dias_meses[12]=31;
69
70	$this->nombre_dia[1]=array ("Mo",0x01); // size 1 bytes
71	$this->nombre_dia[2]=array ("Tu",0x02);
72	$this->nombre_dia[3]=array ("We",0x04);
73	$this->nombre_dia[4]=array ("Th",0x08);
74	$this->nombre_dia[5]=array ("Fr",0x10);
75	$this->nombre_dia[6]=array ("Sa",0x20);
76	$this->nombre_dia[7]=array ("Su",0x40);
77	}
78	/*________________________________________________________________________________________________________
79	This function returns a string with the HTML code of year and month schedule chosen
80	and they are class properties.
81	________________________________________________________________________________________________________*/
82	function MesAnno($mes,$anno,$CntMes){
83	$fecha="1/".$mes."/".$anno;
84	$ds=$this->_DiaSemana($fecha);
85	if ($ds==0) $ds=7;
86
87	$swbi=0; // add for leap year
88	if ($this->bisiesto($anno) && $mes==2) $swbi=1;
89
90	$HTML_calendario='<TABLE border=1 cellspacing=0 cellpadding=1 id="tabla_mesanno" class="'.$this->clase.'">'.chr(13);
91	$HTML_calendario.='<TR>'.chr(13);
92	$HTML_calendario.='<TH colspan=7 id="'.$mes.'/'.$anno.'" value="'.$this->aula.'" style="cursor:hand" onclick="TH_'.$this->onclick.'">'.$this->nombre_mes[$mes][0].'</TH></TR>'.chr(13); // Month name
93	$HTML_calendario.='<TR>'.chr(13);
94	for ($i=1;$i<8;$i++)
95	$HTML_calendario.='<TH>'.$this->nombre_dia[$i][0].'</TH>'.chr(13); // Days of the week
96	$HTML_calendario.='</TR><TR>'.chr(13);
97	for ($i=1;$i<$ds;$i++)
98	$HTML_calendario.='<TD> </TD>'.chr(13); // Filling firsts days of the week
99	$sm=$ds; // Control leap of week
100	for ($i=1;$i<=$this->dias_meses[$mes]+$swbi;$i++){
101	$HTML_calendario.='<TD align=center ';
102	if(isset($CntMes[$i])){
103	if($CntMes[$i]==1){
104	$HTML_calendario.=' style="COLOR:#eeeeee;BACKGROUND-COLOR: #cc3366;"';
105	$HTML_calendario.=' id="'.$i.'/'.$mes.'/'.$anno.'" value="'.$this->aula.'" style="cursor:hand" onmouseover="'.$this->onmouseover.'" onmouseout="'.$this->onmouseout.'" onclick="'.$this->onclick.'"';
106	}
107	}
108	$HTML_calendario.='>'.$i.'</TD>'.chr(13);
109	if ($sm%7==0){
110	$HTML_calendario.='</TR><TR>'.chr(13);
111	$sm=0;
112	}
113	$sm++;
114	}
115	$HTML_calendario.='</TR></TABLE>'.chr(13);
116	return($HTML_calendario);
117	}
118	/*________________________________________________________________________________________________________
119	This function returns a string with the HTML code of year and month schedule chosen
120	and they are class properties.
121	________________________________________________________________________________________________________*/
122	function JMesAnno($mes,$anno,$JDif,$TBfechas,$sumahoras){
123	$fecha="1/".$mes."/".$anno;
124	$Jdpl=$this->juliana($fecha)-$JDif; // Calculates start point for julian index
125	$ds=$this->_DiaSemana($fecha);
126	if ($ds==0) $ds=7;
127	$paso=2; // Ratio of color intensity
128	$swbi=0; // Add for leap year
129	if ($this->bisiesto($anno) && $mes==2) $swbi=1;
130	$HTML_calendario='<TABLE border=1 cellspacing=0 cellpadding=1 id="tabla_mesanno" class="'.$this->clase.'">'.chr(13);
131	$HTML_calendario.='<TR>'.chr(13);
132	$HTML_calendario.='<TH colspan=7 id="'.$mes.'/'.$anno.'" style="cursor:hand" onclick="TH_'.$this->onclick.'">'.$this->nombre_mes[(int)$mes][0].'</TH></TR>'.chr(13); // Month name
133	$HTML_calendario.='<TR>'.chr(13);
134	for ($i=1;$i<8;$i++)
135	$HTML_calendario.='<TH>'.$this->nombre_dia[$i][0].'</TH>'.chr(13); // Days of week
136	$HTML_calendario.='</TR><TR>'.chr(13);
137	for ($i=1;$i<$ds;$i++)
138	$HTML_calendario.='<TD> </TD>'.chr(13); // Filling firsts days of the week
139	$sm=$ds; // Control leap of week
140	for ($i=1;$i<=$this->dias_meses[(int)$mes]+$swbi;$i++){
141	$HTML_calendario.='<TD align=center ';
142	if(isset($TBfechas[$Jdpl])){
143	if($TBfechas[$Jdpl]>0){
144	$xpor=$TBfechas[$Jdpl]*100/$sumahoras;
145	$itcr=255;
146	$itc=240-($xpor*$paso);
147	if($xpor>=50)
148	$colordia="#FFFFFF";
149	else
150	$colordia="#000000";
151
152	$bgcolordia=sprintf('#%02x%02x%02x',$itcr,$itc,$itc);
153	$HTML_calendario.=' style="COLOR:'.$colordia.';BACKGROUND-COLOR: '.$bgcolordia.';"';
154	$HTML_calendario.=' id="'.$i.'/'.$mes.'/'.$anno.'" value="'.$this->aula.'" style="cursor:hand" onmouseover="'.$this->onmouseover.'" onmouseout="'.$this->onmouseout.'" onclick="'.$this->onclick.'"';
155	}
156	}
157	$HTML_calendario.='>'.$i.'</TD>'.chr(13);
158	if ($sm%7==0){
159	$HTML_calendario.='</TR><TR>'.chr(13);
160	$sm=0;
161	}
162	$sm++;
163	$Jdpl++;
164	}
165	$HTML_calendario.='</TR></TABLE>'.chr(13);
166	return($HTML_calendario);
167	}
168
169	/*________________________________________________________________________________________________________
170	This function returns day of the week number:
171	0=sunday 1=monday, 2=tuesday ... 6=saturday
172
173	Input parameter:
174	A string with date format dd/mm/yyyy.
175	________________________________________________________________________________________________________*/
176	function _DiaSemana($fecha){
177	list($dia,$mes,$anno)=explode('[/.-]',$fecha);
178	$cont=0;
179	for ($i=1900;$i<$anno;$i++){
180	if ($this->bisiesto($i)) $dias_anuales=366; else $dias_anuales=365;
181	$cont+=$dias_anuales;
182	}
183	for ($i=1;$i<$mes;$i++){
184	if ($i!=2)
185	$cont+=$this->dias_meses[$i];
186	else{
187	if ($this->bisiesto($anno))
188	$cont+=29;
189	else
190	$cont+=28;
191	}
192	}
193	$cont+=$dia+$this->desplazamiento_dias;
194	return($cont%7);
195	}
196	//________________________________________________________________________________________________________
197	// These function returns true if last year was a leap-year or false if it was not
198	//
199	// Input parameter:
200	// A number representing 1 year
201	//________________________________________________________________________________________________________
202	function bisiesto($anob){
203	if ($anob%4==0) return(true); else return(false);
204	}
205	//________________________________________________________________________________________________________
206	// This function returns a string with the HTML code of the lab reservations times.
207	//________________________________________________________________________________________________________
208	function HorasDias($CntDia,&$porcenhoras){
209	$HTML_calendario="";
210	$sw=0;
211	$conthoras=0; // Reservations minutes and hours counter
212	$maxcolumnas=8;
213	$tbampm[0]="a.m.";
214	$tbampm[1]="p.m.";
215
216	$HTML_calendario.='<TABLE border=0 cellspacing=0 cellpadding=0 id="tabla_horas" class="'.$this->clase.'">'.chr(13);
217	$HTML_calendario.='<TR>'.chr(13);
218	$HTML_calendario.='<TH colspan=3>Horas</TH></TR>'.chr(13); // Literal Horas
219	$HTML_calendario.='<TR>'.chr(13);
220	$HTML_ampm[0]="";
221	$HTML_ampm[1]="";
222	$swampm[0]=false;
223	$swampm[1]=false;
224
225	if($this->horaresevini<12) $ix=0; else $ix=1;
226	for($j=$ix;$j<=1;$j++){
227	$HTML_ampm[$j].='<TD style="BACKGROUND-COLOR: #FFFFFF;" valig=top >'.chr(13);
228	$HTML_ampm[$j].='<TABLE valig=top cellspacing=0 cellpadding=0 border=1 class="'.$this->clase.'">'.chr(13);
229	$HTML_ampm[$j].='<TR>'.chr(13);
230	$HTML_ampm[$j].='<TH colspan='.$maxcolumnas.'>'.$tbampm[$j].'</TH></TR>'.chr(13); // Literal Horas
231	$HTML_ampm[$j].='<TR>'.chr(13);
232
233	if($j==0){ // A.M.height
234	$imin=$this->horaresevini;
235	$currenthora=$imin;
236	if($this->horaresevfin<=12)
237	$imax=$this->horaresevfin;
238	else
239	$imax=12;
240	}
241	else{
242	if($this->horaresevini<=12)
243	$imin=0;
244	else
245	$imin=$this->horaresevini-12;
246	$imax=(int)$this->horaresevfin-12;
247	$currenthora=$imin;
248	}
249	$cols=0;
250	$currentminutos=0;
251	$currenthorario=$currenthora.":".$currentminutos;
252	$intervalo=($imax-$imin+1)*4;
253	for ($i=$imin;$i<$intervalo;$i++){
254	$cols++;
255	if($sw>0) // Brings reservations from A.M.
256	$swampm[$j]=true;
257
258	if($currentminutos==0) $currenthorario.="0";
259	if(isset($CntDia[$j][$currenthora][$currentminutos])){
260	if($CntDia[$j][$currenthora][$currentminutos]==1)
261	$sw++;
262	$swampm[$j]=true;
263	}
264	if(isset($CntDia[$j][$currenthora][$currentminutos])){
265	if($CntDia[$j][$currenthora][$currentminutos]==0)
266	$sw--;
267	}
268	$HTML_ampm[$j].='<TD ';
269	if($sw>0)
270	$HTML_ampm[$j].=' style="COLOR:#eeeeee;BACKGROUND-COLOR: #cc3366;"';
271
272	if($sw>0) // Counts 15 minutes fraction as reserved
273	$conthoras++;
274	$HTML_ampm[$j].=' align=center> '.$currenthorario.' </TD>'.chr(13);
275	$currentminutos+=15;
276	if($currentminutos==60) {
277	$currenthora++;
278	$currentminutos=0;
279	}
280	$currenthorario=$currenthora.":".$currentminutos;
281	if (($cols)%$maxcolumnas==0 ) $HTML_ampm[$j].='</TR><TR>'.chr(13);
282	}
283	$HTML_ampm[$j].='</TR></TABLE>'.chr(13);
284	$HTML_ampm[$j].='</TD>'.chr(13);
285	}
286
287	if ($swampm[0])
288	$HTML_calendario.=$HTML_ampm[0];
289
290	if ($swampm[0] && $swampm[1]){
291	$HTML_calendario.='<TD style="BACKGROUND-COLOR: #FFFFFF;" width=25> '.chr(13);
292	$HTML_calendario.='</TD>'.chr(13);
293	}
294
295	if ($swampm[1])
296	$HTML_calendario.=$HTML_ampm[1];
297
298	$HTML_calendario.='</TR>'.chr(13);
299	$HTML_calendario.='</TABLE>'.chr(13);
300
301	$numblo=($this->horaresevfin-$this->horaresevini)*4;
302	$porcenhoras=floor($conthoras*100/$numblo);
303	return($HTML_calendario);
304	}
305	/* --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
306	Returns a string with days (monday(1), tuesday(2)....sunday(7)), separated by commas
307	________________________________________________________________________________________________________________*/
308	function DiasPorMes($mes,$anno,$numerodia){
309	$cadenadias="";
310	$dia_c=1;
311	$fecha=$dia_c."/".$mes."/".$anno;
312	$ds=$this->_DiaSemana($fecha);
313	if ($ds==0) $ds=7;
314	while($ds!=$numerodia){
315	$dia_c++;
316	$ds++;
317	if($ds>7) $ds=1;
318	}
319	// Calculates number of days of a month
320	$diasmaxmes=$this->dias_meses[$mes];
321	if ($mes==2){
322	if ($this->bisiesto($anno)){
323	$diasmaxmes=29;
324	}
325	}
326	while($dia_c<=$diasmaxmes){
327	$cadenadias.=$dia_c.";";
328	$dia_c+=7;
329	}
330	return($cadenadias);
331	}
332	/*________________________________________________________________________________________________________
333	Returns a string with the days of a month of a given week, separated by commas.
334	________________________________________________________________________________________________________*/
335	function DiasPorSemanas($mes,$anno,$numerosemana){
336	$cadenadias="";
337	$dia_c=1;
338	$nsem=1;
339	$fecha=$dia_c."/".$mes."/".$anno;
340	$ds=$this->_DiaSemana($fecha);
341	if ($ds==0) $ds=7;
342	while($nsem!=$numerosemana){
343	$dia_c++;
344	$ds++;
345	if($ds>7){
346	$ds=1;
347	$nsem++;
348	}
349	}
350	// Calculates number of days of a month
351	$diasmaxmes=$this->dias_meses[$mes];
352	if ($mes==2){
353	if ($this->bisiesto($anno)){
354	$diasmaxmes=29;
355	}
356	}
357	for($i=$ds;$i<=7;$i++){
358	if($dia_c>$diasmaxmes) break;
359	$cadenadias.=$dia_c.";";
360	$dia_c++;
361	}
362	return($cadenadias);
363	}
364	// ____________________________________________________________________________
365	// This function returns the number of last week of a month
366	// ____________________________________________________________________________
367	function UltimaSemana($mes,$anno){
368	$diasmaxmes=$this->dias_meses[$mes];
369	if ($mes==2){
370	if ($this->bisiesto($anno)){
371	$diasmaxmes=29;
372	}
373	}
374	$fecha="1/".$mes."/".$anno;
375	$ds=$this->_DiaSemana($fecha);
376	if ($ds==0) $ds=7;
377	$nwdia=$diasmaxmes+$ds-1;
378	$cociente=floor($nwdia/7);
379	$resto=$nwdia%7;
380	if($resto>0) $cociente++;
381	return($cociente);
382	}
383	//________________________________________________________________________________________________________
384	// Function : Dates
385	// Description :
386	// Returns a string of dates saparated by commas. These dates are part of a specific reservation
387	// Parameters:
388	// - anno_c: Aaspecefic year
389	// - mes_desde: Month from the reservation is considered
390	// - mes_hasta: Month to the reservation is consedired
391	// - meses: Field with hexadecimal information about reservation months (The information contained in the field of a table with this name)
392	// - diario: The same for days of a month
393	// - dias: The same for names of days
394	// - semanas: The same for weeks
395	//________________________________________________________________________________________________________
396	function Fechas($anno_c,$mes_desde,$mes_hasta,$meses,$diario,$dias,$semanas){
397	$cadenafechas="";
398	$mascara=0x0001;
399	$cadenameses="";
400	$meses=$meses>>($mes_desde-1);
401	for($i=$mes_desde;$i<=$mes_hasta;$i++){
402	if($meses&$mascara>0){
403	$cadenameses.=$i.";";
404	// Days of the week
405	if($dias>0){
406	$auxdias=$dias;
407	for($j=1;$j<=7;$j++){
408	if($auxdias&$mascara>0){
409	$cadenadias=$this->DiasPorMes($i,$anno_c,$j);
410	$tbdias=explode(";",$cadenadias);
411	for ($k=0;$k<sizeof($tbdias)-1;$k++)
412	$cadenafechas.=$tbdias[$k]."/".$i."/".$anno_c.";";
413	}
414	$auxdias=$auxdias>>1;
415	}
416	}
417	// Weeks
418	if($semanas>0){
419	$auxsemanas=$semanas;
420	for($j=1;$j<=6;$j++){
421	if($auxsemanas&$mascara>0){
422	if($j==6){
423	$ulse=$this->UltimaSemana($i,$anno_c);
424	$cadenadias=$this->DiasPorSemanas($i,$anno_c,$ulse);
425	}
426	else
427	$cadenadias=$this->DiasPorSemanas($i,$anno_c,$j);
428	$tbdias=explode(";",$cadenadias);
429	for ($k=0;$k<sizeof($tbdias)-1;$k++)
430	$cadenafechas.=$tbdias[$k]."/".$i."/".$anno_c.";";
431	}
432	$auxsemanas=$auxsemanas>>1;
433	}
434	}
435	}
436	$meses=$meses>>1;
437	}
438	$cadenadiario="";
439	for($i=1;$i<32;$i++){
440	if($diario&$mascara>0) $cadenadiario.=$i.";";
441	$diario=$diario>>1;
442	}
443	$tbmeses=explode(";",$cadenameses);
444	$tbdiario=explode(";",$cadenadiario);
445	for ($i=0;$i<sizeof($tbmeses)-1;$i++){
446	for ($j=0;$j<sizeof($tbdiario)-1;$j++){
447	$cadenafechas.=$tbdiario[$j]."/".$tbmeses[$i]."/".$anno_c.";";
448	}
449	}
450	return($cadenafechas);
451	}
452	/*______________________________________________________________________
453	Returns the Juliano day for a specific date
454	Parameters:
455	- string with date in this format "dd/mm/yyyy"
456	Returns:
457	- Juliano day
458	_______________________________________________________________________*/
459	function juliana($fecha) {
460	list($dia,$mes,$anno)=explode("[/-]",$fecha);
461	$GGG = 1;
462	if ($anno <= 1585) $GGG = 0;
463	$juliano= -1 * floor(7 * (floor(($mes + 9) / 12) + $anno) / 4);
464	$S = 1;
465	if (($mes - 9)<0) $S=-1;
466	$A = abs($mes - 9);
467	$auxjuliano = floor($anno + $S * floor($A / 7));
468	$auxjuliano = -1 * floor((floor($auxjuliano / 100) + 1) * 3 / 4);
469	$juliano = $juliano + floor(275 * $mes / 9) + $dia + ($GGG * $auxjuliano);
470	$juliano =$juliano + 1721027 + 2 * $GGG + 367 * $anno - 0.5;
471	return(floor($juliano));
472	}
473	} // End of Calendar class

Note: See TracBrowser for help on using the repository browser.

Download in other formats: