<?php
  session_start();
  $ruta="../../../../";
  include_once($ruta."class/dominio.php");
  $dominio=new dominio;
  include_once($ruta."class/vadmejecutivo.php");
  $vadmejecutivo=new vadmejecutivo;
  include_once($ruta."class/grupo.php");
  $grupo=new grupo;
  include_once($ruta."class/ciclo.php");
  $ciclo=new ciclo;
   include_once($ruta."class/grupocredito.php");
  $grupocredito=new grupocredito;
  include_once($ruta."class/credito.php");
  $credito=new credito;
  include_once($ruta."class/creditodetalle.php");
  $creditodetalle=new creditodetalle;
  include_once($ruta."class/personagrupo.php");
  $personagrupo=new personagrupo;
  include_once($ruta."class/persona.php");
  $persona=new persona;
  include_once($ruta."class/tipobanca.php");
  $tipobanca=new tipobanca;
  include_once($ruta."class/miempresa.php");
  $miempresa=new miempresa;
  include_once($ruta."class/usuario.php");
  $usuario=new usuario;
  include_once($ruta."funciones/funciones.php");
  include($ruta."recursos/qr/qrlib.php");
  require_once '../../../../recursos/pdf/mpdf/vendor/autoload.php';

  /******************    SEGURIDAD *************/
  extract($_GET);
  //********* SEGURIDAD GET *************/
  $valor=dcUrl($lblcode);
  $cred=$credito->muestra($valor);
  $per=$persona->mostrarPrimero("idpersona=".$cred['idpersona']);
  $rutaImg=$ruta."imagenes/logo.png";
  $demp=$miempresa->muestra(1);
  $dus=$usuario->muestra($cred["usuariocreacion"]);
  $tba=$tipobanca->muestra($cred['idtipobanca']);
  $eje=$vadmejecutivo->muestra($cred['idejecutivo']);
  $ddom=$dominio->muestra($cred['idfrecuenciapago']);


  $defaultConfig = (new Mpdf\Config\ConfigVariables())->getDefaults();
  $fontDirs = $defaultConfig['fontDir'];

  $defaultFontConfig = (new Mpdf\Config\FontVariables())->getDefaults();
  $fontData = $defaultFontConfig['fontdata'];

  $mpdf = new \Mpdf\Mpdf([
      'fontDir' => array_merge([
            $ruta.'recursos/font/titilium',
        ]),
        'fontdata' => $fontData + [
            'frutiger' => [
                'R' => 'TitilliumWeb-Regular.ttf',
                'I' => 'TitilliumWeb-Italic.ttf',
            ]
        ],
        'default_font' => 'frutiger',
        'mode' => 'utf-8',
        'margin_header' => 5, 
        'margin_top' => 30, 
        'orientation' => ''
    ]
  );


$header='
  <table style="width:100%; font-size:12px; text-align:center;"  align="center">
        <tr >
            <td style="width:30%;" class="letras">
              <center>
                <img style="width:180px;" src="'.$rutaImg.'" ><br>
              </center>
            </td>
            <td style="width:30%;">
              <table class="titREP" align="center">
              <tr>
                <td>
                  <div class="titPRI">Comportamiento<h3> E X T R A C T O </h3></div>
                </td>
              </tr>
              </table>
            </td>
            <td style="width:30%;">
              <table border="0">
                <tr>
                  <td>
                    <table class="letras" cellpadding="2">
                      <tr>
                        <td align="right">
                          FECHA:
                        </td>
                        <td align="left">
                          <b>'.date("Y-m-d").'</b>
                        </td>
                      </tr>
                      <tr>
                        <td align="right">
                          HORA:
                        </td>
                        <td align="left">
                          <b>'.date ("h:i:s").'</b>
                        </td>
                      </tr>
                      <tr>
                        <td align="right">
                          Usuario:
                        </td>
                        <td align="left">
                          <b>'.$dus['usuario'].'</b>
                        </td>
                      </tr>
                    </table>
                  </td>
                </tr>
              </table>                     
            </td>
      </tr>
  </table>
  ';

  $html = '
  <b>NOMBRE : </b>'.$per['nombre']." ".$per['paterno']." ".$per['materno'].' <b>CI: </b>'.$per['carnet'].''.$per['expedido'].'
    <table class="tablaData">
      <tr>
        <td><b>Cuenta: </b>'.$cred['cuenta'].'</td>
        <td width="25%"><b>CAPITAL: </b>'.number_format($cred['montoOT'], 2, '.', '').' BS</td>
        <td><b>Tasa: </b>'.$cred['interes'].'%</td>
        <td><b>BANCA: </b>'.$tba['nombre'].'</td>
      </tr>
      <tr>
        <td><b>FRECUENCIA: </b> Cada '.$cred['lapsoDias'].' días</td>
        <td><b>Cuotas: </b>'.$cred['cuotas'].' Cuotas</td>
        <td><b>ASESOR : </b>'.$eje['nombre']." ".$eje['paterno'].'</td>
        <td><b>AHORRO INICIAL : </b>'.$cred['fgarantia'].'%</td>
      </tr>
    </table>
    <table class="tablaLIST">
      <thead>
        <tr>
          <th> CUOTA </th>
          <th> FECHA </th>
          <th> AMORT. CAP. </th>
          <th> INTERÉS</th>
          <th> C.A.</th>
          <th> SEGURO </th>
          <th> TOTAL </th>
          <th> SALDO CAP. </th>
          <th> DETALLE </th>
        </tr>
      </thead>
      <tbody>
      ';
      $TotTot=0;
      $Tmonto=0;
      $Tinte=0;
      $Tcacum=0;
      $Tseguro=0;
      $saldoAnt=0;
      foreach($creditodetalle->mostrarTodo("idcredito=".$valor) as $f) {
        $total=$f['monto']+$f['interes']+$f['gadmin']+$f['seguro'];
        $TotTot=$TotTot+$total;
        $Tmonto=$Tmonto+$f['monto'];
        $Tinte=$Tinte+$f['interes'];
        $Tcacum=$Tcacum+$f['gadmin'];
        $Tseguro=$Tseguro+$f['seguro'];

        $html=$html.'
        <tr>
          <td class="sfila textocentro">'.$f['cuota'].'</td>
          <td class="sfila textocentro">'.$f['fechacreacion'].':'.$f['horacreacion'].'</td>
          <td class="sfila textocentro">'.number_format($f['monto'], 2, '.', '').'</td>
          <td class="sfila textocentro">'.number_format($f['interes'], 2, '.', '').'</td>
          <td class="sfila textocentro">'.number_format($f['gadmin'], 2, '.', '').'</td>
          <td class="sfila textocentro">'.number_format($f['seguro'], 2, '.', '').'</td>
          <td class="sfila textocentro">'.number_format($total, 2, '.', '').'</td>
          <td class="sfila textocentro">'.number_format($f['saldo'], 2, '.', '').'</td>
          <td class="sfila textocentro">'.$f['glosa'].'</td>
        </tr>';
      }
      $fgarantia=$cred['montoOT']*($cred['fgarantia']/100);
      $html = $html.'
      </tbody>
      <tfoot>
        <tr>
          <td colspan="2">TOTALES</td>
          <td>'.number_format($Tmonto, 2, '.', '').'</td>
          <td>'.number_format($Tinte, 2, '.', '').'</td>
          <td>'.number_format($Tcacum, 2, '.', '').'</td>
          <td>'.number_format($Tseguro, 2, '.', '').'</td>
          <td>'.number_format($TotTot, 2, '.', '').'</td>
          <td  colspan="2"></td>
        </tr>
      </tfoot>
    </table><br>';
    //$ki=($cred['montoOT'])+$cred['montoOT']*($cred['interes']/100);
    //es montoOtorgado+(montoOtorgado*(interes/100)*cuotas/4)
    $mesesPlazo=$cred['cuotas']/$ddom['codigo'];

    $ki=($cred['montoOT'])+($cred['montoOT']*($cred['interes']/100)*($mesesPlazo));

    //montoOtorgado+(montoOtorgado*(interes/100)*plazo en meses)


    $subtotal1=$ki+$cred['montoCI'];
    /*****************************************************************************/
    $subtotal2=$TotTot+$fgarantia+$cred['saldoahorro']+$cred['interesDevCI'];

    $diferencia=$subtotal2-$subtotal1;
    $literal="POR DEVOLVER";
    if ($diferencia<0) {
      $diferencia=$diferencia*(-1);
      $literal="POR COBRAR";
    }

    $html = $html.'
    <table style="width:50%" class="tablaLIST2">
      <thead>
        <tr>
          <th colspan="4"><b> P E R S O N A L </b> </th>
        </tr>
      </thead>
      <tbody>
        <tr>
          <td style="width:20%"><b>K:</b></td>
          <td style="width:30%">'.number_format($cred['montoOT'], 2, '.', '').'</td>
          <td style="width:25%"><b>Tot. Cancel:</b></td>
          <td style="width:25%">'.number_format($TotTot, 2, '.', '').'</td>
        </tr>
        <tr>
          <td><b>k+i:</b></td>
          <td>'.number_format($ki, 2, '.', '').'</td>
          <td><b>Ahorro. Ini.:</b></td>
          <td>'.number_format($fgarantia, 2, '.', '').'</td>
        </tr>
        <tr>
          <td><b>Int:</b></td>
          <td>'.number_format($cred['montoCI'], 2, '.', '').'</td>
          <td><b>Ahorro Vol:</b></td>
          <td>'.number_format($cred['saldoahorro'], 2, '.', '').'</td>
        </tr>
        <tr>
          <td><b>i Int:</b></td>
          <td></td>
          <td><b>CC:</b></td>
          <td>--</td>
        </tr>
        <tr>
          <td><b>Otros:</b></td>
          <td></td>
          <td><b>Div. Int:</b></td>
          <td>'.number_format($cred['interesDevCI'], 2, '.', '').'</td>
        </tr>
        <tr style="background-color:#efefef;">
          <td><b>Sub Total:</b></td>
          <td>'.number_format($subtotal1, 2, '.', '').'</td>
          <td><b>SubTotal:</b></td>
          <td>'.number_format($subtotal2, 2, '.', '').'</td>
        </tr>
        <tr>
          <td><b>Saldo:</b></td>
          <td>'.number_format($diferencia, 2, '.', '').'</td>
          <td colspan="2"><b>'.$literal.'</b></td>
        </tr>
        <tr>
          <td><b>Cuot. Faltantes:</b></td>
          <td></td>
          <td colspan="2"></td>
        </tr>
      </tbody>
    </table>
  ';
  //==============================================================
  //==============================================================
  //==============================================================

  //$mpdf->SetDisplayMode('fullpage');

  $stylesheet = file_get_contents($ruta.'recursos/css/elisyam-1.5.css');
  $mpdf->WriteHTML($stylesheet,1); // The parameter 1 tells that this is css/style only and no
  $mpdf->SetHTMLFooter('
  <table width="100%">
      <tr>
          <td width="33%"></td>
          <td width="33%" align="center">{PAGENO}/{nbpg}</td>
          <td width="33%" style="text-align: right;"></td>
      </tr>
  </table>');
  $mpdf->SetHeader($header,50);
  $mpdf->WriteHTML($html);
  $mpdf->Output();
?>