<?php
##########################################################################################################################################################################
#                                                                                              Modificaciones
##########################################################################################################################################################################
#29/08/2017 | Erica G. | Encabezado
#07/03/2017 | ERICA G. | ARREGLO  MODIFICACION 
##########################################################################################################################################################################

header("Content-type: application/vnd.ms-excel");
header("Content-Disposition: attachment; filename=Informe_Relacion_Ingresos.xls");
require '../../Conexion/conexion.php';
require_once  '../../Conexion/ConexionPDO.php';
$con = new ConexionPDO();
$conexion = $_SESSION['conexion'];
session_start();
ini_set('max_execution_time', 0);
$usuario = $_SESSION['usuario'];
$panno = $_SESSION['anno'];
$fechaActual = date('d/m/Y');

$rubini         = $_REQUEST["sltrubi"];
$rubfin         = $_REQUEST["sltrubf"];
$fechaini       = $_REQUEST["fechaini"];
$fechafin       = $_REQUEST["fechafin"];
$compini        = $_REQUEST["sltTci"];
$compfin        = $_REQUEST["sltTcf"];
$head           = $_REQUEST["headH"];
$foot           = $$_REQUEST["footH"];

#Conversión Fecha 
$fechaI = DateTime::createFromFormat('d/m/Y', "$fechaini");
$fechaI = $fechaI->format('Y/m/d');

$fechaF = DateTime::createFromFormat('d/m/Y', "$fechafin");
$fechaF = $fechaF->format('Y/m/d');

#************Datos Compañia************#
$compania = $_SESSION['compania'];
$resultC = $con->Listar("SELECT 	ter.id_unico,
                ter.razonsocial,
                UPPER(ti.nombre),
                ter.numeroidentificacion,
                dir.direccion,
                tel.valor,
                ter.ruta_logo
FROM gf_tercero ter
LEFT JOIN 	gf_tipo_identificacion ti ON ter.tipoidentificacion = ti.id_unico
LEFT JOIN   gf_direccion dir ON dir.tercero = ter.id_unico
LEFT JOIN 	gf_telefono  tel ON tel.tercero = ter.id_unico
WHERE ter.id_unico = $compania");
// $resultC = $mysqli->query($sqlC);
$rowC = $resultC;
$razonsocial = $rowC[0][1];
$nombreIdent = $rowC[0][2];
$numeroIdent = $rowC[0][3];
$direccinTer = $rowC[0][4];
$telefonoTer = $rowC[0][5];

?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">

<head>
  <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
  <title>Relación Ingresos</title>
</head>

<body>
  <table width="100%" border="1" cellspacing="0" cellpadding="0">
    <tr>
      <th colspan="7" align="center"><strong>
          <br />&nbsp;
          <br /><?php echo $razonsocial ?>
          <br /><?php echo $nombreIdent . ' : ' . $numeroIdent . "<br/>" . $direccinTer . ' Tel:' . $telefonoTer ?>
          <br />&nbsp;
          <br />RELACIÓN INGRESOS
          <br />Rubros Del <?php echo $rubini . ' al ' . $rubfin ?>
          <br />Comprobantes Del <?php echo $compini . ' al ' . $compfin ?>
          <br />Fecha: Del <?php echo $fechaini . ' al ' . $fechafin ?>
          <br />&nbsp;
        </strong>
      </th>
    </tr>
    <tr>
      <td rowspan="2" align="center"><strong>CÓDIGO</strong></td>
      <td rowspan="2" align="center"><strong>FECHA</strong></td>
      <td rowspan="2" align="center"><strong>NÚMERO RECIBO</strong></td>
      <td rowspan="2" align="center"><strong>CONTRIBUYENTE</strong></td>
      <td rowspan="2" align="center"><strong>CONCEPTO</strong></td>
      <td rowspan="2" align="center"><strong>VALOR</strong></td>
      <td rowspan="2" align="center"><strong>CTA NÚMERO</strong></td>
    </tr>
    <tr></tr>
    <!--CÓDIGO INFORME--->

    <?php
    switch ($conexion) {
      case 1:
        $con2 = $con->Listar("SELECT
        rp.codi_presupuesto   as rpcodp,
        rp.nombre             as rpnom,
        dcp.rubrofuente       as dcprf,
        dcp.tercero           as dcpter, 
        tcp.clasepptal        as tcpcla, 
        cp.fecha              as cpfecha, 
        tcp.codigo            as tcpcod, 
        cp.numero             as cpnum, 
        IF(CONCAT_WS(' ',
        tr.nombreuno,
        tr.nombredos,
        tr.apellidouno,
        tr.apellidodos) 
        IS NULL OR CONCAT_WS(' ',
        tr.nombreuno,
        tr.nombredos,
        tr.apellidouno,
        tr.apellidodos) = '',
        (tr.razonsocial),
        CONCAT_WS(' ',
        tr.nombreuno,
        tr.nombredos,
        tr.apellidouno,
        tr.apellidodos)) AS NOMBRE, 
        dcp.descripcion       as dcpdesc,
        tcp.tipooperacion     as tcptop, 
        dcp.id_unico  as idDetalle, 
        dcp.valor as valor, 
        tcp.id_unico as tipocom  
        FROM gf_detalle_comprobante_pptal dcp
        LEFT JOIN gf_rubro_fuente rf ON dcp.rubrofuente = rf.id_unico
        LEFT JOIN gf_rubro_pptal rp ON rf.rubro = rp.id_unico
        LEFT JOIN gf_comprobante_pptal cp ON dcp.comprobantepptal = cp.id_unico 
        LEFT JOIN gf_tipo_comprobante_pptal tcp ON cp.tipocomprobante = tcp.id_unico 
        LEFT JOIN gf_tercero tr ON tr.id_unico = dcp.tercero 
        WHERE cp.parametrizacionanno = $panno AND 
        rp.codi_presupuesto BETWEEN '$rubini' AND '$rubfin' AND  
        cp.fecha BETWEEN '$fechaI' AND '$fechaF'  ORDER BY rp.codi_presupuesto,cp.fecha ASC");
        break;
      case 2:
        $con2 = $con->Listar("SELECT
        rp.codi_presupuesto   as rpcodp,
        rp.nombre             as rpnom,
        dcp.rubrofuente       as dcprf,
        dcp.tercero           as dcpter, 
        tcp.clasepptal        as tcpcla, 
        cp.fecha              as cpfecha, 
        tcp.codigo            as tcpcod, 
        cp.numero             as cpnum, 
        CASE WHEN (TRIM(tr.nombreuno || ' ' || tr.nombredos || ' ' || tr.apellidouno || ' ' || tr.apellidodos) IS NULL 
        OR TRIM(tr.nombreuno || ' ' || tr.nombredos || ' ' || tr.apellidouno || ' ' || tr.apellidodos) = '') 
        THEN tr.razonsocial 
        ELSE TRIM(tr.nombreuno || ' ' || tr.nombredos || ' ' || tr.apellidouno || ' ' || tr.apellidodos) 
        END AS NOMBRE, 
        dcp.descripcion       as dcpdesc,
        tcp.tipooperacion     as tcptop, 
        dcp.id_unico          as idDetalle, 
        dcp.valor             as valor, 
        tcp.id_unico          as tipocom  
        FROM gf_detalle_comprobante_pptal dcp
        LEFT JOIN gf_rubro_fuente rf ON dcp.rubrofuente = rf.id_unico
        LEFT JOIN gf_rubro_pptal rp ON rf.rubro = rp.id_unico
        LEFT JOIN gf_comprobante_pptal cp ON dcp.comprobantepptal = cp.id_unico 
        LEFT JOIN gf_tipo_comprobante_pptal tcp ON cp.tipocomprobante = tcp.id_unico 
        LEFT JOIN gf_tercero tr ON tr.id_unico = dcp.tercero 
        WHERE cp.parametrizacionanno = $panno 
        AND rp.codi_presupuesto BETWEEN '$rubini' AND '$rubfin' 
        AND cp.fecha BETWEEN '$fechaI' AND '$fechaF' 
        ORDER BY rp.codi_presupuesto, cp.fecha ASC");
        break;
      default:
        # code...
        break;
    }

    // $con = $mysqli->query($con2);
    // while ($row = mysqli_fetch_array($con2)) {
    for ($row = 0; $row < count($con2); $row++) {
      $tipo = $con2[$row][13];
      $comprobanteI = $con->Listar("SELECT codigo as cod FROM gf_tipo_comprobante_pptal WHERE id_unico ='$tipo'
      AND (clasepptal ='13' OR clasepptal ='18' OR clasepptal ='19')");
      // $comprobanteI = $mysqli->query($comprobanteI);
      if (count($comprobanteI) > 0) {
        $row1 = $comprobanteI;
        if ($row1[0][0] >= $compini && $row1[0][0] <= $compfin) {


          $valor = $con2[$row][12];
          #AFECTADO
          $comp = $con2[$row][11];
          $af = $con->Listar("SELECT valor as value
                FROM gf_detalle_comprobante_pptal dcp
                LEFT JOIN gf_comprobante_pptal cp ON dcp.comprobantepptal = cp.id_unico
                LEFT JOIN gf_tipo_comprobante_pptal tcp ON cp.tipocomprobante = tcp.id_unico
                LEFT JOIN gf_tipo_operacion top ON tcp.tipooperacion = top.id_unico
                WHERE dcp.comprobanteafectado = '$comp' AND top.id_unico = 1");
          // $af = $mysqli->query($a);

          if (count($af) > 0) {
            $sum = 0;
            // while ($sum1 = mysqli_fetch_array($af)) {
            for ($sum1 = 0; $sum1 < count($af); $sum1++) {
              $sum = $af[$sum1][0] + $sum;
            }
          } else {
            $sum = 0;
          }
          $afectado = $sum;
          #MODIFICACIONES
          $modi = $con->Listar("SELECT valor as value, tcp.tipooperacion as idcom 
                FROM gf_detalle_comprobante_pptal dcp
                LEFT JOIN gf_comprobante_pptal cp ON dcp.comprobantepptal = cp.id_unico
                LEFT JOIN gf_tipo_comprobante_pptal tcp ON cp.tipocomprobante = tcp.id_unico
                LEFT JOIN gf_tipo_operacion top ON tcp.tipooperacion = top.id_unico
                WHERE dcp.comprobanteafectado = '$comp' AND top.id_unico != 1");
          // $modi = $mysqli->query($mod);
          if (count($modi) > 0) {
            $modifi = 0;
            // while ($modif = mysqli_fetch_array($modi)) {
            for ($modif = 0; $modif < count($modi); $modif++) {
              $modificacion = $modi[$modif][0];
              if ($modi[$modif][1] == 2) {
                $modifi = $modificacion + $modifi;
              } else {
                if ($modi[$modif][1] == 3) {
                  $modifi = $modifi + ($modificacion * -1);
                } else {
                  $modifi = 0;
                }
              }
            }
          } else {
            $modifi = 0;
          }
          $modificacion1  = $modifi;
          if ($modificacion1 < 0) {
            $modificacion = $modificacion1 * -1;
          } else {
            $modificacion = $modificacion1;
          }

          #TOTAL
          $total = $valor + $modificacion1;
          #SALDO
          $saldo = $total - $afectado;


          $p1   = (float)($valor);
          $p2   = (float)($modificacion);
          $p3   = (float)($total);
          $dat = $con2[$row][5]; //date('Y-m-d');
          $dat = trim($dat, '"');
          $fecha_div = explode("-", $dat);
          $aniodat = $fecha_div[0];
          $mesdat = $fecha_div[1];
          $diadat = $fecha_div[2];
          $dat = $diadat . '/' . $mesdat . '/' . $aniodat;
    ?>

          <tr>
            <td align="left"><?php echo $con2[$row][0]; ?></td>
            <td align="right"><?php echo $dat; ?></td>
            <td align="right"><?php echo $con2[$row][7]; ?></td>
            <td align="left"><?php echo ucwords(mb_strtolower($con2[$row][8])); ?></td>
            <td align="left"><?php echo ucwords(mb_strtolower($con2[$row][9])); ?></td>
            <td align="right"><?php echo number_format($p1, 2, '.', ','); ?></td>
            <td align="right"><?php ?></td>
          </tr>
    <?php
        }
      }
    }

    ?>



  </table>
</body>

</html>