source: admin/ogAdmSources/ogAdmWebCon/principal/colasreservas.php @ e42f34e

918-git-images-111dconfigfileconfigure-oglivegit-imageslgromero-new-oglivemainmaint-cronmount-efivarfsmultivmmultivm-ogboot-installerogClonningEngineogboot-installer-jenkinsoglive-ipv6test-python-scriptsticket-301ticket-50ticket-50-oldticket-577ticket-585ticket-611ticket-612ticket-693ticket-700ubu24tplunification2use-local-agent-oglivevarios-instalacionwebconsole3
Last change on this file since e42f34e was 8964f9b, checked in by ramon <ramongomez@…>, 16 years ago

Resstructuración de trunk.

git-svn-id: https://opengnsys.es/svn/trunk@390 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 35.7 KB
Line 
1<?
2// *************************************************************************************************************************************************
3// Aplicación WEB: ogAdmWebCon
4// Autor: José Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla
5// Fecha Creación: Año 2003-2004
6// Fecha Última modificación: Noviembre-2005
7// Nombre del fichero: colasreservas.php
8// Descripción :
9//              Visualiza las reservas pendientes, confirmadas, denegadas y fecha y hora de la reserva
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../includes/constantes.php");
14include_once("../includes/CreaComando.php");
15include_once("../includes/HTMLCTEMULSELECT.php");
16include_once("../clases/ArbolVistaXML.php");
17include_once("../idiomas/php/".$idioma."/clases/Calendario_".$idioma.".php");
18include_once("../idiomas/php/".$idioma."/colasreservas_".$idioma.".php");
19//________________________________________________________________________________________________________
20$ambito="";
21$idambito=0;
22$nombreambito="";
23$fechainicio="";
24$fechafin="";
25$estadoreserva="";
26$situacion="";
27
28if (isset($_GET["ambito"]))     $ambito=$_GET["ambito"];
29if (isset($_GET["idambito"])) $idambito=$_GET["idambito"];
30if (isset($_GET["nombreambito"])) $nombreambito=$_GET["nombreambito"];
31if (isset($_GET["tipocola"])) $tipocola=$_GET["tipocola"];
32
33$cmd=CreaComando($cadenaconexion);
34if (!$cmd)
35        Header('Location: '.$pagerror.'?herror=2'); // Error de conexión con servidor B.D.
36//________________________________________________________________________________________________________
37// Criterios por defecto
38if($ambito!="" && $idambito!="" && $nombreambito!="" && $tipocola!=""){
39        $wfechainicio=mktime(0, 0, 0, date("m")  , date("d"), date("Y")); // Reservas desde un mes anterior
40        $wfechafin=mktime(0, 0, 0, date("m")+6 , date("d"), date("Y"));
41        $fechainicio=date("d/m/Y",$wfechainicio);
42        $fechafin=date("d/m/Y ",$wfechafin);
43        // Tipos de reservas
44        switch($tipocola){
45                case 0:
46                        $westadoreserva[0]=$RESERVA_CONFIRMADA;
47                        $westadoreserva[1]=$RESERVA_PENDIENTE;
48                        $westadoreserva[2]=$RESERVA_DENEGADA;
49
50                        $estadoreserva=$RESERVA_CONFIRMADA."=".$LITRESERVA_CONFIRMADA.";";
51                        $estadoreserva.=$RESERVA_PENDIENTE."=".$LITRESERVA_PENDIENTE.";";
52                        $estadoreserva.=$RESERVA_DENEGADA."=".$LITRESERVA_DENEGADA.";";
53                        break;
54                case $RESERVA_CONFIRMADA:
55                        $westadoreserva[0]=$RESERVA_CONFIRMADA;
56                        $estadoreserva=$RESERVA_CONFIRMADA."=".$LITRESERVA_CONFIRMADA.";";
57                        break;
58                case $RESERVA_PENDIENTE:
59                        $westadoreserva[0]=$RESERVA_PENDIENTE;
60                        $estadoreserva=$RESERVA_PENDIENTE."=".$LITRESERVA_PENDIENTE.";";
61                        break;
62                case $RESERVA_DENEGADA:
63                        $westadoreserva[0]=$RESERVA_DENEGADA;
64                        $estadoreserva=$RESERVA_DENEGADA."=".$LITRESERVA_DENEGADA.";";
65                        break;
66        }
67                // Estados default
68        $wsituacion[0]=$RESERVA_PARADA;
69        $wsituacion[1]=$RESERVA_ACTIVA;
70        $situacion=$RESERVA_PARADA."=".$LITRESERVA_PARADA.";";
71        $situacion.=$RESERVA_ACTIVA."=".$LITRESERVA_ACTIVA.";";
72}
73//________________________________________________________________________________________________________
74// Recupera parametros del formulario
75if (isset($_POST["ambito"]))    $ambito=$_POST["ambito"];
76if (isset($_POST["idambito"])) $idambito=$_POST["idambito"];
77if (isset($_POST["nombreambito"])) $nombreambito=$_POST["nombreambito"];
78if (isset($_POST["fechainicio"])) $fechainicio=$_POST["fechainicio"];
79if (isset($_POST["fechafin"])) $fechafin=$_POST["fechafin"];
80
81if (isset($_POST["estadoreserva"])) {
82        $estadoreserva=$_POST["estadoreserva"];
83        $auxP=split(";",$estadoreserva);
84        $cont=0;
85        for ($i=0;$i<sizeof($auxP)-1;$i++){
86                $dualparam=split("=",$auxP[$i]);
87                $westadoreserva[$cont++]=$dualparam[0];
88        }
89}
90if (isset($_POST["situacion"])){
91        $situacion=$_POST["situacion"];
92        $auxP=split(";",$situacion);
93        $cont=0;
94        for ($i=0;$i<sizeof($auxP)-1;$i++){
95                $dualparam=split("=",$auxP[$i]);
96                $wsituacion[$cont++]=$dualparam[0];
97        }
98}
99//________________________________________________________________________________________________________
100?>
101<HTML>
102<TITLE>Administración web de aulas</TITLE>
103<HEAD>
104        <LINK rel="stylesheet" type="text/css" href="../estilos.css">
105        <SCRIPT language="javascript" src="../clases/jscripts/ArbolVistaXML.js"></SCRIPT>
106        <SCRIPT language="javascript" src="../clases/jscripts/MenuContextual.js"></SCRIPT>
107        <SCRIPT language="javascript" src="../jscripts/constantes.js"></SCRIPT>
108        <SCRIPT language="javascript" src="../jscripts/comunes.js"></SCRIPT>
109        <SCRIPT language="javascript" src="../jscripts/colasreservas.js"></SCRIPT>
110        <? echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/colasreservas_'.$idioma.'.js"></SCRIPT>'?>
111        <? echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/comunes_'.$idioma.'.js"></SCRIPT>'?>
112
113</HEAD>
114<BODY>
115<?
116switch($ambito){
117                case $AMBITO_CENTROS :
118                        $urlimg='../images/iconos/centros.gif';
119                        $textambito=$TbMsg[12];
120                        break;
121                case $AMBITO_GRUPOSAULAS :
122                        $urlimg='../images/iconos/carpeta.gif';
123                        $textambito=$TbMsg[13];
124                        break;
125                case $AMBITO_AULAS :
126                        $urlimg='../images/iconos/aula.gif';
127                        $textambito=$TbMsg[14];
128                        break;
129}
130echo '<p align=center class=cabeceras><img src="../images/iconos/reservas.gif">&nbsp;'.$TbMsg[0].'&nbsp;';
131echo '<FORM name="fdatos" action="colasreservas.php" method="post">'.chr(13);
132// Campos ocultos
133echo '<INPUT type=hidden name=ambito value="'.$ambito.'">';
134echo '<INPUT type=hidden name=idambito value="'.$idambito.'">';
135echo '<INPUT type=hidden name=nombreambito value="'.$nombreambito.'">';
136echo '<INPUT type=hidden name=estadoreserva value="'.$estadoreserva.'">';
137echo '<INPUT type=hidden name=situacion value="'.$situacion.'">';
138echo CriteriosBusquedas(); // Opciones de búsqueda
139echo '</FORM>'.chr(13);
140
141echo '<DIV align=center >';
142echo '<span align=center class=subcabeceras><U>'.$TbMsg[11].':'.$textambito.'</U>,&nbsp'.$nombreambito.'</span>&nbsp;&nbsp;<IMG src="'.$urlimg.'"></span></DIV></p>';
143//________________________________________________________________________________________________________
144// Localiza las aulas pertenecientes al ámbito
145
146$cadenaaulas="";
147$cont_aulas=0;
148
149$sw=false;
150switch($ambito){
151                case $AMBITO_CENTROS :
152                        $cmd->texto="SELECT idcentro,nombrecentro FROM centros WHERE idcentro=".$idambito;
153                        RecorreCentro($cmd);
154                        break;
155                case $AMBITO_GRUPOSAULAS :
156                        $cmd->texto="SELECT idgrupo,nombregrupo FROM grupos WHERE idgrupo=".$idambito." AND tipo=".$AMBITO_GRUPOSAULAS;
157                        RecorreGruposAulas($cmd);
158                        break;
159                case $AMBITO_AULAS :
160                        $cmd->texto="SELECT idaula,nombreaula,horaresevfin  FROM aulas WHERE idaula=".$idambito;
161                        RecorreAulas($cmd);
162                        break;
163}
164//________________________________________________________________________________________________________
165// Proceso de selección de reservas
166$ClausulaWhere="";
167//________________________________________________________________________________________________________
168// Cuestion identificador del Centro que ha ejecutado la acción
169$WhereCentroAccion="";
170$WhereCentroAccion='reservas.idcentro='.$idcentro;
171$ClausulaWhere.=" AND (".$WhereCentroAccion.")";
172//________________________________________________________________________________________________________
173// Cuestion estado de las reservas ( Confirmadas,Pendientes o Denegadas )
174$WhereEstadosReservas="";
175for($i=0;$i<sizeof($westadoreserva);$i++){
176                if (isset($westadoreserva[$i]))
177                        $WhereEstadosReservas.=" reservas.estado=".$westadoreserva[$i]." OR ";
178}
179if($WhereEstadosReservas!=""){
180        $WhereEstadosReservas=substr($WhereEstadosReservas,0,strlen($WhereEstadosReservas)-3);
181        $ClausulaWhere.=" AND (".$WhereEstadosReservas.")";
182}
183//________________________________________________________________________________________________________
184// Cuestion situación de la programación
185$WhereSituaciones="";
186for($i=0;$i<sizeof($wsituacion);$i++){
187        if (isset($wsituacion[$i]))
188                $WhereSituaciones.=" programaciones.suspendida=".$wsituacion[$i]." OR ";
189}
190if($WhereSituaciones!=""){
191        $WhereSituaciones=substr($WhereSituaciones,0,strlen($WhereSituaciones)-3);
192        $ClausulaWhere.=" AND (".$WhereSituaciones.")";
193}
194//________________________________________________________________________________________________________
195$cadenaaulas=substr($cadenaaulas,0,strlen($cadenaaulas)-1); // Quita la coma
196$ClausulaWhere.=" AND idaula in(".$cadenaaulas.")";
197//________________________________________________________________________________________________________
198// Cuestion de fechas
199if(empty($fechainicio)) $fechainicio=date("d/m/Y",mktime(0, 0, 0, date("m")  , date("d"), date("Y")));
200if(empty($fechafin))    $fechafin=date("d/m/Y",mktime(0, 0, 0, date("m")+1  , date("d"), date("Y")));
201
202list($dia_i,$mes_i,$anno_i)=split("/",$fechainicio);
203list($dia_f,$mes_f,$anno_f)=split("/",$fechafin);
204
205// Elimina registros en tabla temporal
206$cmd->texto="DELETE FROM  reservastemporal where idcentro=".$idcentro." AND usuario='".$usuario."'"; // Elimina todos los registros de la tabla temporal
207$resul=$cmd->Ejecutar();
208
209//Recorre de fecha inicio a fecha fin
210$calendario=new Calendario("tabla_reservas");
211$anno_c=$anno_i;
212$mes_c=$mes_i;
213
214// Calcula el rango de meses dependiendo del intervalo de fechas solicitado
215while($anno_c<=$anno_f){
216        if($anno_c==$anno_i){
217                $mes_c=$mes_i;
218                if($anno_f>$anno_c)
219                        $mes_t=12;
220                else
221                        $mes_t=$mes_f;
222        }
223        else{
224                        if($anno_c>$anno_i){
225                                if($anno_c==$anno_f){
226                                        $mes_c=1;
227                                        $mes_t=$mes_f;
228                                }
229                                else{
230                                        $mes_c=1;
231                                        $mes_t=12;
232                                }
233                        }
234        }
235        $HEXanno=$calendario->numero_annos[$anno_c-2003][1];  // Primera referencia: 2004
236        $HEXmeses=0;
237        $mes_desde=$mes_c;
238        $mes_hasta=$mes_t;
239        while($mes_c<=$mes_t){
240                        $HEXmeses=$HEXmeses | $calendario->nombre_mes[$mes_c][1];
241                        $mes_c++;
242        }
243        // Cadena SQL para seleccionar reservas
244        $cmd->texto="SELECT reservas.idreserva,reservas.descripcion,programaciones.idprogramacion, programaciones.nombrebloque,programaciones.annos, programaciones.meses, programaciones.diario, programaciones.dias, programaciones.semanas, programaciones.horasini, programaciones.ampmini, programaciones.minutosini, programaciones.horasfin, programaciones.ampmfin, programaciones.minutosfin FROM   reservas";
245        $cmd->texto.=" INNER JOIN programaciones ON reservas.idreserva = programaciones.identificador";
246        $cmd->texto.=" WHERE (programaciones.tipoaccion = ".$EJECUCION_RESERVA.") ".$ClausulaWhere ;
247        $cmd->texto.=" AND (programaciones.annos & ".$HEXanno."<>0)";
248        $cmd->texto.=" AND (programaciones.meses & ".$HEXmeses."<>0)" ;
249        CreaReservasTemporal($cmd,$anno_c,$mes_desde,$mes_hasta,$dia_i,$dia_f,$mes_i,$mes_f,$anno_i,$anno_f);
250        $anno_c++;
251}
252$cadenaXML="";
253$cont_a=0;
254$cont_m=0;
255$cont_d=0;
256$HTMLannos="";
257$HTMLmeses="";
258$HTMLdias="";
259$HTMLhoras="";
260
261$sw=true;
262switch($ambito){
263                case $AMBITO_CENTROS :
264                        $cmd->texto="SELECT idcentro,nombrecentro FROM centros WHERE idcentro=".$idambito;
265                        RecorreCentro($cmd);
266                        break;
267                case $AMBITO_GRUPOSAULAS :
268                        $cmd->texto="SELECT idgrupo,nombregrupo FROM grupos WHERE idgrupo=".$idambito." AND tipo=".$AMBITO_GRUPOSAULAS;
269                        RecorreGruposAulas($cmd);
270                        break;
271                case $AMBITO_AULAS :
272                        $cmd->texto="SELECT idaula,nombreaula,horaresevfin  FROM aulas WHERE idaula=".$idambito;
273                        RecorreAulas($cmd);
274                        break;
275}
276
277// Creación del árbol
278$baseurlimg="../images/tsignos"; // Url de las imágenes de signo
279$clasedefault="texto_arbol";
280$titulotabla=$TbMsg[0]; 
281$arbol=new ArbolVistaXml($cadenaXML,0,$baseurlimg,$clasedefault,2,20,270,2,$titulotabla);
282$salidaHTML=$arbol->CreaArbolVistaXml();  // Muestra  árbol
283echo "<BR>";
284echo "<DIV align=center width=100%>";
285echo "   <TABLE align=center width=100%>";
286echo "          <TR><TD>";
287echo urldecode($salidaHTML);
288echo "          </TD></TR><TABLE></DIV>";
289
290//________________________________________________________________________________________________________
291include_once("../includes/iframecomun.php");
292//________________________________________________________________________________________________________
293?>
294</BODY>
295</HTML>
296<?
297// *************************************************************************************************************************************************
298function CreaReservasTemporal($cmd,$anno_c,$mes_desde,$mes_hasta,$dia_i,$dia_f,$mes_i,$mes_f,$anno_i,$anno_f){
299        global $usuario;
300        global $idcentro;
301
302        $fechaminima=mktime(0, 0, 0, $mes_i, 1, $anno_i);
303        $fechamaxima=mktime(0, 0, 0, $mes_f, $dia_f, $anno_f);
304        $rs=new Recordset;
305        $rs->Comando=&$cmd;
306        if (!$rs->Abrir()) return; // Error al abrir recordset
307        $rs->Primero();
308        // Recorre reservas
309        while (!$rs->EOF){
310                $cadenafechas=FechasReservas($anno_c,$mes_desde,$mes_hasta,$rs->campos["meses"],$rs->campos["diario"],$rs->campos["dias"],$rs->campos["semanas"]);
311                $fechas_reservas=split(";",$cadenafechas);
312                for ($i=0;$i<sizeof($fechas_reservas)-1;$i++){
313                                list($auxdia,$auxmes,$auxanno)=split("/",$fechas_reservas[$i]);
314                                $auxfecha=mktime(0, 0, 0, $auxmes,$auxdia, $auxanno);
315
316                                if($auxfecha>=$fechaminima &&  $auxfecha<=$fechamaxima){
317                                        $cmd->texto="INSERT INTO reservastemporal(idcentro,usuario,idprogramacion,idreserva,fecha) VALUES (".$idcentro.",'".$usuario."',".$rs->campos["idprogramacion"].",".$rs->campos["idreserva"].",'".$fechas_reservas[$i]."')";
318                                        $resul=$cmd->Ejecutar();
319                                }
320                }
321                $rs->Siguiente();
322        }
323        $rs->Cerrar();
324}
325//________________________________________________________________________________________________________
326// Función : FechasReservas
327// Descripción :
328//              Devuelve una cadena de fechas separada por comas que son precisamente  las fechas que forman parte de una reserva concreta
329//      Parametros:
330//              - anno_c: Un año determinado
331//              - mes_desde: El mes desde que se considera la reserva
332//              - mes_hasta: El mes hasta que se considera la reserva
333//              - 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
334//              - diario:  Idem para los dias de un mes
335//              - dias: idem para los nombres de los días
336//              - semanas: Idem para las semanas
337//________________________________________________________________________________________________________
338function FechasReservas($anno_c,$mes_desde,$mes_hasta,$meses,$diario,$dias,$semanas){
339        global $calendario;
340
341        $cadenafechas="";
342        $mascara=0x0001;
343        $cadenameses="";
344        $meses=$meses>>($mes_desde-1);
345        for($i=$mes_desde;$i<=$mes_hasta;$i++){
346                if($meses&$mascara>0){
347                        $cadenameses.=$i.";";
348                        // Dias de la semAna
349                        if($dias>0){
350                                $auxdias=$dias;
351                                for($j=1;$j<=7;$j++){
352                                        if($auxdias&$mascara>0){
353                                                $cadenadias=$calendario->DiasPorMes($i,$anno_c,$j);
354                                                $tbdias=split(";",$cadenadias);
355                                                for ($k=0;$k<sizeof($tbdias)-1;$k++)
356                                                        $cadenafechas.=$tbdias[$k]."/".$i."/".$anno_c.";";
357                                        }
358                                        $auxdias=$auxdias>>1;
359                                }
360                        }
361                        // Semanas
362                        if($semanas>0){
363                                $auxsemanas=$semanas;
364                                for($j=1;$j<=6;$j++){
365                                        if($auxsemanas&$mascara>0){
366                                                if($j==6){
367                                                        $ulse=$calendario->UltimaSemana($i,$anno_c);
368                                                        $cadenadias=$calendario->DiasPorSemanas($i,$anno_c,$ulse);
369                                                }
370                                                else
371                                                        $cadenadias=$calendario->DiasPorSemanas($i,$anno_c,$j);
372                                                $tbdias=split(";",$cadenadias);
373                                                for ($k=0;$k<sizeof($tbdias)-1;$k++)
374                                                        $cadenafechas.=$tbdias[$k]."/".$i."/".$anno_c.";";
375                                        }
376                                        $auxsemanas=$auxsemanas>>1;
377                                }
378                        }
379                }
380                $meses=$meses>>1;
381        }
382        $cadenadiario="";
383        for($i=1;$i<32;$i++){
384                        if($diario&$mascara>0) $cadenadiario.=$i.";";
385                        $diario=$diario>>1;
386        }
387        $tbmeses=split(";",$cadenameses);
388        $tbdiario=split(";",$cadenadiario);
389        for ($i=0;$i<sizeof($tbmeses)-1;$i++){
390                for ($j=0;$j<sizeof($tbdiario)-1;$j++){
391                        $cadenafechas.=$tbdiario[$j]."/".$tbmeses[$i]."/".$anno_c.";";
392                }
393        }
394        return($cadenafechas);
395}
396/*________________________________________________________________________________________________________
397        Recorrea los distintos ámbitos
398________________________________________________________________________________________________________*/
399function RecorreCentro($cmd){
400        global $AMBITO_CENTROS;
401        global $LITAMBITO_CENTROS;
402        global $AMBITO_GRUPOSAULAS;
403        global $cadenaXML;
404        global $sw;
405        global $idambito,$nombreambito;
406
407        $rs=new Recordset;
408        $rs->Comando=&$cmd;
409        if (!$rs->Abrir()) return; // Error al abrir recordset
410        $rs->Primero();
411        if(!$rs->EOF){
412                if($sw) {
413                        $cadenaXML.='<CENTRO';
414                        // Atributos
415                        $cadenaXML.=' imagenodo="../images/iconos/centros.gif"';
416                        $cadenaXML.=' nodoid='.$LITAMBITO_CENTROS."-".$idambito;
417                        $cadenaXML.=' infonodo='.$nombreambito;
418                        $cadenaXML.='>';
419                }
420                $idcentro=$rs->campos["idcentro"];
421                $cmd->texto="SELECT idgrupo,nombregrupo FROM grupos WHERE idcentro=".$idcentro." AND grupoid=0  AND tipo=".$AMBITO_GRUPOSAULAS;
422                RecorreGruposAulas($cmd);
423                $cmd->texto="SELECT idaula,nombreaula,horaresevfin FROM aulas WHERE idcentro=".$idcentro." AND grupoid=0";
424                RecorreAulas($cmd);
425                if($sw) $cadenaXML.='</CENTRO>';
426
427        }
428        $rs->Cerrar();
429}
430//________________________________________________________________________________________________________
431function RecorreGruposAulas($cmd){
432        global $AMBITO_GRUPOSAULAS;
433        global $LITAMBITO_GRUPOSAULAS;
434        global $cadenaXML;
435        global $sw;
436
437        $rs=new Recordset;
438        $cmd->texto.="ORDER by nombregrupo";
439        $rs->Comando=&$cmd;
440        if (!$rs->Abrir()) return; // Error al abrir recordset
441        $rs->Primero();
442
443        while (!$rs->EOF){
444                if($sw) {
445                        $cadenaXML.='<GRUPOSAULAS';
446                        // Atributos
447                        $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
448                        $cadenaXML.=' nodoid='.$LITAMBITO_GRUPOSAULAS."-".$rs->campos["idgrupo"];
449                        $cadenaXML.=' infonodo="'.$rs->campos["nombregrupo"].'"';
450                        $cadenaXML.='>';
451                }
452                $idgrupo=$rs->campos["idgrupo"];
453                $cmd->texto="SELECT idgrupo,nombregrupo FROM grupos WHERE grupoid=".$idgrupo ." AND tipo=".$AMBITO_GRUPOSAULAS;
454                RecorreGruposAulas($cmd);
455                $cmd->texto="SELECT idaula,nombreaula,horaresevfin FROM aulas WHERE  grupoid=".$idgrupo;
456                RecorreAulas($cmd);
457                $rs->Siguiente();
458                if($sw) $cadenaXML.='</GRUPOSAULAS>';
459        }
460        $rs->Cerrar();
461}
462//________________________________________________________________________________________________________
463function RecorreAulas($cmd){
464        global $AMBITO_AULAS;
465        global $LITAMBITO_AULAS;
466        global $cadenaaulas;
467        global $cont_aulas;
468        global $sw;
469        global $cadenaXML;
470
471        $rs=new Recordset;
472        $cmd->texto.="ORDER by nombreaula";
473        $rs->Comando=&$cmd;
474        if (!$rs->Abrir()) return; // Error al abrir recordset
475        $rs->Primero();
476
477        while (!$rs->EOF){
478                if($sw && $rs->campos["horaresevfin"]>0) {
479                        $cadenaXML.='<AULA ';
480                        // Atributos           
481                        $cadenaXML.=' imagenodo="../images/iconos/aula.gif"';
482                        $cadenaXML.=' infonodo="'.$rs->campos["nombreaula"].'"';
483                        $cadenaXML.=' nodoid='.$LITAMBITO_AULAS.'-'.$rs->campos["idaula"];
484                        $cadenaXML.=' colornodo='."#000000";
485                        $cadenaXML.=' fondonodo='."#B5DAAD;";
486                        $cadenaXML.='>';
487                }
488                $idaula=$rs->campos["idaula"];
489                $cadenaaulas.=$idaula.",";
490                $cont_aulas++;
491                if($sw && $rs->campos["horaresevfin"]>0) ListaReservas($cmd,$idaula,$rs->campos["nombreaula"]);
492                $rs->Siguiente();
493                if($sw && $rs->campos["horaresevfin"]>0) $cadenaXML.='</AULA>';
494        }
495        $rs->Cerrar();
496}
497//________________________________________________________________________________________________________
498function ListaReservas($cmd,$idaula,$nombreaula){
499        global $idcentro;
500        global $usuario;
501        global $TbMsg;
502        global $calendario;
503        global $RESERVA_CONFIRMADA;
504        global $RESERVA_PENDIENTE;
505        global $RESERVA_DENEGADA;
506        global $EJECUCION_RESERVA;
507
508        global $AMBITO_CENTROS;
509        global $AMBITO_GRUPOSAULAS;
510        global $AMBITO_AULAS;
511
512        global $cadenaXML;
513
514        global $cont_a;
515        global $cont_m;
516        global $cont_d;
517        global $HTMLannos;
518        global $HTMLmeses;
519        global $HTMLdias;
520        global $HTMLhoras;
521
522        $tbimg[$RESERVA_CONFIRMADA]='../images/iconos/confirmadas.gif';
523        $tbimg[$RESERVA_PENDIENTE]='../images/iconos/pendientes.gif';
524        $tbimg[$RESERVA_DENEGADA]='../images/iconos/denegadas.gif';
525
526        $tbampm[0]="a.m.";
527        $tbampm[1]="p.m.";
528
529        $cmd->texto="SELECT  DISTINCT aulas.horaresevini,aulas.horaresevfin,reservastemporal.idreserva, reservastemporal.fecha,programaciones.horasini,programaciones.ampmini,programaciones.minutosini,trabajos.idtrabajo,tareas.idtarea,trabajos.descripcion AS nombretrabajo,tareas.descripcion AS nombretarea,reservas.solicitante,reservas.email,reservas.estado,reservas.idaula,reservas.idreserva,reservas.descripcion,DAY(reservastemporal.fecha) as dia,MONTH(reservastemporal.fecha) as mes,YEAR(reservastemporal.fecha) as anno,reservas.descripcion,aulas.nombreaula as nombreaula,imagenes.idimagen ,imagenes.descripcion as nombreimagen,";
530        $cmd->texto.=" programaciones.horasini,programaciones.minutosini,programaciones.horasfin,programaciones.minutosfin,programaciones.ampmini,programaciones.ampmfin";
531        $cmd->texto.="  FROM   reservas";
532        $cmd->texto.=" INNER JOIN reservastemporal ON reservas.idreserva = reservastemporal.idreserva";
533        $cmd->texto.=" INNER JOIN aulas ON reservas.idaula = aulas.idaula";
534        $cmd->texto.=" LEFT OUTER JOIN imagenes ON reservas.idimagen = imagenes.idimagen";
535        $cmd->texto.=" LEFT OUTER JOIN tareas ON reservas.idtarea = tareas.idtarea";
536        $cmd->texto.=" LEFT OUTER JOIN trabajos ON reservas.idtrabajo = trabajos.idtrabajo";
537        $cmd->texto.=" INNER JOIN programaciones ON reservastemporal.idprogramacion = programaciones.idprogramacion";
538        $cmd->texto.=" WHERE (programaciones.tipoaccion = ".$EJECUCION_RESERVA.") ";
539        $cmd->texto.="  AND (aulas.idaula = ".$idaula.") ";
540        $cmd->texto.="  AND (reservastemporal.idcentro='".$idcentro."') ";
541        $cmd->texto.="  AND (reservastemporal.usuario='".$usuario."') ";
542        $cmd->texto.=" ORDER by reservastemporal.fecha,programaciones.ampmini,programaciones.horasini,programaciones.minutosini";
543        $rs=new Recordset;
544        $rs->Comando=&$cmd;
545        if (!$rs->Abrir()) return; // Error al abrir recordset
546        $rs->Primero();
547
548        $calendario->aula=$idaula;
549        $calendario->horaresevini=$rs->campos["horaresevini"];
550        $calendario->horaresevfin=$rs->campos["horaresevfin"];
551        $swa=false;
552        $swm=false;
553        $swd=false;
554        $ganno=0;
555        $gmes=0;
556        $gdia=0;
557
558        $cont_a=0;
559        $HTMLannos="";
560
561        // Recorre reservas temporales
562        while (!$rs->EOF){
563                // Año
564                if($ganno<>$rs->campos["anno"]){
565                        if($swd){
566                                GuardaHorasDias($ganno,$gmes,$gdia,$CntDia,&$CntMes);
567                                $cadenaXML.='</DIA> ';
568                        }
569                        if($swm){
570                                GuardaMesAnno($ganno,$gmes,$CntMes);
571                                $cadenaXML.='</MES> ';
572                        }
573                        if($swa){
574                                GuardaAnno($ganno);
575                                $cadenaXML.='</ANNO> ';
576                        }
577                        $ganno=$rs->campos["anno"];
578                        $cadenaXML.='<ANNO ';
579                        // Atributos           
580                        $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
581                        $cadenaXML.=' infonodo="%3Cb%3E&nbsp; '.$TbMsg[15].': %3C/b%3E'.$ganno.'"';
582                        $cadenaXML.=' nodoid=nodoanno-'.$ganno;
583                        $cadenaXML.=' colornodo='."#000000";
584                        $cadenaXML.=' fondonodo='."#B5B7B9;";
585                        $cadenaXML.='>';
586                        $gmes=0;
587                        $gdia=0;
588                        $swa=true;
589                        $swm=false;
590                        $swd=false;
591                        PintaAnno($ganno);
592                        $HTMLmeses="";
593                        $cont_m=0;
594                }
595       
596                // Mes
597                if($gmes<>$rs->campos["mes"]){
598                        if($swd){
599                                GuardaHorasDias($ganno,$gmes,$gdia,$CntDia,&$CntMes);
600                                $cadenaXML.='</DIA> ';
601                        }
602                        if($swm){
603                                GuardaMesAnno($ganno,$gmes,$CntMes);
604                                $cadenaXML.='</MES> ';
605                        }
606                        $gmes=$rs->campos["mes"];
607                        $nombremes=$calendario->nombre_mes[$rs->campos["mes"]][0];
608
609                        $cadenaXML.='<MES ';
610                        // Atributos           
611                        $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
612                        $cadenaXML.=' infonodo="%3CA name=anodomes-'.$idaula."-".$gmes.'/'.$ganno.'%3E%3Cb%3E&nbsp; '.$TbMsg[16].': %3C/b%3E'.$nombremes.' %3C/A%3E "';
613                        $cadenaXML.=' nodoid=nodomes-'.$idaula."-".$gmes.'/'.$ganno;
614                        $cadenaXML.=' colornodo='."#000000";
615                        $cadenaXML.=' fondonodo='."#E3D8C6";
616                        $cadenaXML.='>';
617                        $gdia=0;
618                        $swm=true;
619                        $swd=false;
620                        $CntMes="";
621                        PintaMesAnno($ganno,$gmes);
622                        $HTMLdias="";
623                        $cont_d=0;
624                }
625                // Dia
626                if($gdia<>$rs->campos["dia"]){
627                        if($swd){
628                                GuardaHorasDias($ganno,$gmes,$gdia,$CntDia,&$CntMes);
629                                $cadenaXML.='</DIA> ';
630                        }
631                        $gdia=$rs->campos["dia"];
632                        $nombredia=$rs->campos["dia"]." - ".$nombremes." - ".$rs->campos["anno"];
633                        $cadenaXML.='<DIA ';
634                        // Atributos           
635                        $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
636                        $cadenaXML.=' infonodo="%3CA name=anododia-'.$idaula."-".$gdia.'/'.$gmes.'/'.$ganno.'%3E%3Cb%3E&nbsp;'.$TbMsg[17].': %3C/b%3E'.$nombredia.' %3C/A%3E "';
637                        $cadenaXML.=' nodoid=nododia-'.$idaula."-".$gdia.'/'.$gmes.'/'.$ganno;
638                        $cadenaXML.=' colornodo='."#000000";
639                        $cadenaXML.=' fondonodo='."#CFDAE6";
640                        $cadenaXML.='>';
641                        $swd=true;
642                        //$CntMes[$gdia]=1;
643                        $CntDia="";
644                        PintaHorasDias($ganno,$gmes,$gdia);
645                        $HTMLhoras="";
646                }
647               
648                // Cuestion Ocupación
649                $hexhoradesde=$rs->campos["horasini"];
650                $minutosdesde=$rs->campos["minutosini"];
651                if($minutosdesde==0) $minutosdesde="00";
652                $minutosdesde.=" ".$tbampm[$rs->campos["ampmini"]];
653                $hexhorahasta=$rs->campos["horasfin"];
654                $minutoshasta=$rs->campos["minutosfin"];
655                if($minutoshasta==0) $minutoshasta="00";
656                $minutoshasta.=" ".$tbampm[$rs->campos["ampmfin"]];
657                $cont=0;
658                while($hexhoradesde>0){
659                        $cont++;
660                        $hexhoradesde=$hexhoradesde>>1;
661                }
662                $horadesde=$cont-1;
663                $cont=0;
664                while($hexhorahasta>0){
665                        $cont++;
666                        $hexhorahasta=$hexhorahasta>>1;
667                }
668                $horahasta=$cont-1;
669
670                $mulmin=floor($minutosdesde/15);
671                $currentminutos=$mulmin*15;
672                $CntDia[(int)$rs->campos["ampmini"]][(int)$horadesde][(int)$currentminutos]=1;
673                $mulmin=floor($minutoshasta/15);
674                $currentminutos=$mulmin*15;
675                $CntDia[(int)$rs->campos["ampmfin"]][(int)$horahasta][(int)$currentminutos]=0;
676
677
678                // Descripción de la reserva
679                $cadenaXML.='<RESERVA ';
680                // Atributos           
681                $cadenaXML.=' imagenodo="../images/iconos/reservas.gif"';
682                $cadenaXML.=' infonodo="%3CIMG src='.$tbimg[$rs->campos["estado"]].'%3E&nbsp;%3Cb%3E'.$rs->campos["descripcion"].': %3C/b%3E';
683                $cadenaXML.='&nbsp;%3CIMG src="../images/iconos/reloj.gif"%3E&nbsp;('.$horadesde.":".$minutosdesde." - ".$horahasta.":".$minutoshasta.')"';
684
685                $cadenaXML.=' nodoid=reserva-'.$rs->campos["idreserva"];
686                $cadenaXML.=' colornodo='."#000000";
687                $cadenaXML.=' fondonodo='."#EEEECC;";
688                $cadenaXML.='>';
689
690                $cadenaXML.='<OCUPACION ';
691                // Atributos           
692                $cadenaXML.=' imagenodo="../images/iconos/reloj.gif"';
693                $cadenaXML.=' infonodo="%3Cb%3E'.$TbMsg[19].':%3C/b%3E '.$horadesde.":".$minutosdesde." - ".$horahasta.":".$minutoshasta.'"';
694                $cadenaXML.=' nodoid=opcupacion-'.$horadesde.":".$minutosdesde." - ".$horahasta.":".$minutoshasta;
695                $cadenaXML.=' colornodo='."#000000";
696                $cadenaXML.=' fondonodo='."#FBECFA;";
697                $cadenaXML.='>';
698                $cadenaXML.='</OCUPACION>';
699
700
701                $cadenaXML.='<AULA ';
702                // Atributos           
703                $cadenaXML.=' imagenodo="../images/iconos/aula.gif"';
704                $cadenaXML.=' infonodo="%3Cb%3E'.$TbMsg[24].':%3C/b%3E '.$nombreaula.'"';;
705                $cadenaXML.=' nodoid=aula-'.$idaula;
706                $cadenaXML.=' colornodo='."#000000";
707                $cadenaXML.=' fondonodo='."#FBECFA;";
708                $cadenaXML.='>';
709                $cadenaXML.='</AULA>';
710
711                $nombreimagen=$rs->campos["nombreimagen"];
712                if(empty($nombreimagen) ) $nombreimagen=$TbMsg[23];
713                // Descripción de la imagen a restaurar
714                $cadenaXML.='<IMAGEN ';
715                // Atributos           
716                $cadenaXML.=' imagenodo="../images/iconos/imagenes.gif"';
717                $cadenaXML.=' infonodo="%3Cb%3E'.$TbMsg[20].':  %3C/b%3E'.$nombreimagen.'"';
718                $cadenaXML.=' nodoid=imagen-'.$rs->campos["idimagen"];
719                $cadenaXML.=' colornodo='."#000000";
720                $cadenaXML.=' fondonodo='."#FBECFA;";
721                $cadenaXML.='>';
722                $cadenaXML.='</IMAGEN>';
723
724                $nombretarea=$rs->campos["nombretarea"];
725                if(!empty($nombretarea) ){
726                        // Descripción de la tarea a restaurar
727                        $cadenaXML.='<TAREA ';
728                        // Atributos           
729                        $cadenaXML.=' imagenodo="../images/iconos/tareas.gif"';
730                        $cadenaXML.=' infonodo="%3Cb%3E'.$TbMsg[28].':  %3C/b%3E'.$nombretarea.'"';
731                        $cadenaXML.=' nodoid=tarea-'.$rs->campos["idtarea"];
732                        $cadenaXML.=' colornodo='."#000000";
733                        $cadenaXML.=' fondonodo='."#FBECFA;";
734                        $cadenaXML.='>';
735                        $cadenaXML.='</TAREA>';
736                }
737
738                $nombretrabajo=$rs->campos["nombretrabajo"];
739                if(!empty($nombretrabajo) ){
740                        // Descripción del  trabajo a restaurar
741                        $cadenaXML.='<TRABAJO ';
742                        // Atributos           
743                        $cadenaXML.=' imagenodo="../images/iconos/trabajos.gif"';
744                        $cadenaXML.=' infonodo="%3Cb%3E'.$TbMsg[29].':  %3C/b%3E'.$nombretrabajo.'"';
745                        $cadenaXML.=' nodoid=trabajo-'.$rs->campos["idtrabajo"];
746                        $cadenaXML.=' colornodo='."#000000";
747                        $cadenaXML.=' fondonodo='."#FBECFA;";
748                        $cadenaXML.='>';
749                        $cadenaXML.='</TRABAJO>';
750                }
751
752                $cadenaXML.='<EMAIL ';
753                // Atributos           
754                $cadenaXML.=' imagenodo="../images/iconos/email.gif"';
755                $cadenaXML.=' infonodo="%3Cb%3E'.$TbMsg[25].':%3C/b%3E&nbsp;'.$rs->campos["solicitante"].' &nbsp;(%3CA href=mailto:'.$rs->campos["email"].'%3E'.$rs->campos["email"].'%3C/A%3E)"';
756                $cadenaXML.=' nodoid=email-'.$idaula;
757                $cadenaXML.=' colornodo='."#000000";
758                $cadenaXML.=' fondonodo='."#FBECFA;";
759                $cadenaXML.='>';
760                $cadenaXML.='</EMAIL>';
761
762
763
764                $cadenaXML.='</RESERVA>';
765
766                $rs->Siguiente();
767        }
768        if($swd){
769                                GuardaHorasDias($ganno,$gmes,$gdia,$CntDia,&$CntMes);
770                $cadenaXML.='</DIA> ';
771        }
772        if($swm){
773                GuardaMesAnno($ganno,$gmes,$CntMes);
774                $cadenaXML.='</MES> ';
775        }
776        if($swa){
777                GuardaAnno($ganno);
778                $cadenaXML.='</ANNO> ';
779        }
780}
781//________________________________________________________________________________________________________
782function PintaAnno($ganno){
783        global $cadenaXML;
784        global $cont_a;
785
786        $cadenaXML.='<TBANNO ';
787        // Atributos           
788        $cadenaXML.=' imagenodo="../images/iconos/nada.gif"';
789        $cadenaXML.=' infonodo=%anno-'.$ganno.'%';
790        $cadenaXML.=' nodoid=anno-'.$ganno;
791        $cadenaXML.=' fondonodo='."#FFFFFF";
792        $cadenaXML.='>';
793        $cadenaXML.='</TBANNO> ';
794}
795//________________________________________________________________________________________________________
796function GuardaAnno($ganno){
797        global $cadenaXML;
798        global $cont_a;
799        global $cont_m;
800        global $HTMLmeses;
801        global $HTMLannos;
802        global $calendario;
803
804$HTMLannos[$cont_a]="<TABLE><TR>";
805$j=0;
806        for($i=0;$i<$cont_m;$i++){
807                if(isset($HTMLmeses[$i])){
808                        $HTMLannos[$cont_a].='<TD style="BACKGROUND-COLOR:#FFFFFF" valign=top>'.$HTMLmeses[$i].'</TD>';
809                        $j++;
810                        if($j==4) {
811                                $HTMLannos[$cont_a].="</TR><TR>";
812                                $j=0;
813                        }
814                }
815        }
816        $HTMLannos[$cont_a].="</TR></TABLE>";
817        $cadenaXML=ereg_replace( "%anno-".$ganno.'%',urlencode($HTMLannos[$cont_a]), $cadenaXML );
818        $cont_a++;
819}
820//________________________________________________________________________________________________________
821function PintaMesAnno($ganno,$gmes){
822        global $cadenaXML;
823
824        $cadenaXML.='<TBMES ';
825        // Atributos           
826        $cadenaXML.=' imagenodo="../images/iconos/nada.gif"';
827        $cadenaXML.=' infonodo=%mes-'.$ganno.'-'.$gmes.'%';
828        $cadenaXML.=' nodoid=mes-'.$ganno.'-'.$gmes;
829        $cadenaXML.=' fondonodo='."#FFFFFF";
830        $cadenaXML.='>';
831        $cadenaXML.='</TBMES> ';
832}
833//________________________________________________________________________________________________________
834function GuardaMesAnno($ganno,$gmes,$CntMes){
835        global $cadenaXML;
836        global $cont_m;
837        global $calendario;
838        global $HTMLmeses;
839
840        $HTMLmeses[$cont_m]="<TABLE cellspacing=3><TR><TD valign=top>";
841        $HTMLmeses[$cont_m].=$calendario->MesAnno($gmes,$ganno,$CntMes);
842        $HTMLmeses[$cont_m].="</TD></TR></TABLE>";
843        $cadenaXML=ereg_replace('%mes-'.$ganno.'-'.$gmes.'%',urlencode($HTMLmeses[$cont_m]), $cadenaXML );
844        $cont_m++;
845}
846//________________________________________________________________________________________________________
847function PintaHorasDias($ganno,$gmes,$gdia){
848        global $cadenaXML;
849
850        $cadenaXML.='<TBDIA ';
851        // Atributos           
852        $cadenaXML.=' imagenodo="../images/iconos/nada.gif"';
853        $cadenaXML.=' infonodo=%horas-'.$ganno.'-'.$gmes.'-'.$gdia.'%';
854        $cadenaXML.=' nodoid=horas-'.$ganno.'-'.$gmes.'-'.$gdia;
855        $cadenaXML.=' fondonodo='."#FFFFFF";
856        $cadenaXML.='>';
857        $cadenaXML.='</TBDIA> ';
858}
859//________________________________________________________________________________________________________
860function GuardaHorasDias($ganno,$gmes,$gdia,$CntDia,$CntMes){
861        global $cadenaXML;
862        global $calendario;
863        global $HTMLhorasdias;
864
865        $HTMLhorasdias="<TABLE cellspacing=3><TR><TD valign=top>";
866        $HTMLhorasdias.=$calendario->HorasDias($CntDia,&$porcenhoras);
867        $HTMLhorasdias.="</TD></TR></TABLE>";
868
869        $CntMes[$gdia]=$porcenhoras;
870        $cadenaXML=ereg_replace('%horas-'.$ganno.'-'.$gmes.'-'.$gdia.'%',urlencode($HTMLhorasdias), $cadenaXML );
871}
872//________________________________________________________________________________________________________
873function CriteriosBusquedas(){
874        global $idcentro;
875        global $TbMsg;
876
877        global $RESERVA_CONFIRMADA;
878        global $RESERVA_PENDIENTE;
879        global $RESERVA_DENEGADA;
880        global $LITRESERVA_CONFIRMADA;
881        global $LITRESERVA_PENDIENTE;
882        global $LITRESERVA_DENEGADA;
883
884        global $RESERVA_PARADA;  // reserva momentanemente parada
885        global $RESERVA_ACTIVA; // Reserva activa
886        global $LITRESERVA_PARADA;
887        global $LITRESERVA_ACTIVA;
888
889        global $fechainicio;
890        global $fechafin;
891       
892        global $westadoreserva;
893        global $wsituacion;
894
895        $HTMLCriterios="";
896        $HTMLCriterios.='<TABLE class=tabla_busquedas align=center border="0">'.chr(13);
897        $HTMLCriterios.='<TR HEIGHT=30>'.chr(13);
898                $HTMLCriterios.='<TD colspan=4 align="center" >'.chr(13);
899                $HTMLCriterios.='<SPAN align=center style="FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif; FONT-SIZE: 11px;COLOR:#5a86b5;FONT-WEIGHT: 700;">_______________ '.$TbMsg[1].' _______________</SPAN>'.chr(13);
900                $HTMLCriterios.='</TR>'.chr(13);
901                $HTMLCriterios.='</TD>'.chr(13);
902
903        // Desplegable con los tipos de reservas
904        $HTMLCriterios.='<TR>'.chr(13);
905                $HTMLCriterios.='<TD>'.chr(13);
906                        $HTMLCriterios.='<TABLE class=tabla_standar align=center border="0">'.chr(13);
907                        $HTMLCriterios.='<TR>'.chr(13);
908                        $HTMLCriterios.='       <TH align=center>&nbsp;'.$TbMsg[2].'&nbsp;</TH>'.chr(13);
909                        $HTMLCriterios.='</TR>'.chr(13);
910                        $HTMLCriterios.='<TR>'.chr(13);
911                        $parametros=$RESERVA_CONFIRMADA."=".$LITRESERVA_CONFIRMADA.chr(13);
912                        $parametros.=$RESERVA_PENDIENTE."=".$LITRESERVA_PENDIENTE.chr(13);
913                        $parametros.=$RESERVA_DENEGADA."=".$LITRESERVA_DENEGADA;
914                        $HTMLCriterios.='<TD colspan=3>'.HTMLCTEMULSELECT($parametros,"westadoreserva",$westadoreserva,"estilodesple","chgdesplereservas",100,3).'</TD>';
915                        $HTMLCriterios.='</TR>'.chr(13);
916                        $HTMLCriterios.='</TABLE>'.chr(13);
917                $HTMLCriterios.='</TD>'.chr(13);
918        // Desplegable con los distintos situacion
919                $HTMLCriterios.='<TD>'.chr(13);
920                        $HTMLCriterios.='<TABLE class=tabla_standar align=center border="0">'.chr(13);
921                        $HTMLCriterios.='<TR>'.chr(13);
922                        $HTMLCriterios.='       <TH align=center>&nbsp;'.$TbMsg[4].'&nbsp;</TH>'.chr(13);
923                        $HTMLCriterios.='</TR>'.chr(13);
924                        $HTMLCriterios.='<TR>'.chr(13);
925                        $parametros=$RESERVA_PARADA."=".$LITRESERVA_PARADA.chr(13);
926                        $parametros.=$RESERVA_ACTIVA."=".$LITRESERVA_ACTIVA;
927                        $HTMLCriterios.='<TD colspan=3>'.HTMLCTEMULSELECT($parametros,"wsituacion",$wsituacion,"estilodesple","chgdesplesituacion",100,3).'</TD>';
928                        $HTMLCriterios.='</TR>'.chr(13);
929                        $HTMLCriterios.='</TABLE>'.chr(13);
930        $HTMLCriterios.='</TD>'.chr(13);
931
932        // Fechas
933                $HTMLCriterios.='<TD  COLSPAN=2>'.chr(13);
934                        $HTMLCriterios.='<TABLE WIDTH=100% class=tabla_standar align=center border="0">'.chr(13);
935                        $HTMLCriterios.='<TR>'.chr(13);
936                        $HTMLCriterios.='<TH>&nbsp;'.$TbMsg[7].':&nbsp;</TH>'.chr(13);
937                        $HTMLCriterios.='<TD><INPUT class="cajatexto" onclick="vertabla_calendario(this)" style="WIDTH:80" name="fechainicio" value="'.$fechainicio.'"></TD>'.chr(13);
938                        $HTMLCriterios.='</TR>'.chr(13);
939                        $HTMLCriterios.='<TR>'.chr(13);
940                        $HTMLCriterios.='<TH align=right>&nbsp;'.$TbMsg[8].':&nbsp;&nbsp;</TH>'.chr(13);
941                        $HTMLCriterios.='<TD> <INPUT class="cajatexto" onclick="vertabla_calendario(this)" style="WIDTH:80" name="fechafin" value="'.$fechafin.'"></TD>'.chr(13);
942                        $HTMLCriterios.='</TR>'.chr(13);
943                        $HTMLCriterios.='</TABLE>'.chr(13);             
944                $HTMLCriterios.='</TD>'.chr(13);
945        $HTMLCriterios.='</TR>'.chr(13);
946
947        $HTMLCriterios.='<TR height=5>'.chr(13);
948                $HTMLCriterios.='<TD colspan=4 align="center" >'.chr(13);
949                $HTMLCriterios.='<SPAN style="FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif; FONT-SIZE: 11px;COLOR:#5a86b5;FONT-WEIGHT: 700;">__________________________________________________</SPAN>'.chr(13);
950        $HTMLCriterios.='</TR>'.chr(13);
951
952        // Lupa
953        $HTMLCriterios.='<TR>'.chr(13);
954                $HTMLCriterios.='<TD  COLSPAN=4>'.chr(13);
955                $HTMLCriterios.='<TABLE class=tabla_busquedas align=center border="0">'.chr(13);
956                $HTMLCriterios.='<TR>'.chr(13);
957                $HTMLCriterios.='<TD>';
958
959                $HTMLCriterios.='<IMG src="../images/iconos/busquedas.gif" onclick="javascript:fdatos.submit()" style="cursor:hand" alt="Buscar">';
960                $HTMLCriterios.='</TD>';
961                $HTMLCriterios.='<TD>';
962                $HTMLCriterios.='</TD>'.chr(13);
963                $HTMLCriterios.='</TR>'.chr(13);
964                $HTMLCriterios.='</TABLE>';
965                $HTMLCriterios.='</TD>'.chr(13);
966        $HTMLCriterios.='</TR>'.chr(13);
967$HTMLCriterios.='</TABLE>';
968return($HTMLCriterios);
969}?>
Note: See TracBrowser for help on using the repository browser.