contenido/global+estadisticas+dinamico.php

   1 <?php
   2 error_reporting(E_STRICT | E_ALL);
   3 ob_start("ob_gzhandler");
   4 date_default_timezone_set ('America/El_Salvador');
   5 require_once('../include/const.php');
   6 require_once('../include/sesion.php');
   7 require_once('../include/fecha.php');
   8 require_once('sub.php');
   9
  10 if ( isset( $_GET['catorcena'] ) ) {
  11         retornar ( Buscar (strip_tags($_GET['usuario']), strip_tags($_GET['catorcena'])) );
  12 } else {
  13         retornar ( "Ud. esta utilizando incorrectamente este script de soporte." );
  14 }
  15
  16 function retornar($texto) {
  17         exit ('<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />' . $texto . '<br />');
  18 }
  19
  20 function Buscar ($usuario, $catorcena) {
  21    global $session;
  22    $NivelesPermitidos = array(ADMIN_LEVEL, SALESMAN_LEVEL);
  23         if (!in_array($session->userlevel, $NivelesPermitidos)) {
  24         $usuario = $session->codigo;
  25         }
  26    $datos ="";
  27    $link = @mysql_connect(DB_SERVER, DB_USER, DB_PASS) or die('Por favor revise sus datos, puesto que se produjo el siguiente error:<br /><pre>' . mysql_error() . '</pre>');
  28    mysql_select_db(DB_NAME, $link) or die(Mensaje('!->La base de datos seleccionada "'.$DB_base.'" no existe',_M_ERROR));
  29
  30         $datos .= "Catorcena mostrada: <b>" . date("d/m/Y", Obtener_catorcena_cercana($catorcena)) . " a " . date("d/m/Y", Fin_de_catorcena($catorcena)) . "</b><br />";
  31
  32         $q = "SELECT COUNT(*) as cuenta FROM ". TBL_MUPI_FACES ." WHERE catorcena=".Obtener_catorcena_cercana($catorcena)." AND codigo_pedido IN (SELECT codigo_pedido from ".TBL_MUPI_ORDERS." WHERE codigo = '".$usuario."');";
  33         $result = @mysql_query($q, $link);
  34         $datos .= "Número de caras publicitarias contratadas en catorcena actual: <b>" . mysql_result($result,0,"cuenta")."</b><br />";
  35
  36         $q = "SELECT SUM(catorcena_fin - catorcena_inicio) as cuenta FROM emupi_mupis_pedidos WHERE codigo='".$usuario."';";
  37         $result = @mysql_query($q, $link);
  38         $datos .= "Número de catorcenas contratadas: <b>" . Contar_catorcenas(mysql_result($result,0,"cuenta"))."</b><br />";
  39
  40         $q = "SELECT SUM((SELECT impactos FROM " . TBL_STREETS . " WHERE codigo_calle = (SELECT codigo_calle FROM ".TBL_MUPI." AS c WHERE c.id_mupi=a.codigo_mupi))) AS 'Impactos' FROM ". TBL_MUPI_FACES ." AS a WHERE catorcena=".Obtener_catorcena_cercana($catorcena)." AND codigo_pedido IN (SELECT codigo_pedido FROM ".TBL_MUPI_ORDERS." WHERE codigo='".$usuario."')".";";
  41         $result = @mysql_query($q, $link);
  42         $datos .= "Número de impactos publicitarios diarios: <b>" . (int) (mysql_result($result,0,"Impactos"))."</b><br />";
  43
  44    $q = "SELECT SUM((SELECT impactos FROM " . TBL_STREETS . " WHERE codigo_calle = (SELECT codigo_calle FROM ".TBL_MUPI." AS c WHERE c.id_mupi=a.codigo_mupi))) AS 'Impactos' FROM ". TBL_MUPI_FACES ." AS a WHERE catorcena=$catorcena AND codigo_pedido IN (SELECT codigo_pedido FROM ".TBL_MUPI_ORDERS." WHERE codigo='".$usuario."')".";";
  45    DEPURAR ($q,0);
  46    $result = @mysql_query($q, $link) or retornar (Mensaje('Ocurrió un error mientras se obtenian las estadísticas.',_M_ERROR));
  47    $num_rows = mysql_numrows($result);
  48
  49    if(!$result || ($num_rows < 0)){
  50       $datos .= (Mensaje("Error mostrando la información",_M_ERROR));
  51    }
  52    if($num_rows == 0){
  53       $datos .=  (Mensaje("¡No hay pantallas registradas a su nombre en la catorcena seleccionada!",_M_ERROR));
  54    }
  55
  56    $Impactos  = mysql_result($result,0,"Impactos");
  57    if (!$Impactos) {
  58            $datos .=  (Mensaje("¡ups!... parece que no existe referencia de número de impactos para sus calles",_M_ERROR));
  59    }
  60
  61    $ImpactosCatorcena  = bcmul ($Impactos, "14");
  62
  63
  64    $datos .= '<b>'. ($Impactos) . "</b> Impactos diarios" . '<br />';
  65    $datos .= '<b>'. ($ImpactosCatorcena) . "</b> Impactos en esta catorcena" . '<br />';
  66
  67    $q = "SELECT SUM(Impactos) AS impactos FROM (SELECT DISTINCT @calle := (SELECT codigo_calle FROM emupi_mupis AS c WHERE c.id_mupi=a.codigo_mupi) AS 'Calle', (SELECT impactos FROM emupi_calles WHERE codigo_calle = @calle) AS 'Impactos' FROM emupi_mupis_caras AS a WHERE catorcena=$catorcena AND codigo_pedido IN (SELECT codigo_pedido FROM emupi_mupis_pedidos WHERE codigo='".$session->codigo."')) AS a;";
  68    $result = @mysql_query($q, $link) or retornar ('!->Ocurrió un error mientras se revisaba las estadísticas.');
  69    if(!$result || ($num_rows < 0)){
  70       $datos .= Mensaje("Error mostrando la información",_M_ERROR);
  71    }
  72
  73    if($num_rows == 0){
  74       $datos .= Mensaje("¡No hay pantallas registradas a su nombre en la catorcena seleccionada!", _M_INFO);
  75    }
  76
  77    $personasDiaro = mysql_result($result,0,"Impactos");
  78    $personasCatorcena = bcmul($personasDiaro, "14");
  79    $datos .= '<b>'. ($personasDiaro) . "</b> personas al menos visualizan su anuncio diariamente" . '<br />';
  80    $datos .= '<b>'. ($personasCatorcena) . "</b> personas al menos visualizan su anuncio en esta catorcena" . '<br />';
  81
  82    $q = "select SUM(costo) AS cuenta from emupi_mupis_pedidos where codigo_pedido IN (select distinct codigo_pedido from emupi_mupis_caras where catorcena=$catorcena and codigo_pedido IN (SELECT codigo_pedido from emupi_mupis_pedidos where codigo='".$session->codigo."'));";
  83    $result = @mysql_query($q, $link) or retornar ('!->Ocurrió un error mientras se revisaba las estadísticas.');
  84
  85    if(!$result || ($num_rows < 0)){
  86       $datos .= ("Error mostrando la información");
  87    }
  88
  89    if($num_rows == 0){
  90       $datos .=  ("¡No hay pantallas registradas a su nombre en la catorcena seleccionada!");
  91    }
  92
  93    $costo = @mysql_result($result,0,"cuenta");
  94    if ( $ImpactosCatorcena ) {
  95         $datos .= 'Costo por impacto: <b>$' . bcdiv ($costo,$ImpactosCatorcena,10) . '</b><br />';
  96         $datos .= 'Número de impactos por persona: <b>' . bcdiv($Impactos,$personasDiaro,0) . '</b><br />';
  97    }
  98    retornar($datos);
  99 }
 100 ?>