<?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);
	$valor=dcUrl($lblcode);
	$cred=$grupocredito->muestra($valor);
	$gr=$grupo->muestra($cred['idgrupo']);
	$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($gr['idadmejecutivo']);
	$ddom=$dominio->muestra($cred['frecuenciapago']);
	$cuotacobrar=$cred['cuota']+1;
	$canTCred=$credito->mostrarTodo("idgrupocredito=".$valor." and tipocredito=0");
	$fechaActual=date('Y-m-d');
    $horaActual=date("H:i:s");

	$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:240px;" src="'.$rutaImg.'" ><br>
              </center>
            </td>
            <td style="width:30%;">
	            <table class="titREP" align="center">
	            <tr>
	            	<td>
	            		<h1>B</h1>
	            	</td>
	            	<td>
	            		<div class="titSUB">P L A N I L L A</div>
	            		<div class="titPRI"><h3> REUNIÓN '.$cuotacobrar.'</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>'.$fechaActual.'</b>
	                      </td>
	                    </tr>
	                    <tr>
	                      <td align="right">
	                        HORA:
	                      </td>
	                      <td align="left">
	                        <b>'.$horaActual.'</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 = '
		<table  style="width:100%; font-size:12px;">
		    <tr>
		      <td width="30%"><b>Grupo: </b>'.$gr['nombre'].'</td>
		      <td width="20%"><b>Código: </b> '.$valor.' <b>Ciclo: </b> '.$gr['idciclo'].'</td>
		      <td width="25%"><b>Fecha: </b>'.$cred['fechaproximo'].'</td>
		      <td width="25%"><b>Ultima Reunión : </b>'.$cred['fechaultimo'].'</td>	
		      
		    </tr>
		    <tr>
		      <td><b>Reunión: </b>'.$gr['lugarreunion'].'</td>
		      <td><b>N° Integrantes : </b>'.count($canTCred).'</td>
		      <td><b>Hr.Reunión: </b> '.$gr['horareunion'].'</td>
		      <td><b>Fecha Apertura: </b>'.$cred['fechadesembolso'].'</td>
		    </tr>
		    <tr>
		    <td><b>Tipo Banca: </b>'.$tba['nombre'].'</td>
		      <td><b>Cuotas: </b>'.$cuotacobrar.'/'.$cred['nrocuotas'].'</td>
		      <td><b>Lapso : </b>'.$ddom['short'].' días</td>
		      <td><b>Fecha Cierre: </b>'.$cred['fechacierre'].'</td>
		    </tr>
		  </table>
		<table class="tablaLIST2">
			<thead>
				<tr>
				  <th>NRO</th>
				  <th>Carnet</th>
				  <th width="25%">Nombre</th>
				  <th>Capital</th>
				  <th>Vigente</th>
				  <th>Deuda por Cobrar</th>
				  <th>Ahorro Vol.</th>
				  <th>Otros</th>
				  <th>FIRMA</th>
				</tr>
			</thead>
			<tbody>
			';
			$nro=1;
			$totalPago=0;
			$totalCI=0;
			$totalSaldoCI=0;
			$totalinteresCI=0;
			$saldoAnt=0;
			$totalk=0;
			$totalMontoCuota=0;
			foreach($credito->mostrarTodo("idgrupocredito=".$valor." and tipocredito=0") as $f) {
				$dper=$persona->muestra($f['idpersona']);
				$cuotaPago=$f['cuotaspagadas']+1;
				$tba=$tipobanca->muestra($f['idtipobanca']);

				$montoCAM=$f['montoOT']/$f['cuotas'];
					/***************** INTERES  **********************************************/
					//meses plazo
	                $domF=$dominio->muestra($f['idfrecuenciapago']);
	                $mesesPlazo=$f['cuotas']/$domF['codigo'];
	                $interesTotal=($f['montoOT']*($f['interes']/100)*$mesesPlazo);
	                $interesCuota=$interesTotal/$f['cuotas'];
	                $interesCuota=round($interesCuota, 2);
					/*************************************************************************/
					// CUOTA ACUMULADA
					$gaTotal=$f['montoOT']*($tba['gastosadmin']/100);
					$cuotaAcumulada=$gaTotal/$f['cuotas'];
					/****************************************************************/
					//SEGURO
					$seguro=$f['montoOT']*($f['seguro']/100);
					$seguro=$seguro/$f['cuotas'];
                    $seguro=round($seguro, 2);
					/*******************************************************/

					// CAPITAL ADEUDADO A PAGAR *******************************************************/
					// Capital pagado = MontoOT-saldo
					$capitalPagado=$f['montoOT']-$f['saldo'];
					$pagoACapital=$montoCAM*$cuotaPago;
					$CapitalAPagar=$pagoACapital-$capitalPagado;
					$CapitalAPagar=number_format($CapitalAPagar, 2, '.', '');
					/*********************************************************************************/
					// INETERES ADEUDADO *************************************************************/
					$interesPago=$interesCuota*$cuotaPago;
					$interesAPagar=$interesPago-$f['interesPagado'];
					$interesAPagar=number_format($interesAPagar, 2, '.', '');
					/*********************************************************************************/
					// CUOTA ACUMULADA ADEUDADA
					$cuotaAcumPago=$cuotaAcumulada*$cuotaPago;
					$cuotaAcumAPagar=$cuotaAcumPago-$f['cuotaAcumulada'];
					$cuotaAcumAPagar=number_format($cuotaAcumAPagar, 2, '.', '');
					/*********************************************************************************/
					// SEGURO ADEUDADO ***************************************************************/
					$seguroPago=$seguro*$cuotaPago;
					$seguroAPagar=$seguroPago-$f['seguroPagado'];
					$seguroAPagar=number_format($seguroAPagar, 2, '.', '');
					/*********************************************************************************/

					$totalAPagar=$CapitalAPagar+$interesAPagar+$cuotaAcumAPagar+$seguroAPagar;
					$totalAPagar=round($totalAPagar, 2);
					$totalAPagar=number_format($totalAPagar, 2, '.', '');
					$totalPago=$totalAPagar+$totalPago;

					$totalCI=$f['montoCI']+$totalCI;
					$totalSaldoCI=$f['saldoCI']+$totalSaldoCI;
					$totalinteresCI=$f['interesCI']+$totalinteresCI;



				    /******************************************   SALDO ANTERIOR  ******************************/
					/*******************************************************************************************/
					$fgarantia=$f['montoOT']*($f['fgarantia']/100);
					$totalFG=$totalFG+$fgarantia;
					$cuotasCobradas=$cuotasCobradas+$capitalPagado+$f['interesPagado']+$f['seguroPagado']+$f['cuotaAcumulada'];
					$depositVol=$depositVol+$f['saldoahorro'];
					$multas=$multas+$f['saldoMultas'];
					$montoPagadoInt=$f['montoCI']-$f['saldoCI'];
					$devInterno=$devInterno+$montoPagadoInt;//
					$intIntCobrado=$intIntCobrado+$f['interesDevCI'];//
					$credIntOtorg=$credIntOtorg+$f['montoCI'];
					/**********************************************************************************/
					$totalk=$totalk+$f['montoOT'];
					$totalMontoCuota=$totalMontoCuota+$f['montocuota'];

					$mora=$totalAPagar-$f['montocuota'];
					$montoPagado=$f['montoOT']-$f['saldo'];
					$mora=($f['montocuota']*$f['cuotaspagadas'])-$montoPagado-$f['interesPagado']-$f['seguroPagado']-$f['cuotaAcumulada'];
					$mora=number_format($mora, 2, '.', '');


					$totalCuota=$montoCAM+$interesCuota+$cuotaAcumulada+$seguro;
   					$totalCuota=number_format($totalCuota, 2, '.', '');

   					$valcredito=array(
						"montocuota"=>"'$totalCuota'"
				 	);
					$credito->actualizar($valcredito,$f['idcredito']);





				$html = $html.'
					<tr>
					  <td>'.$nro.'</td>
					  <td>'.$dper['carnet'].$dper['expedido'].'</td>
					  <td>'.$dper['nombre']." ".$dper['paterno']." ".$dper['materno'].'</td>
					  <td>'.number_format($f['montoOT'], 2, '.', '').'</td>
					  <td>'.number_format($f['montocuota'], 2, '.', '').'</td>
					  <td>'.number_format($mora, 2, '.', '').'/____</td>
					  <td></td>


					  <td></td>
					  <td>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</td>
					</tr>
				';
				$nro++;
  			}
  			$saldoAnt=$totalFG+$cuotasCobradas+$depositVol+$multas+$devInterno+$intIntCobrado-$credIntOtorg;
			$html = $html.'
			</tbody>
		  <tfoot>
		    <tr>
		      <td colspan="3"><b>Saldo Anterior</b><br> Ingresos: '.number_format($saldoAnt, 2, '.', '').'</td>
		      <td><b>'.number_format($totalk, 2, '.', '').'</b></td>
		      <td>'.number_format($totalMontoCuota, 2, '.', '').'</td>
		      <td></td>
		      <td></td>
		      <td></td>
		      <td></td>
		    </tr>
		  </tfoot>
		</table><br><br>
		<table class="tablaLIST2">
			<thead>
				<tr>
				  <th>Saldo Anterior</th>
				  <th>Cuotas</th>
				  <th>Ahorro Voluntario</th>
				  <th>Otros</th>
				  <th>Total efectivo</th>
				</tr>
			</thead>
			<tbody>
				<tr>
				  <td>____</td>
				  <td>____</td>
				  <td>____</td>
				  <td>____</td>
				  <td>____</td>
				</tr>
			</tbody>
		</table><br><br>
		<table style="width:100%; font-size:12px; text-align:center;">
			<tr>
				<td>_______________________<br>Presidente(ta)</td>
				<td>_______________________<br>Tesorero(a)</td>
				<td>_______________________<br>Secretario(a) o Vocal</td>
			</tr>
			<tr>
				<td colspan="3"><br><br><br>______________________________<br>ASESOR(A) '.$eje['nombre']." ".$eje['paterno'].'</td>
			</tr>
		</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();

?>