Se acomodan los estilos de MECON_HTML_Page y MECON_HTML_Marco. Es mi despedida tempor...

[mecon/meconlib.git] / lib / MECON / Feriado.php

diff --git a/lib/MECON/Feriado.php b/lib/MECON/Feriado.php
index ee1986fb5ba78f12a6a10de6d5b931c36a7add9c..05cbd13f5d947aa042dbf8da03162c1b5b2f91ca 100644 (file)
--- a/lib/MECON/Feriado.php
+++ b/lib/MECON/Feriado.php
@@ -26,6 +26,7 @@ $Id$
 
 require_once 'Date.php';
 require_once 'Date/Span.php';
+require_once 'PEAR.php';
 
 /**
  * Información sobre feriados.
@@ -127,7 +128,7 @@ class MECON_Feriado extends Date {
                 $this->_tipo = isset($tipo) ? $tipo : 'laborable';
                 // Verificamos si hay algo en la DB.
                 $fecha = $this->getDate();
-                $datos = $this->_db->getRow("SELECT * FROM novedades.feriados WHERE fecha = '$fecha'", null, DB_FETCH_ASSOC);
+                $datos = $this->_db->getRow("SELECT * FROM novedades.feriados WHERE fecha = '".$fecha."'", null, DB_FETCHMODE_ASSOC);
                 // Si hay un error, lo pasamos a quien nos llama.
                 if (DB::isError($datos)) {
                     return $datos;
@@ -218,13 +219,16 @@ class MECON_Feriado extends Date {
      * Busca feriados que se encuentren en un rango de fechas.
      *
      * Ejemplo:
-     * if ( $feriado->buscarRango( '2002/10/01', '2002/12/31' ) )
-     *     while ( $f = $feriado->siguiente() )
+     * @code
+     * if ($feriado->buscarRango('2002/10/01', '2002/12/31')) {
+     *     while ($f = $feriado->siguiente())
      *         var_dump( $f );
-     * elseif ( $feriado->error() )
-     *     die( 'Errores: ' . $feriado->errores();
-     * else
-     *     print( 'No se encontraron feriados en ese rango de fechas' );
+     * } elseif ($feriado->error()) {
+     *     trigger_error('Errores: ' . $feriado->errores(), E_USER_ERROR);
+     * } else {
+     *     echo 'No se encontraron feriados en ese rango de fechas';
+     * }
+     * @endcode
      *
      * @param  string $ini   Fecha de inicio del rango en donde buscar (por
      *                       defecto el primer día del mes en curso).
@@ -238,9 +242,9 @@ class MECON_Feriado extends Date {
      *
      * @return bool  false si no se encontró nada (o hubo error).
      *
-     * @todo Pasar a método estático.
+     * @todo Pasar a método estático y usar Date en vez de strings para las fechas.
      */
-    function buscarRango( $ini = '', $fin = '', $orden = null ) {
+    function buscarRango($ini = '', $fin = '', $orden = null ) {
 
         $ini = empty( $ini ) ? strftime( '%Y/01/01', time() ) : $ini;
         $fin = empty( $fin ) ? strftime( '%Y/12/31', time() ) : $fin;
@@ -294,6 +298,67 @@ class MECON_Feriado extends Date {
 
     }
 
+    /**
+     * Busca dias habiles en un rango de fechas y los devuelve en un array.
+     *
+     * Ejemplo:
+     * @code
+     * $diasHabiles = $feriado->buscarDiasHabiles('2002/10/01', '2002/12/31');
+     * if (count($diasHabiles)) {
+     *     echo 'Cantidad de dias habiles en le rango: '. count($diasHabiles);
+     *     foreach ($diasHabiles as $diaHabil) {
+     *         print '<PRE>';var_dump($diaHabil);print '</PRE>';
+     *     }
+     * }
+     * @endcode
+     *
+     * @param  DB    $db    Conexión a la base de datos.
+     * @param  mixed $ini   Fecha de inicio del rango en donde buscar (por
+     *                      defecto el primer día del mes en curso). Puede ser
+     *                      un objeto Date.
+     * @param  mixed $fin   Fecha de fin del rango en donde buscar (por
+     *                      defecto el día del mes en curso). Puede ser un 
+     *                      objeto Date.
+     *
+     * @return mixed
+     * @static
+     */
+    function buscarDiasHabiles($db, $ini = '', $fin = '') {
+        //Acomodo las fechas pasadas por parametro
+        $ini = empty( $ini ) ? strftime( '%Y-%m-01', time() ) : $ini;
+        $fin = empty( $fin ) ? strftime( '%Y-%m-%d', time() ) : $fin;
+        $ini = (is_string($ini)) ? new Date($ini) : $ini;
+        $fin = (is_string($fin)) ? new Date($fin) : $fin;
+        
+        //Valido que $ini < $fin
+        if ($ini->after($fin)) {
+            return new PEAR_Error ('La fecha de fin debe ser anterior a la '.
+                    'fecha de inicio.');
+        }
+        
+        //Obtener los dias feriados entre $ini y $fin
+        $sql = "SELECT fecha FROM novedades.feriados WHERE YEAR(fecha) = ". 
+            $db->quote($ini->format("%Y")) . " OR YEAR(fecha) = " . 
+            $db->quote($ini->format("%Y"));
+
+        $feriados = $db->getCol($sql);
+        if (DB::IsError($feriados)) {
+            return $feriados;
+        }
+        
+        //Verifico fecha por fecha si es o no un dia habil
+        $ini =& $ini->getPrevDay();
+        while (!$ini->equals($fin)) {
+            $ini =& $ini->getNextDay();
+            //Verifico que la fecha no sea feriado ni sabado o domingo.
+            if (!in_array($ini->format("%Y-%m-%d"), $feriados) &&
+                    ($ini->getDayOfWeek() != 0) && 
+                    ($ini->getDayOfWeek() != 6)) {
+                $res[] = $ini;
+            }
+        }
+        return $res;
+    }
 }
 
 // $Id$