clase=$pclase; $this->onmouseover=$ponmouseover; $this->onmouseout=$ponmouseout; $this->onclick=$ponclick; $this->nombre_mes[1]=array ("Enero",0x0001); $this->nombre_mes[2]=array ("Febrero",0x0002); $this->nombre_mes[3]=array ("Marzo",0x0004); $this->nombre_mes[4]=array ("Abril",0x0008); $this->nombre_mes[5]=array ("Mayo",0x0010); $this->nombre_mes[6]=array ("Junio",0x0020); $this->nombre_mes[7]=array ("Julio",0x0040); $this->nombre_mes[8]=array ("Agosto",0x0080); $this->nombre_mes[9]=array ("Septiembre",0x0100); $this->nombre_mes[10]=array ("Octubre",0x0200); $this->nombre_mes[11]=array ("Noviembre",0x0400); $this->nombre_mes[12]=array ("Diciembre",0x0800); $this->numero_annos[1]=array ("2004",0x01); // tamaño 1 bytes $this->numero_annos[2]=array ("2005",0x02); $this->numero_annos[3]=array ("2006",0x04); $this->numero_annos[4]=array ("2007",0x08); $this->numero_annos[5]=array ("2008",0x10); $this->numero_annos[6]=array ("2009",0x20); $this->numero_annos[7]=array ("2010",0x40); $this->numero_annos[8]=array ("2011",0x80); $this->dias_meses[1]=31; $this->dias_meses[2]=28; $this->dias_meses[3]=31; $this->dias_meses[4]=30; $this->dias_meses[5]=31; $this->dias_meses[6]=30; $this->dias_meses[7]=31; $this->dias_meses[8]=31; $this->dias_meses[9]=30; $this->dias_meses[10]=31; $this->dias_meses[11]=30; $this->dias_meses[12]=31; $this->nombre_dia[1]=array ("L",0x01); // tamaño 1 bytes $this->nombre_dia[2]=array ("M",0x02); $this->nombre_dia[3]=array ("X",0x04); $this->nombre_dia[4]=array ("J",0x08); $this->nombre_dia[5]=array ("V",0x10); $this->nombre_dia[6]=array ("S",0x20); $this->nombre_dia[7]=array ("D",0x40); } /*________________________________________________________________________________________________________ Esta función devuelve una cadena con el código HTML del calendario del mes y año elegidos y que son propiedades de la clase. ________________________________________________________________________________________________________*/ function MesAnno($mes,$anno,$CntMes){ $fecha="1/".$mes."/".$anno; $ds=$this->_DiaSemana($fecha); if ($ds==0) $ds=7; $paso=2; // Porporción para el la intensidad del color $swbi=0; // Suma para bisiesto if ($this->bisiesto($anno) && $mes==2) $swbi=1; $HTML_calendario=''.chr(13); $HTML_calendario.=''.chr(13); $HTML_calendario.=''.chr(13); // Nombre del mes $HTML_calendario.=''.chr(13); for ($i=1;$i<8;$i++) $HTML_calendario.=''.chr(13); // Días de la semana $HTML_calendario.=''.chr(13); for ($i=1;$i<$ds;$i++) $HTML_calendario.=''.chr(13); // Relleno primeros dias de la semana $sm=$ds; // Control salto de semana for ($i=1;$i<=$this->dias_meses[$mes]+$swbi;$i++){ $HTML_calendario.=''.chr(13); if ($sm%7==0){ $HTML_calendario.=''.chr(13); $sm=0; } $sm++; } $HTML_calendario.='

'.$this->nombre_mes[$mes][0].'
'.$this->nombre_dia[$i][0].'
	0){ $itcr=255; $itc=240-($CntMes[$i]*$paso); if($CntMes[$i]>=50) $colordia="#FFFFFF"; else $colordia="#000000"; $bgcolordia=sprintf('#%02x%02x%02x',$itcr,$itc,$itc); $HTML_calendario.=' style="COLOR:'.$colordia.';BACKGROUND-COLOR: '.$bgcolordia.';"'; $HTML_calendario.=' id="'.$i.'/'.$mes.'/'.$anno.'" value="'.$this->aula.'" style="cursor:hand" onmouseover="'.$this->onmouseover.'" onmouseout="'.$this->onmouseout.'" onclick="'.$this->onclick.'"'; } } $HTML_calendario.='>'.$i.'

'.chr(13); return($HTML_calendario); } /*________________________________________________________________________________________________________ Esta función devuelve una cadena con el código HTML del calendario del mes y año elegidos y que son propiedades de la clase. ________________________________________________________________________________________________________*/ function JMesAnno($mes,$anno,$JDif,$TBfechas,$sumahoras){ $fecha="1/".$mes."/".$anno; $Jdpl=$this->juliana($fecha)-$JDif; // Calcula punto departida para indice juliano $ds=$this->_DiaSemana($fecha); if ($ds==0) $ds=7; $paso=2; // Porporción para el la intensidad del color $swbi=0; // Suma para bisiesto if ($this->bisiesto($anno) && $mes==2) $swbi=1; $HTML_calendario=''.chr(13); $HTML_calendario.=''.chr(13); $HTML_calendario.=''.chr(13); // Nombre del mes $HTML_calendario.=''.chr(13); for ($i=1;$i<8;$i++) $HTML_calendario.=''.chr(13); // Días de la semana $HTML_calendario.=''.chr(13); for ($i=1;$i<$ds;$i++) $HTML_calendario.=''.chr(13); // Relleno primeros dias de la semana $sm=$ds; // Control salto de semana for ($i=1;$i<=$this->dias_meses[(int)$mes]+$swbi;$i++){ $HTML_calendario.=''.chr(13); if ($sm%7==0){ $HTML_calendario.=''.chr(13); $sm=0; } $sm++; $Jdpl++; } $HTML_calendario.='

'.$this->nombre_mes[(int)$mes][0].'
'.$this->nombre_dia[$i][0].'
	0){ $xpor=$TBfechas[$Jdpl]*100/$sumahoras; $itcr=255; $itc=240-($xpor*$paso); if($xpor>=50) $colordia="#FFFFFF"; else $colordia="#000000"; $bgcolordia=sprintf('#%02x%02x%02x',$itcr,$itc,$itc); $HTML_calendario.=' style="COLOR:'.$colordia.';BACKGROUND-COLOR: '.$bgcolordia.';"'; $HTML_calendario.=' id="'.$i.'/'.$mes.'/'.$anno.'" value="'.$this->aula.'" style="cursor:hand" onmouseover="'.$this->onmouseover.'" onmouseout="'.$this->onmouseout.'" onclick="'.$this->onclick.'"'; } } $HTML_calendario.='>'.$i.'

'.chr(13); return($HTML_calendario); } /*________________________________________________________________________________________________________ Esta función devuelve el número del día de la semana: 0=domingo 1=Lunes, 2=mártes ... 6=sábado Parámetro de entrada: Una cadena con formato de fecha dd/mm/aaaa. ________________________________________________________________________________________________________*/ function _DiaSemana($fecha){ list($dia,$mes,$anno)=split('[/.-]',$fecha); $cont=0; for ($i=1900;$i<$anno;$i++){ if ($this->bisiesto($i)) $dias_anuales=366; else $dias_anuales=365; $cont+=$dias_anuales; } for ($i=1;$i<$mes;$i++){ if ($i!=2) $cont+=$this->dias_meses[$i]; else{ if ($this->bisiesto($anno)) $cont+=29; else $cont+=28; } } $cont+=$dia+$this->desplazamiento_dias; return($cont%7); } //________________________________________________________________________________________________________ // Esta función devuelve true si el año pasado como parámetro es bisiesto y false si no lo es // // Parámetro de entrada: // Una número que representa el año //________________________________________________________________________________________________________ function bisiesto($anob){ if ($anob%4==0) return(true); else return(false); } //________________________________________________________________________________________________________ // Esta función devuelve una cadena con el código HTML con las horas de reservas de las aulas //________________________________________________________________________________________________________ function HorasDias($CntDia,&$porcenhoras){ $HTML_calendario=""; $sw=0; $conthoras=0; // Contador de horas y minutos de reservas $maxcolumnas=8; $tbampm[0]="a.m."; $tbampm[1]="p.m."; $HTML_calendario.=''.chr(13); $HTML_calendario.=''.chr(13); $HTML_calendario.=''.chr(13); // Literal Horas $HTML_calendario.=''.chr(13); $HTML_ampm[0]=""; $HTML_ampm[1]=""; $swampm[0]=false; $swampm[1]=false; if($this->horaresevini<12) $ix=0; else $ix=1; for($j=$ix;$j<=1;$j++){ $HTML_ampm[$j].=''.chr(13); } if ($swampm[0]) $HTML_calendario.=$HTML_ampm[0]; if ($swampm[0] && $swampm[1]){ $HTML_calendario.=''.chr(13); } if ($swampm[1]) $HTML_calendario.=$HTML_ampm[1]; $HTML_calendario.=''.chr(13); $HTML_calendario.='

Horas

'.chr(13); $HTML_ampm[$j].=''.chr(13); $HTML_ampm[$j].=''.chr(13); $HTML_ampm[$j].=''.chr(13); // Literal Horas $HTML_ampm[$j].=''.chr(13); if($j==0){ // A.M.height $imin=$this->horaresevini; $currenthora=$imin; if($this->horaresevfin<=12) $imax=$this->horaresevfin; else $imax=12; } else{ if($this->horaresevini<=12) $imin=0; else $imin=$this->horaresevini-12; $imax=(int)$this->horaresevfin-12; $currenthora=$imin; } $cols=0; $currentminutos=0; $currenthorario=$currenthora.":".$currentminutos; $intervalo=($imax-$imin+1)*4; for ($i=$imin;$i<$intervalo;$i++){ $cols++; if($sw>0) // Acarre la reserva desde A.M. $swampm[$j]=true; if($currentminutos==0) $currenthorario.="0"; if(isset($CntDia[$j][$currenthora][$currentminutos])){ if($CntDia[$j][$currenthora][$currentminutos]==1) $sw++; $swampm[$j]=true; } if(isset($CntDia[$j][$currenthora][$currentminutos])){ if($CntDia[$j][$currenthora][$currentminutos]==0) $sw--; } $HTML_ampm[$j].=''.chr(13); $currentminutos+=15; if($currentminutos==60) { $currenthora++; $currentminutos=0; } $currenthorario=$currenthora.":".$currentminutos; if (($cols)%$maxcolumnas==0 ) $HTML_ampm[$j].=''.chr(13); } $HTML_ampm[$j].=' '.$tbampm[$j].' 0) $HTML_ampm[$j].=' style="COLOR:#eeeeee;BACKGROUND-COLOR: #cc3366"'; if($sw>0) // Cuenta la fracción de 15 minutos como reservada $conthoras++; $HTML_ampm[$j].=' align=center> '.$currenthorario.'  '.chr(13); $HTML_ampm[$j].='

'.chr(13); $HTML_calendario.='

'.chr(13); $numblo=($this->horaresevfin-$this->horaresevini)*4; if($numblo>0) $porcenhoras=floor($conthoras*100/$numblo); else $porcenhoras=100; return($HTML_calendario); } /* ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- Esta función devuelve una cadena con el código HTML con las horas de apertura de las aulas ________________________________________________________________________________________________________*/ function Horas_Completas(){ $maxcolumnas=8; $HTML_calendario=''.chr(13); $HTML_calendario.=''.chr(13); $HTML_calendario.=''.chr(13); // Literal Horas $HTML_calendario.=''.chr(13); for ($i=1;$i<25;$i++){ $HTML_calendario.=''.chr(13); if (($i)%$maxcolumnas==0) $HTML_calendario.=''.chr(13); } $HTML_calendario.='

Horas
'.$i.'

'.chr(13); return($HTML_calendario); } /* ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- Esta función devuelve una cadena con el código HTML con las intensidades para las reservas de un día ________________________________________________________________________________________________________*/ function TablaIntensidades(){ $HTML_calendario='clase.'">'.chr(13); $HTML_calendario.=''.chr(13); $itcr=255; for($i=0;$i<=100;$i+=8){ $HTML_calendario.=''.chr(13); } $HTML_calendario.='

=50) $colordia="#FFFFFF"; else $colordia="#000000"; $bgcolordia=sprintf('#%02x%02x%02x',$itcr,$itc,$itc); $HTML_calendario.=' style="COLOR:'.$colordia.';BACKGROUND-COLOR: '.$bgcolordia.';">'; //$HTML_calendario.=$i.' %'; $HTML_calendario.='

'.chr(13); return($HTML_calendario); } /* -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- Devuelve una cadena con los días del mes que son lunes(1) o martes(2) o miércoles(3), etc ...domingo(7) separada por comas ________________________________________________________________________________________________________________*/ function DiasPorMes($mes,$anno,$numerodia){ $cadenadias=""; $dia_c=1; $fecha=$dia_c."/".$mes."/".$anno; $ds=$this->_DiaSemana($fecha); if ($ds==0) $ds=7; while($ds!=$numerodia){ $dia_c++; $ds++; if($ds>7) $ds=1; } // Calcula número de dias del mes $diasmaxmes=$this->dias_meses[$mes]; if ($mes==2){ if ($this->bisiesto($anno)){ $diasmaxmes=29; } } while($dia_c<=$diasmaxmes){ $cadenadias.=$dia_c.";"; $dia_c+=7; } return($cadenadias); } /*________________________________________________________________________________________________________ Devuelve una cadena con los días del mes correspondiente a una semana concreta, separados por coma ________________________________________________________________________________________________________*/ function DiasPorSemanas($mes,$anno,$numerosemana){ $cadenadias=""; $dia_c=1; $nsem=1; $fecha=$dia_c."/".$mes."/".$anno; $ds=$this->_DiaSemana($fecha); if ($ds==0) $ds=7; while($nsem!=$numerosemana){ $dia_c++; $ds++; if($ds>7){ $ds=1; $nsem++; } } // Calcula número de dias del mes $diasmaxmes=$this->dias_meses[$mes]; if ($mes==2){ if ($this->bisiesto($anno)){ $diasmaxmes=29; } } for($i=$ds;$i<=5;$i++){ if($dia_c>$diasmaxmes) break; $cadenadias.=$dia_c.";"; $dia_c++; } return($cadenadias); } // ____________________________________________________________________________ // Esta función devuelve el número de la última semana de un mes // ____________________________________________________________________________ function UltimaSemana($mes,$anno){ $diasmaxmes=$this->dias_meses[$mes]; if ($mes==2){ if ($this->bisiesto($anno)){ $diasmaxmes=29; } } $fecha="1/".$mes."/".$anno; $ds=$this->_DiaSemana($fecha); if ($ds==0) $ds=7; $nwdia=$diasmaxmes+$ds-1; $cociente=floor($nwdia/7); $resto=$nwdia%7; if($resto>0) $cociente++; return($cociente); } //________________________________________________________________________________________________________ // Función : Fechas // Descripción : // Devuelve una cadena de fechas separada por comas que son las fechas que forman parte de una reserva concreta // Parametros: // - anno_c: Un año determinado // - mes_desde: El mes desde que se considera la reserva // - mes_hasta: El mes hasta que se considera la reserva // - meses: Campo con información hexadecimal de los meses de la reserva ( la información contenida en el campo de la tabla con este nombre // - diario: Idem para los dias de un mes // - dias: idem para los nombres de los días // - semanas: Idem para las semanas //________________________________________________________________________________________________________ function Fechas($anno_c,$mes_desde,$mes_hasta,$meses,$diario,$dias,$semanas){ $cadenafechas=""; $mascara=0x0001; $cadenameses=""; $meses=$meses>>($mes_desde-1); for($i=$mes_desde;$i<=$mes_hasta;$i++){ if($meses&$mascara>0){ $cadenameses.=$i.";"; // Dias de la semana if($dias>0){ $auxdias=$dias; for($j=1;$j<=7;$j++){ if($auxdias&$mascara>0){ $cadenadias=$this->DiasPorMes($i,$anno_c,$j); $tbdias=split(";",$cadenadias); for ($k=0;$k>1; } } // Semanas if($semanas>0){ $auxsemanas=$semanas; for($j=1;$j<=6;$j++){ if($auxsemanas&$mascara>0){ if($j==6){ $ulse=$this->UltimaSemana($i,$anno_c); $cadenadias=$this->DiasPorSemanas($i,$anno_c,$ulse); } else $cadenadias=$this->DiasPorSemanas($i,$anno_c,$j); $tbdias=split(";",$cadenadias); for ($k=0;$k>1; } } } $meses=$meses>>1; } $cadenadiario=""; for($i=1;$i<32;$i++){ if($diario&$mascara>0) $cadenadiario.=$i.";"; $diario=$diario>>1; } $tbmeses=split(";",$cadenameses); $tbdiario=split(";",$cadenadiario); for ($i=0;$i