<?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/vgrupocredito.php");
	$vgrupocredito=new vgrupocredito;
	include_once($ruta."class/vindividualcredito.php");
	$vindividualcredito=new vindividualcredito;
	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."class/domicilio.php");
	$domicilio=new domicilio;
	include_once($ruta."class/individual.php");
	$individual=new individual;
	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 *************/

	//$user=dcUrl($lblcode);
	//$idadmeje=dcUrl($lblcode2);
	$valor=dcUrl($lblcode);
    $cred=$grupocredito->muestra($valor);
    $gr=$grupo->muestra($cred['idgrupo']);
   // $per=$persona->mostrarPrimero("idpersona=".$cred['idpersona']);
    //$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');

   // $MesInforme= $fechareporte;//date("Y-m-t",strtotime($fechareporte));
 
	$rutaImg=$ruta."imagenes/logo.png";
	$demp=$miempresa->muestra(1);

	$dus=$usuario->muestra($user);
	//$tba=$tipobanca->muestra($cred['idtipobanca']);
	//$eje=$vadmejecutivo->muestra($gr['idadmejecutivo']);
	//$ddom=$dominio->muestra($cred['frecuenciapago']);
	//$cuotacobrar=$cred['cuota']+1;
	//$canTCred=$credito->mostrarTodo("idgrupocredito=".$valor);

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

	//$consulta="SELECT sum(cuenta)  as 'maximo' FROM admcontrato where idsede=1";
	//$dcont=$credito->sql($consulta);
	//$dcont=array_shift($dcont);


	$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' => 13, 
		    'orientation' => '',
		    'format' => 'LEGAL',
		    'font' => 'arial'
		]
	);


	$html = $html.'
	<style>
    .textot{
    	font-size:14px; 
    	text-align: justify; 
    	texto-justify: inter-palabra; 
    	font: Arial;
    }
   </style>
<table style="width:100%; font-size:12px; text-align:center;"  align="center">
        <tr >
            <td style="width:30%;" class="letras">
              <center>
               
              </center>
            </td>
            <td style="width:40%;">
	            <table class="" width="100%" align="center">
	            <tr>
	            	<td>
	            		<div class="titPRI"><h3> </h3></div>
	            	</td>
	            </tr>
	            </table>
            </td>
            <td style="width:30%;">
	            <table border="0">
	              <tr>
	                <td>
	                  <table class="letras" cellpadding="2">
	                    <tr>
	                      <td align="right">
	                        Ciclo.:
	                      </td>
	                      <td align="left">
	                        <b>'.$gr['idciclo'].'</b>
	                      </td>
	                    </tr>
	                  </table>
	                </td>
	              </tr>
	            </table>                     
            </td>
	  	</tr>
	</table>
	 <table class="" width="100%">
    <tr>
    	<td style="text-align:center;">
    		<h3>CONTRATO DE PRESTAMO </h3>
    	</td>
    </tr>
	 </table>
		
	<table class="textot" >
		<thead>
			<tr>
			<th width="100%"></th>
			</tr>
		</thead>
		<tbody>
		<tr>
		  <td>
		   Conste por el presente contrato privado de préstamo de dinero libremente contraído. Que podrá elevarse a la categoría de documento público, mediante reconocimiento de firmas y rúbricas oponible y homologable ante autoridad competente, a solicitud de cualquiera de las partes que se suscribe, al tenor de las siguientes cláusulas.
		  </td>
		</tr>
		<tr>
		  <td>
		   <b>1. CLAUSULA PRIMERA: DE LAS PARTES CONTRATANTES. -</b> Suscriben el presente contrato las siguientes partes:
		  </td>
		</tr>
		<tr>
		  <td>';
		  $contar=1;
		  $html = $html.'
		   1.'.$contar.' <b>PRO AYUDA</b>, legalmente representada por <b>EDWIN BORIS VEGA ARANDA con CI 4892193 LP</b> se constituye como acreedor, para efectos de este contrato, y las siguientes personas:<br>
		   ';
		   $totalPago=0;
		    foreach($credito->mostrarTodo("idgrupocredito=".$valor." and tipocredito=0") as $f)
		    {
		    	$contar++;

		    	$dper=$persona->muestra($f['idpersona']);
		    	$totalPago=$totalPago+$f['montoOT'];
		    	$html = $html.'
		    	1.'.$contar.' <b>'.$dper['nombre']." ".$dper['paterno']." ".$dper['materno'].' con CI '.$dper['carnet'].' '.$dper['expedido'].'</b> quien tendrá la calidad y se denominará DEUDOR MANCOMUNADO INDIVISIBLE Y SOLIDARIO.<br>
		    	';
		    }
		    $domper=$credito->mostrarPrimero("idgrupocredito=".$valor." and tipocredito=0");
		    $domic=$domicilio->mostrarUltimo("idpersona=".$domper['idpersona']);
		    $cantidadMeses=$cred['nrocuotas']/$ddom['codigo'];
		    $interescred=$domper['interes'];

		    $porcentajeEnt= substr($interescred, 0, 1);  // abcd extrae primer caracter
		    $porcentajeDesc= substr($interescred, 2);     // bcdef extrae despues de dos caracteres

		    $gastosadminEnt= substr($cred['gastosadmin'], 0, 1);  // abcd extrae primer caracter
		    $gastosadminDesc= substr($cred['gastosadmin'], 2);     // bcdef extrae despues de dos caracteres

		    $frsEnt= substr($cred['frs'], 0, 1);  // abcd extrae primer caracter
		    $frsDesc= substr($cred['frs'], 2);     // bcdef extrae despues de dos caracteres
//<tr>
		  //<td>
		   //Además de Adjuntar la <b>Personería Judírica de Sind. 27 de Abril </b> como garantia.  
		  //</td>
		//</tr>
		    $html = $html.'
			
			<br>
		  </td>
		</tr>
		<tr>
		  <td>
		   Todos mayores de edad, hábiles por derecho, quienes para efecto de este contrato se denominarán LOS DEUDORES. Y para uso de identificación interna se nombrará GRUPO <b>'.$gr['nombre'].'</b> sin que el costo afecte la denominación de LOS DEUDORES.
		  </td>
		</tr>
        <tr>
		  <td>
		   <b>CLAUSULA SEGUNDA: DOMICILIO ESPECIAL.-</b> Para fines del presente contrato y en cumplimiento de lo que establece el Código Civil en su Artículo 29 parágrafo II para diligencias judiciales, extrajudiciales o administrativas, se establece como domicilio especial de LOS DEUDORES, ubicado en '.$domic['nombre'].' de la Zona '.$domic['idbarrio'].'.
		  </td>
		</tr>
		<tr>
		  <td>
		   <b>CLAUSULA TERCERA: OBJETO DEL CONTRATO.-</b> En virtud del presente contrato, concede a favor de LOS DEUDORES, un préstamo de dinero Mancomunado, Indivisible y Solidario.
		  </td>
		</tr>
		<tr>
		  <td>
		   <b>CLAUSULA CUARTA: MONEDA.-</b> El presente préstamo se otorga en bolivianos moneda de curso legal y vigente a la fecha de la suscripción del presente contrato.
		  </td>
		</tr>
		<tr>
		  <td>
		   <b>CLAUSULA QUINTA: MONTO DEL PRÉSTAMO.-</b>   El monto del préstamo es de Bs. <b>'.number_format($totalPago, 2, '.', '').'</b>.- son ('.num2letras(number_format($totalPago, 2, '.', '')).' bolivianos) dinero que LOS DEUDORES declaran haber recibido a su entera satisfacción y conformidad, a la suscripción del presente contrato.
		  </td>
		</tr>
		<tr>
		  <td>
		   <b>CLÁUSULA SEXTA: DESTINO DEL PRÉSTAMO.-</b> EL préstamo de dinero será destinado a capital de operaciones.
		  </td>
		</tr>
		<tr>
		  <td>
           <b>CLÁUSULA SÉPTIMA: PLAZO Y AMORTIZACIONES.-</b> El plazo de pago del préstamo es de <b>'.numeroentero($cantidadMeses).' meses</b> (cuotas '.$ddom['tipo3'].') computables a partir de la firma del presente contrato, el pago se efectuará mediante amortizaciones semanales del capital más intereses y otros de acuerdo al presente contrato, el plazo es improrrogable.
		  </td>
		</tr>
		<tr>
		  <td>
		   <b>CLÁUSULA OCTAVA: LUGAR DE LAS AMORTIZACIONES.-</b> LOS DEUDORES realizarán las amortizaciones en cualquiera de las Agencias habilitadas por PRO-AYUDA, cuya ubicación declara conocer expresamente. Cuando las amortizaciones debieran realizarse en un día no hábil, esta debe ser pagada como máxima tolerancia el primer día hábil.
		  </td>
		</tr>
		<tr>
		  <td>
		  <b> CLÁUSULA NOVENA: INTERESES.-</b> El préstamo concedido en virtud del presente contrato estará sujeto al pago de una tasa de interés del '.$interescred.' % mensual ('.numeroentero($porcentajeEnt).' punto '.numeroentero($porcentajeDesc).' por ciento mensual).
		  </td>
		</tr>
		<tr>
		  <td>
		  <b> CLAUSULA DECIMA: GASTOS ADMINISTRATIVOS.–</b> PRO-AYUDA cobrará A LOS DEUDORES los siguientes cargos administrativos: Reposición de gastos administrativos por tramites de desembolso; al momento del desembolso y por única vez se cobrará el '.$cred['gastosadmin'].'% ('.numeroentero($gastosadminEnt).' punto '.numeroentero($gastosadminDesc).' por ciento) sobre el monto total del préstamo.
		  </td>
		</tr>
		<tr>
		  <td>
		   <b>CLÁUSULA DECIMA PRIMERA: FONDO DE RESERVA SOLIDARIA.-</b> Al momento del desembolso voluntariamente y por única vez LOS DEUDORES depositarán el '.$cred['frs'].' % ('.numeroentero($frsEnt).' punto '.numeroentero($frsDesc).' por ciento) sobre el monto total del préstamo al Fondo De Reserva Solidaria para casos de fallecimiento e invalidez permanente de un cliente, el cual tiene un tiempo de vigencia equivalente al plazo del préstamo. LOS DEUDORES declaran tener conocimiento de la reglamentación de PRO-AYUDA respecto al Fondo de Reserva Solidaria.
		  </td>
		</tr>
		<tr>
		  <td>
		   <b>CLAUSULA DECIMA SEGUNDA: LA SIMPLE TOLERANCIA NO IMPORTA NOVACIÓN.-</b> Cualquier prorroga. Tolerancia u otra facilidad que pudiera dar PRO-AYUDA a LOS DEUDORES no constituirá ni se considerará como novación, tampoco modifica el derecho de PRO-AYUDA de exigir el cumplimiento de la obligación en su totalidad.
		  </td>
		</tr>
		<tr>
		  <td>
		  <b> CLÁUSULA DECIMA TERCERA: GARANTÍAS.-</b> De conformidad a los artículos 1335, 427, 428 y 433 del Código Civil: LOS DEUDORES, se constituyen en deudores mancomunados, solidarios e indivisibles, y garantizan el fiel cumplimiento del préstamo, que asume mediante el presente contrato, con la generalidad de sus bienes, derechos y acciones habidos y por haber. 
		  </td>
		</tr>
		
		<tr>
		  <td>
		   <b>CLAUSULA DECIMA CUARTA: DERECHOS DE LOS DEUDORES.-</b> LOS DEUDORES tienen los siguientes derechos: Solicitar información del presente crédito sobre desglose de capital, cargos administrativos, intereses comisiones, actualización del cronograma completo del presente crédito, la forma y cálculo de los cargos financieros, en cualquier momento mientras dure el presente contrato. Solicitar liquidaciones periódicas para poder verificar el saldo adeudado. Realizar pagos anticipados o amortizaciones extraordinarias, o pagar el total de la obligación antes del vencimiento.
		  </td>
		</tr>
		
		<tr>
		  <td>
		  <b> CLAUSULA DECIMA QUINTA: OBLIGACIONES DE LOS DEUDORES.-</b> LOS DEUDORES Tiene las siguientes obligaciones:<br>
			Pagar capital, intereses y cargos administrativos y otros, de acuerdo a los plazos, montos y moneda establecidos en el presente contrato.<br>
			Presentar a PRO-AYUDA, cualquier información que le fuera solicitada, del destino y/o uso del dinero objeto del presente contrato y otra información inherente a la operación crediticia. Informar a PRO-AYUDA en forma escrita, oportuna y detallada sobre cualquier cambio de actividad económica.<br>
			El incumplimiento por parte de los deudores de cualquiera de las obligaciones señaladas anteriormente. Dará lugar a que el préstamo se considere de plazo vencido, líquido y exigible. Pudiendo PRO-AYUDA iniciar acciones administrativas internas y/o judiciales correspondientes.
		  </td>
		</tr>
		<tr>
		  <td>
		   <b>CLAUSULA DECIMA SEXTA: DERECHOS DE PRO AYUDA</b> tendrá los siguientes derechos supervisar el uso y destino de los fondos otorgados. Solicitar información directa o por intermedio de terceros de LOS DEUDORES. <br>
       Informar. Solicitar, verificar. Intercambiar y actualizar sobre Ia situación crediticia de los DEUDORES con los Sistemas de Información Crediticia Públicos y/o Privados, Transferir o ceder a terceros el presente préstamo o cualquier derecho que le corresponda, siempre y cuando la cesión o transferencia mantenga las mismas condiciones para LOS DEUDORES.<br>
      Queda establecido que cualquier transferencia o sesión realizada producirá efectos legales sin necesidad de aviso o notificación a LOS DEUDORES. De acuerdo a los Art. 384 Y 389 del Código Civil, la que se constituye en notificación y aceptación suficiente de LOS DEUDORES.
		  </td>
		</tr>
		<tr>
		  <td>
		   <b>CLAUSULA DECIMA SEPTIMA CONSTITUCIÓN DE MORA AUTOMÁTICA.-</b> LOS DEUDORES Se constituirán con mora automática por la totalidad de la obligación a solo vencimiento de cualquiera de los plazos estipulados sin necesidad de intimación, requerimiento judicial o extrajudicial, estableciendo que esta situación convertirá el monto total pendiente de pago con líquido y de plazo vencido. En tal caso, PRO-AYUDA podrá exigir y obtener el pago del monto total adeudado, por capital. Cargos administrativos. Intereses convencionales y moratorios de acuerdo con los márgenes que fijan las disposiciones legales vigentes; los mismos que serán aplicados a partir del primer día de mora. Además, los gastos con los que incurra PRO-AYUDA por el cobro. Serán repetidos A LOS DEUDORES.
		  </td>
		</tr>
		<tr>
		  <td>
		   <b>CLUSULA DECIMA OCTAVA RESOLUCIÓN DEL CONTRATO, CADUCIDAD Y DERECHOS DE ACELERACIÓN.-</b> De acuerdo a lo estipulado con el Art. 569 del Código Civil si LOS DEUDORES no cumplen con Ío establecido en este contrato quedara resuelto y se procediere al cobro DEL TOTAL DE LA Obligación. (Capital. Intereses, moratorio. Cargos administrativos, costas y honorarios profesionales), sin necesidad de notificación adicional, judicial o extrajudicial. O requerimiento de Mora. Serán causales de resolución. Caducidad y aceleración Falta de pago total o parcial de una cuota de la amortización del préstamo convenido en el presente contrato. Por proceso judicial iniciado por terceros contra alguno de los DEUDORES que pueda afectar los derechos de PRO-AYUDA. Si los datos de la información financiera declarados, o la documentación presentada por parte LOS DEUDORES hubiesen sido inexactos y/o falsos.
		  </td>
		</tr>
		<tr>
		  <td>
		   <b>CLUSULA DECIMA OCTAVA RESOLUCIÓN DEL CONTRATO, CADUCIDAD Y DERECHOS DE ACELERACIÓN.-</b> De acuerdo a lo estipulado con el Art. 569 del Código Civil si LOS DEUDORES no cumplen con Ío establecido en este contrato quedara resuelto y se procediere al cobro DEL TOTAL DE LA Obligación. (Capital. Intereses, moratorio. Cargos administrativos, costas y honorarios profesionales), sin necesidad de notificación adicional, judicial o extrajudicial. <br>
		      O requerimiento de Mora. Serán causales de resolución. Caducidad y aceleración Falta de pago total o parcial de una cuota de la amortización del préstamo convenido en el presente contrato. Por proceso judicial iniciado por terceros contra alguno de los DEUDORES que pueda afectar los derechos de PRO-AYUDA. <br>
		      Si los datos de la información financiera declarados, o la documentación presentada por parte LOS DEUDORES hubiesen sido inexactos y/o falsos. <br>
		      Cesación de pagos. Concurso de acreedores o declaración de quiebra de alguno de Ios DEUDORES. Inhabilitación de alguno de los DEUDORES para ejercer el comercio. Incumplimiento o falta de pago oportuno de otros préstanos o de otras obligaciones que LOS DEUDORES tenga con PRO-AYUDA. 
		  </td>
		</tr>
		<tr>
		  <td>
		   <b>CLAUSULA DECIMA NOVENA DE LA EJECUCIÓN JUDICIAL.-</b> PRO AYUDA realizara Ia cobranza judicial mediante proceso ejecutivo. De acuerdo a lo que establece el Código de Procedimiento Civil. Con sus artículos 486. 487 siguientes y pertinentes de este cuerpo legal. 
		  </td>
		</tr>
		<tr>
		  <td>
		   <b>CLAUSULA VIGÉSIMA DE LA ACEPTACIÓN.-</b> Las partes declamamos nuestra absoluta conformidad, plenitud aceptación con la forma y fondo del presente contrato de préstamo de dinero, a cuyo fiel y estricto cumplimiento nos obligamos de todas y cada una de sus cláusulas, por lo que firmamos en tres ejemplares idénticos y de igual valor probatorio, sin que medie en ellos violencia o vicio alguno de nuestro consentimiento.
		  </td>
		</tr>
		<tr>
		  <td>
		   En la ciudad de La Paz El alto a los '.numeroentero(date('d')).' días del mes de '.obtenerMes(date('Y-m-d')).' de '.numeroentero(date('Y')).' años.
		  </td>
		</tr>
		
		   ';

		   foreach($credito->mostrarTodo("idgrupocredito=".$valor." and tipocredito=0") as $f2)
		    {
		    	

		    	$dper2=$persona->muestra($f2['idpersona']);
		    	$html = $html.'
		    	
		<tr>
		  <td><b>'.$dper2['nombre']." ".$dper2['paterno']." ".$dper2['materno'].' con CI '.$dper2['carnet'].' '.$dper2['expedido'].'</b> quien tendrá la calidad y se denominará DEUDOR MANCOMUNADO INDIVISIBLE Y SOLIDARIO.<br><br><br><br>
		    	.............................................................<br><br><br><br>
          </td>
		</tr>
		    	';
		    }
		  $html = $html.'  
		 
		<tr>
		  <td>
		   
		  </td>
		</tr>
		
				';
			
				$html = $html.'
			</tbody>
		  <tfoot>
		    <tr>
		    <td></td>
		      
		    </tr>
		  </tfoot>
		</table><br>
	<br>				
		
	';
	//==============================================================
	//==============================================================
	//==============================================================

	//$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"></td>
	        <td width="33%" style="text-align: right;">{PAGENO}/{nbpg}</td>
	    </tr>
	</table>');
	$mpdf->SetHeader($header,50);
	$mpdf->WriteHTML($html);
	$mpdf->Output('CONTRATO','I');

?>
