<?php
date_default_timezone_set ( "America/Lima" ); 
define('SF_ROOT_DIR', realpath(realpath('./../')));
require_once(SF_ROOT_DIR.DIRECTORY_SEPARATOR.'config'.DIRECTORY_SEPARATOR.'config_core_compile.php');
require_once(SF_ROOT_DIR.DIRECTORY_SEPARATOR.'cache'.DIRECTORY_SEPARATOR.'config_autoload.php');
require_once(SF_ROOT_DIR.DIRECTORY_SEPARATOR.'config'.DIRECTORY_SEPARATOR.'config.php');
require_once(SF_ROOT_DIR.DIRECTORY_SEPARATOR.'lib'.DIRECTORY_SEPARATOR.'functions'.DIRECTORY_SEPARATOR.'mensajes.php');

header("Content-type: application/json; charset=utf-8");

use_helper('UtilFunctions');

ini_set('memory_limit', '128M');

$content = trim(file_get_contents("php://input"));
 
$url_base = "https://www.akistah-creditos.com";

//Attempt to decode the incoming RAW post data from JSON.
//$content='{"datos":{"metodo":"grabar_editar_pago","idusuario":"admin.general","pagos":{"1285621":{"idpago":"1285621","idprestamo":"38908","fecha_pago":"2021-07-05","monto_pagado":10,"tipo_pago":"normal"}},"ubicacion_registro_latitud":-12.0560563,"ubicacion_registro_longitud":-77.0474293,"token":"89nm75nh788"}}';
//$content='{"datos":{"metodo":"grabar_registro_caja","idusuario":"admin.general","representantes":{"295":{"idcajainicial":12335,"idrepresentante":295,"key":"295","monto":"00.00","nombre":"Inca Yanet Rocio Hurtado"}},{"294":{"idcajainicial":12336,"idrepresentante":294,"key":"294","monto":"00.00","nombre":"LLANOS GARRIDO LEYDI"}},{"291":{"idcajainicial":12337,"idrepresentante":291,"key":"291","monto":"00.00","nombre":"BENITES MENDOZA ANGELLO DANIEL"}},{"39":{"idcajainicial":12338,"idrepresentante":39,"key":"39","monto":"12.00","nombre":"PEREZ MONROY JORGE ARMANDO"}},{"30":{"idcajainicial":12339,"idrepresentante":30,"key":"30","monto":"00.00","nombre":"DIEGO TORIBIO ENGELS IVAN"}},{"27":{"idcajainicial":12340,"idrepresentante":27,"key":"27","monto":"00.00","nombre":"FERNANDEZ QUISPE KELY"}},{"18":{"idcajainicial":12341,"idrepresentante":18,"key":"18","monto":"11.00","nombre":"LUNAREJO VASQUEZ JHOANA CONSUELO"}},{"17":{"idcajainicial":12342,"idrepresentante":17,"key":"17","monto":"00.00","nombre":"XXXXXXX XXXXXX XXXXXXXX"}},{"10":{"idcajainicial":12343,"idrepresentante":10,"key":"10","monto":"00.00","nombre":"LIVIA RIVERA DANIEL"}},"ubicacion_registro_latitud":-12.0560343,"ubicacion_registro_longitud":-77.0474238,"token":"89nm75nh788"}}';
//$content='{"datos":{"metodo":"grabar_editar_pago","idusuario":"admin.general","representantes":[{"1300795":{"idpago":"1300795","idprestamo":"38908","fecha_pago":"2021-07-14","monto_pagado":5,"tipo_pago":"normal"}}],"ubicacion_registro_latitud":-12.0563476,"ubicacion_registro_longitud":-77.0465518,"token":"89nm75nh788"}}';
$pos = strpos($content,'"data":');

// El operador !== también puede ser usado. Puesto que != no funcionará como se espera
// porque la posición de 'a' es 0. La declaración (0 != false) se evalúa a 
// false.
if ($pos !== false) {
     $content = str_replace('"data":','"datos":',$content);
} 

$decoded = json_decode($content, true);

$_POST = $decoded;



if(!$_POST || !is_array($_POST) || count($_POST) == 0){
	$a_resultado['estado'] = "0";
	$a_resultado['mensaje'] = "Faltan datos";
	$a_respuesta["resultado"] = $a_resultado;
	print json_encode($a_respuesta);
	exit;
}


$cadena_log = json_encode($_POST);



$j_datos = $_POST;

//$o_datos_post = json_decode($j_datos);

$o_datos = $j_datos['datos'];

//Array de parametros de salida
$s_token 			= "89nm75nh788";


function inicializarPagosApp($fecha, $idcolaborador, $idusuario){
  	  
  	 $con = Conexion::getConexion();
  	 
  	 $sql = "	SELECT usuario,idrol 
     			FROM cr_colaborador
     			where 1 and estado = 'A' and eliminado='0' and idcolaborador='".$idcolaborador."'
     		";
  	$resultCol = mysql_db_query(Conexion::getNameDb(), $sql, $con);
    $num_rowsCol = mysql_num_rows($resultCol);
    if($num_rowsCol>0){
    	 while ($o_valorCol = mysql_fetch_object($resultCol)) {
    	 	$usuario	 = $o_valorCol->usuario;
    	 	$idrol 		= $o_valorCol->idrol;
    	 	if($idrol == "sys.sup"){
    	 		
    	 		$sql = "SELECT idprestamo 
			            FROM cr_pr_asignar_detalle 
			            WHERE   fecha = '".$fecha."' 
			            		and idcolaborador = '".$idcolaborador."'".
			    		$where;
			  	//echo $sql;
			    $resultAD = mysql_db_query(Conexion::getNameDb(), $sql, $con);
			    $num_rowsAD = mysql_num_rows($resultAD);
				
								
				if($num_rowsAD>0){
			      while ($o_valorAD = mysql_fetch_object($resultAD)) {
				      $a_idprestamos[] = $o_valorAD->idprestamo;
			      }
			      if(is_array($a_idprestamos)){
			      	$s_idprestamos = implode(",",$a_idprestamos);
			      }
			      
			      $sql = "	SELECT idprestamo,fechainicio 
			     			FROM cr_prestamo
			     			where 1 and  estado = 'P' and eliminado='0' and idprestamo in (".$s_idprestamos.")
			     		";
					    //echo $sql;
				    $result = mysql_db_query(Conexion::getNameDb(), $sql, $con);
				    $num_rows = mysql_num_rows($result);
				    if($num_rows>0){
				      while ($o_valor = mysql_fetch_object($result)) {
				      	
			      		 $sql = "	SELECT * 
					     			FROM cr_pago
					     			where idprestamo = $o_valor->idprestamo
					     			and fechaPago='".$fecha."'
					     		";
						    //echo $sql;
						    $result2 = mysql_db_query(Conexion::getNameDb(), $sql, $con);
						    $num_rows2 = mysql_num_rows($result2);
						    if($num_rows2 == 0){
								if($fecha > $o_valor->fechainicio){
						      		$o_PagoBean = new PagoBean();
									$o_PagoBean->setIdPrestamo($o_valor->idprestamo);
									$o_PagoBean->setMontoPago("0.00");
									$o_PagoBean->setFechaPago($fecha);
									$o_PagoBean->setUsuarioCreacion($idusuario."_app");
									$o_PagoBean->setIdColaborador($idcolaborador);
									$o_PagoBean->setFechaCreacion(date('Y-m-d H:i:s'));
									$o_PagoBL = new PagoBL();
									$o_PagoBL->insertarPago($o_PagoBean);
								}
						    }	
				      	
				      	
				      }
				    }
			      
			      
			    }
    	 		
    	 	}elseif($idrol == "sys.ope"){
    	 		
    	 		$sql = "SELECT IdMercado 
     					FROM cr_mercado_representante
     					where idcolaborador  = '$idcolaborador'
		     		";
    	 		$resultRM = mysql_db_query(Conexion::getNameDb(), $sql, $con);
			    $num_rowsRM = mysql_num_rows($resultRM);
			    if($num_rowsRM>0){
			      while ($o_valorRM = mysql_fetch_object($resultRM)) {
			      		$IdMercado = $o_valorRM->IdMercado;
			      		
			      		$sql = "	SELECT idprestamo ,fechainicio
					     			FROM cr_prestamo
					     			where idcliente in (
					     				SELECT idcliente 
					     				FROM cr_cliente
					     				where idmercado = '$IdMercado'
					     			) and estado = 'P' and eliminado='0'
					     		";
						    //echo $sql;
					    $result = mysql_db_query(Conexion::getNameDb(), $sql, $con);
					    $num_rows = mysql_num_rows($result);
					    if($num_rows>0){
					      while ($o_valor = mysql_fetch_object($result)) {
					      	
				      		 $sql = "	SELECT * 
						     			FROM cr_pago
						     			where idprestamo = $o_valor->idprestamo
						     			and fechaPago='".$fecha."'
						     		";
							    //echo $sql;
							    $result2 = mysql_db_query(Conexion::getNameDb(), $sql, $con);
							    $num_rows2 = mysql_num_rows($result2);
							    if($num_rows2 == 0){

							      		if($fecha > $o_valor->fechainicio){
								      		$o_PagoBean = new PagoBean();
											$o_PagoBean->setIdPrestamo($o_valor->idprestamo);
											$o_PagoBean->setMontoPago("0.00");
											$o_PagoBean->setFechaPago($fecha);
											$o_PagoBean->setUsuarioCreacion($idusuario);
											$o_PagoBean->setIdColaborador($idcolaborador);
											$o_PagoBean->setFechaCreacion(date('Y-m-d H:i:s'));
											$o_PagoBL = new PagoBL();
											$o_PagoBL->insertarPago($o_PagoBean);
										}
							      
							    }	
					      	
					      	
					      }
					    }
			      }
			    }
		    }
		}
    }
    
     
  }

function inicializarPagos($cboMercado,$fecha, $idColaborador,$idusuario){
  	 $con = Conexion::getConexion();
    
     $sql = "	SELECT idprestamo,fechainicio
     			FROM cr_prestamo
     			where idcliente in (
     				SELECT idcliente 
     				FROM cr_cliente
     				where idmercado = '$cboMercado'
     			) and estado = 'P' and eliminado='0'
     		";
	    //echo $sql;
	    $result = mysql_db_query(Conexion::getNameDb(), $sql, $con);
	    $num_rows = mysql_num_rows($result);
	    if($num_rows>0){
	      while ($o_valor = mysql_fetch_object($result)) {
	      	
	      		 $sql = "	SELECT * 
			     			FROM cr_pago
			     			where idprestamo = $o_valor->idprestamo
			     			and fechaPago='".$fecha."'
			     		";
				    //echo $sql;
				    $result2 = mysql_db_query(Conexion::getNameDb(), $sql, $con);
				    $num_rows2 = mysql_num_rows($result2);
				    if($num_rows2 == 0){
						if($fecha > $o_valor->fechainicio){
				      		$o_PagoBean = new PagoBean();
							$o_PagoBean->setIdPrestamo($o_valor->idprestamo);
							$o_PagoBean->setMontoPago("0.00");
							$o_PagoBean->setFechaPago($fecha);
							$o_PagoBean->setUsuarioCreacion($idusuario."_app");
							$o_PagoBean->setIdColaborador($idColaborador);
							$o_PagoBean->setFechaCreacion(date('Y-m-d H:i:s'));
							$o_PagoBL = new PagoBL();
							$o_PagoBL->insertarPago($o_PagoBean);
						}
				    }	
	      	
	      	
	      }
	    }
  }


function loadPedido($idPedido){
	$con = Conexion::getConexion();
	$sql = "SELECT eliminado,estado
            FROM cr_pedido_prestamo
            WHERE 1
            AND  idpedido= '".$idPedido."'
            limit 0,1
            "
            ;
	//echo $sql;  	
	$result = mysql_db_query(Conexion::getNameDb(), $sql, $con);
	
	$num_rows = mysql_num_rows($result);
	
	
	if($num_rows>0){
     	while ($o_valor = mysql_fetch_object($result)) {
		     $a_result['estado'] = $o_valor->estado;
		     $a_result['eliminado'] = $o_valor->eliminado;
     	}
	}
	return $a_result;
}

function getGastoOperativo($fecha, $idcolaborador){
	$con = Conexion::getConexion();
	$sql = "SELECT sum(Monto) as monto
 			FROM cr_gasto_operativo
 			WHERE eliminado = -1
 				AND IdColaborador = '".$idcolaborador."'
 				AND Fecha = '".$fecha."'
 			
 		";
	//echo $sql;
	$result = mysql_db_query(Conexion::getNameDb(), $sql, $con);
	$num_rows = mysql_num_rows($result);
	if($num_rows>0){
     	while ($o_valor = mysql_fetch_object($result)) {
     		 $monto = $o_valor->monto;
		 } 
    }
    return $monto;
}

function getClienteFile($idcliente,$i_IdTipoFile,$ruta){
	$con = Conexion::getConexion();
	$sql = "SELECT * 
 			FROM cr_cliente_file
 			WHERE eliminado = -1
 				AND IdCliente = '".$idcliente."'
 				AND Idtipofile = '".$i_IdTipoFile."'
 			ORDER BY IdClienteFile desc
 			LIMIT 0,1
 		";
	//echo $sql;
	$result = mysql_db_query(Conexion::getNameDb(), $sql, $con);
	
	$num_rows = mysql_num_rows($result);
	
	
	if($num_rows>0){
     	while ($o_valor = mysql_fetch_object($result)) {
     		 $s_NombreFile = $o_valor->NombreFile;
			 $s_Destino_Negocio = $ruta.$s_NombreFile;
		 } 
    }
    return $s_Destino_Negocio;
}
function loadPrestamoDeudor($IdCliente){
	$con = Conexion::getConexion();
    $sql = "SELECT *
            FROM cr_prestamo
            WHERE 1
            AND  idcliente= '".$IdCliente."'
            AND  eliminado = '0'
            AND fechavencimiento < '".date('Y-m-d')."'
            AND Estado = 'P'
            order by FlagReporte asc
            limit 0,1
            "
            ;
	//echo $sql;  	
	$result = mysql_db_query(Conexion::getNameDb(), $sql, $con);
	
	$num_rows = mysql_num_rows($result);
	
	
	if($num_rows>0){
     	while ($o_valor = mysql_fetch_object($result)) {
     		 $a_prestamo['Tipo'] = "Cliente Deudor";
		     $a_prestamo['FechaInicio'] = $o_valor->FechaInicio;
		     $a_prestamo['FechaVencimiento'] = $o_valor->FechaVencimiento;
		     $a_prestamo['SaldoPrestamo'] = $o_valor->SaldoPrestamo;
		     $a_prestamo['InteresPorcentaje'] = $o_valor->InteresPorcentaje;
		     $a_prestamo['Mora'] = ($o_valor->SaldoPrestamo*0.1);
		     if($o_valor->FlagReporte == 1) $a_prestamo['Tipo'] .=" Moroso";
		     
		 } 
      
    }else{
		$a_prestamo['Tipo'] = "";
		$a_prestamo['FechaInicio'] = "";
		$a_prestamo['FechaVencimiento'] = "";
		$a_prestamo['SaldoPrestamo'] = "";
		$a_prestamo['InteresPorcentaje'] = "";
		$a_prestamo['Mora'] = "";
    }
    return $a_prestamo;
}

function existePedido($fechaAbierto,$idcliente){
	$con = Conexion::getConexion();
    $sql = "SELECT idpedido
            FROM cr_pedido_prestamo
            WHERE FechaTransaccion = '".$fechaAbierto."'
            AND  idcliente = '".$idprestamo."'
            AND  eliminado = '-1'
            "
            ;
	//echo $sql;  	
	$result = mysql_db_query(Conexion::getNameDb(), $sql, $con);
	
	$num_rows = mysql_num_rows($result);
	
	
	if($num_rows>0){
		return true;
    }else{ 
		return false;
	}
}

function sumaAmortizo($fechaAbierto,$idprestamo){
	$con = Conexion::getConexion();
    $sql = "SELECT sum(MontoPago) as MontoPago
            FROM cr_pago
            WHERE fechaPago = '".$fechaAbierto."'
            AND  idprestamo = '".$idprestamo."'
            AND  eliminado = '0'
            "
            ;
	//echo $sql;  	
	$result = mysql_db_query(Conexion::getNameDb(), $sql, $con);
	
	$num_rows = mysql_num_rows($result);
	
	
	if($num_rows>0){
     	while ($o_valor = mysql_fetch_object($result)) {
		      return round($o_valor->MontoPago,2);
		 } 
      
    }else return 0;
}

function subirImagen($CodTipoDocumento,$foto_archivo,$idcliente,$idusuario,$ubicacion_registro_latitud,$ubicacion_registro_longitud,$referencia){

	$size_file      = $foto_archivo['foto_archivo']['size']; //: tamaño en bytes del archivo recibido
    $type_file      = $foto_archivo['foto_archivo']['type']; //: tipo mime del archivo, por ejemplo image/gif
    $name_file      = eliminar_acento( $foto_archivo['foto_archivo']['name'] ); //: nombre original del archivo
    $dir_tmp_name   = $foto_archivo['foto_archivo']['tmp_name']; //: nombre del archivo temporal que se utiliza para almacenar en

    			        

	//BASADO EN JPEG, PARA USAR EN PNG, GIF ETC CAMBIAR EL NOMBRE DE LAS FUNCIONES
	
	
    //VALIDACION - VARIOS
    if( $size_file > 2048000 )
    {
        //throw new Exception( "No se permite Archivos mayores a 2MB." );
    }
    if( $dir_tmp_name == "" )
    {
        throw new Exception( "No se puede guardar este Archivo." );
    }
    ///////////////////////////////////

    if( strpos( strtolower( $name_file ), 'pdf' ) !== false )
    {

    }

    //SE GUARA EL ARCHIVO
    $s_DirImages = $_SERVER['DOCUMENT_ROOT']."/images/uploadFiles/";

    $prefijo = substr( md5( uniqid( rand() ) ), 0, 6 );
    $name_file     = $CodTipoDocumento."_".$prefijo."_".$name_file;
    $destino =  $s_DirImages.$name_file;
    
    
   // if (isset($foto_archivo['foto_archivo']) && $foto_archivo['foto_archivo']['tmp_name']!=''){
    if (1){
		
		$s_DirImages = $_SERVER['DOCUMENT_ROOT']."/images/uploadFiles/";
	
		//Imagen original
		$rtOriginal=$foto_archivo['foto_archivo']['tmp_name'];
		
		//Crear variable
		$original = imagecreatefromjpeg($rtOriginal);
		
		//Ancho y alto máximo
		$max_ancho = 600; $max_alto = 400;
		 
		//Medir la imagen
		list($ancho,$alto)=getimagesize($rtOriginal);
		
		//Ratio
		$x_ratio = $max_ancho / $ancho;
		$y_ratio = $max_alto / $alto;
		
		//Proporciones
		if(($ancho <= $max_ancho) && ($alto <= $max_alto) ){
		    $ancho_final = $ancho;
		    $alto_final = $alto;
		}
		else if(($x_ratio * $alto) < $max_alto){
		    $alto_final = ceil($x_ratio * $alto);
		    $ancho_final = $max_ancho;
		}
		else {
		    $ancho_final = ceil($y_ratio * $ancho);
		    $alto_final = $max_alto;
		}
		
		//Crear un lienzo
		$lienzo=imagecreatetruecolor($ancho_final,$alto_final); 
		
		//Copiar original en lienzo
		imagecopyresampled($lienzo,$original,0,0,0,0,$ancho_final, $alto_final,$ancho,$alto);
		 
		//Destruir la original
		imagedestroy($original);
		
		//Crear la imagen y guardar en directorio upload/
		
		if($type_file = "image/jpeg"){
			imagejpeg($lienzo,$destino);
		}
		if($type_file = "image/gif"){
			imagegif($lienzo,$destino);
		}
		if($type_file = "image/png"){
			imagepng($lienzo,$destino);
		}
		
		$i_Id = Cr_cliente_fileDP::getNextId();
        $o_Cr_cliente_fileDP = new Cr_cliente_fileDP();
        $o_Cr_cliente_fileDP->setIdClienteFile( $i_Id );
        $o_Cr_cliente_fileDP->setIdCliente( ( int ) $idcliente );
        $o_Cr_cliente_fileDP->setIdtipofile( ( int ) $CodTipoDocumento );
        $o_Cr_cliente_fileDP->setFileNumero( $referencia);
        $o_Cr_cliente_fileDP->setEstado( "A" );
        $o_Cr_cliente_fileDP->setNombreFile( $name_file );
        $o_Cr_cliente_fileDP->setEliminado( -1 );
        $o_Cr_cliente_fileDP->setFechaRegistro( date( "Y-m-d H:i:s" ) );
        $o_Cr_cliente_fileDP->setUsuarioRegistro( $idusuario );
        $b_Result = $o_Cr_cliente_fileDP->save();
	}
}

function eliminar_acento ( $cadena )
{
    $originales  = 'AÃN??`???????????????????????r';
    $modificadas = 'aaaaaaaceeeeiiiidnoooooouuuuybsaaaaaaaceeeeiiiidnoooooouuuyybyRr';
    $cadena = utf8_decode($cadena);
    $cadena = strtr($cadena, utf8_decode($originales), $modificadas);
    $cadena = strtolower($cadena);
    return utf8_encode( stripAccents( $cadena ) );
}
function stripAccents( $string )
{
    return strtr($string,'????????????A??????????','aaaaaceeeeiiiinooooouuuuyyAAAAACEEEEIIIINOOOOOUUUUY');
}
class array_sorter
{
    var $skey = false;
    var $sarray = false;
    var $sasc = true;

    /**
    * Constructor
    *
    * @access public
    * @param mixed $array array to sort
    * @param string $key array key to sort by
    * @param boolean $asc sort order (ascending or descending)
    */
    function array_sorter(&$array, $key, $asc=true)
    {
        $this->sarray = $array;
        $this->skey = $key;
        $this->sasc = $asc;
    }

    /**
    * Sort method
    *
    * @access public
    * @param boolean $remap if true reindex the array to rewrite indexes
    */
    function sortit($remap=true)
    {
        $array = &$this->sarray;
        uksort($array, array($this, "_as_cmp"));
        if ($remap)
        {
            $tmp = array();
            while (list($id, $data) = each($array))
                $tmp[] = $data;
            return $tmp;
        }
        return $array;
    }

    /**
    * Custom sort function
    *
    * @access private
    * @param mixed $a an array entry
    * @param mixed $b an array entry
    */
    function _as_cmp($a, $b)
    {
        //since uksort will pass here only indexes get real values from our array
        if (!is_array($a) && !is_array($b))
        {
            $a = $this->sarray[$a][$this->skey];
            $b = $this->sarray[$b][$this->skey];
        }

        //if string - use string comparision
        if (!ctype_digit($a) && !ctype_digit($b))
        {
            if ($this->sasc)
                return strcasecmp($a, $b);
            else
                return strcasecmp($b, $a);
        }
        else
        {
            if (intval($a) == intval($b))
                return 0;

            if ($this->sasc)
                return (intval($a) > intval($b)) ? -1 : 1;
            else
                return (intval($a) > intval($b)) ? 1 : -1;
        }
    }

}//end of class

function consultarAsistencia($idColaborador,$fechaAsistencia){
										
	$con = Conexion::getConexion();
    $sql = "SELECT *
            FROM cr_asistencia
            WHERE idcolaborador = '".$idColaborador."'
            AND  Fecha = '".$fechaAsistencia."'
            AND  eliminado = '-1'
            "
            ;
	//echo $sql;  	
	$result = mysql_db_query(Conexion::getNameDb(), $sql, $con);
	
	
    $num_rows = mysql_num_rows($result);
	
	$a_filtro['idcolaborador'] = "";
	
	if($num_rows>0){
      return true;
      
    }
    return false;
}

function obternerColaboradorxUsuario($idusuario){
										
	$con = Conexion::getConexion();
    $sql = "SELECT *
            FROM cr_colaborador
            WHERE usuario = '".$idusuario."'
            AND  eliminado = '0'
            "
            ;
	//echo $sql;  	
	$result = mysql_db_query(Conexion::getNameDb(), $sql, $con);
	
	
    $num_rows = mysql_num_rows($result);
	
	
	if($num_rows>0){
     	while ($o_valor = mysql_fetch_object($result)) {
		      return $o_valor->IdColaborador;
		 } 
      
    }
    return false;
}


function guardar_log($cadena_log,$usuario,$metodo){
	
	$con = Conexion::getConexion();
    $sql = "INSERT INTO 
            cr_wslog
            (idlog,cadena,fecharegistro,usuario,metodo)
            values
            (null,'".$cadena_log."',now(),'".$usuario."','".$metodo."')"
            ;
	//echo $sql."<br><br>";  	
	$result = mysql_db_query(Conexion::getNameDb(), $sql, $con);
}

function registrarHuella($idcliente,$idusuario){
	
	$con = Conexion::getConexion();
    $sql = "INSERT INTO 
            cr_cliente_huella
            (idclientehuella,idcliente,idusuario,fecharegistro)
            values
            (null,'".$idcliente."','".$idusuario."',now())"
            ;
	//echo $sql;  	
	$result = mysql_db_query(Conexion::getNameDb(), $sql, $con);
}



function getColaboradorxCliente($idcliente){
	//Para asignar el colaborador por el mercado donde esta asignado el idcliente
  	$o_ClienteBean = new ClienteBean();
  	$o_ClienteBean->setIdCliente($idcliente);
  	
  	$o_ClienteDP = new ClienteDP($o_ClienteBean);
  	$a_clientes = $o_ClienteDP->select();
  	if(is_array($a_clientes)){
  		foreach ($a_clientes as $key => $o_cliente){
  			$idMercado = $o_cliente->getIdMercado();
  		}
  	}
	
  	$o_MercadoRepresentanteBean = new MercadoRepresentanteBean();
  	$o_MercadoRepresentanteBean->setIdMercado($idMercado);
  	$o_MercadoRepresentanteDP = new MercadoRepresentanteDP($o_MercadoRepresentanteBean);
  	$a_MercadoRepresentante = $o_MercadoRepresentanteDP->select();
  	if(is_array($a_MercadoRepresentante)){
  		foreach ($a_MercadoRepresentante as $key => $o_MercadoRepresentante){
  			$IdColaborador = $o_MercadoRepresentante->getIdColaborador();
  		}
  	}
  	return $IdColaborador;

  	//
}

function multi_sort(&$array, $key, $asc=true)
{
    $sorter = new array_sorter($array, $key, false);
    return $sorter->sortit();
}

function getFiltroCobranza($o_user,$fechaDiaAbierto,$idmercado=''){
	
	$a_filtro['idprestamos'] 	= '';
	$a_filtro['idcolaborador'] 	= '';
	
	
	$o_crColaboradorBean = new ColaboradorBean();
	$o_crColaboradorBean->setUsuario($o_user->getUserId());
	$o_crColaboradorDP = new ColaboradorDP($o_crColaboradorBean);
	$a_o_crColaboradorDP = $o_crColaboradorDP->select();
	if(is_array($a_o_crColaboradorDP) && count($a_o_crColaboradorDP)){
		$a_filtro['idcolaborador'] = $a_o_crColaboradorDP[0]->getIdColaborador();
	}
	
	if($o_user->getUserRoleId() == "sys.sup"){ 
		if($idmercado) $where = "and idmercado = '".$idmercado."'";
		$con = Conexion::getConexion();
	    $sql = "SELECT idprestamo 
	            FROM cr_pr_asignar_detalle 
	            WHERE   fecha = '".$fechaDiaAbierto."' 
	            		and idcolaborador = '".$a_o_crColaboradorDP[0]->getIdColaborador()."'".
	    		$where;
	  	//echo $sql;
	    $result = mysql_db_query(Conexion::getNameDb(), $sql, $con);
	    $num_rows = mysql_num_rows($result);
		
		$a_filtro['idcolaborador'] = "";
		
		if($num_rows>0){
	      while ($o_valor = mysql_fetch_object($result)) {
		      $a_idprestamos[] = $o_valor->idprestamo;
	      }
	      $a_filtro['idprestamos'] 	= $a_idprestamos;
	      
	    }
	    //print_r($a_idprestamos);

	}
	
	if($o_user->getUserRoleId() == "sys.res"){ 
		$a_filtro['idcolaborador'] = '';
	}
	
	return $a_filtro;
	
}

function is_valid_email($str)
{
  $matches = null;
  return (1 === preg_match('/^[A-z0-9\\._-]+@[A-z0-9][A-z0-9-]*(\\.[A-z0-9_-]+)*\\.([A-z]{2,6})$/', $str, $matches));
}

function sucursalMercado($o_user,$idmercado='',$idcolaborador=''){
	if($o_user->getUserRoleId() == "sys.ope"){ 
		$IdColaborador			  	= $o_user->getIdColaborador();
		
		$IdAdministrador	  		= $o_user->getIdParent();
		$o_ObjectBean 	= new SucursalBean();
		if($IdAdministrador)		$o_ObjectBean->setIdAdministrador($IdAdministrador);
		
		$o_class 					= new SucursalBL();
		$a_ObjectBean 				= $o_class->busquedaSucursal($o_ObjectBean);
		
		if(count($a_ObjectBean)>0){
	    	foreach ($a_ObjectBean as $iKey => $o_objBean){
	    		$a_user['idsucursal'] = $o_objBean->getIdSucursal();
	    		$a_user['sucursal'] = $o_objBean->getDescripcion();
	    	}
	    }
	    $o_MercadoRepresentante = new MercadoRepresentanteBean();
		$o_MercadoRepresentante->setIdColaborador($IdColaborador);
		$o_MercadoRepresentanteBL = new MercadoRepresentanteBL();
		$a_o_repmer = $o_MercadoRepresentanteBL->busquedaMercadoRepresentanteDetalle($o_MercadoRepresentante);
		
		foreach ($a_o_repmer as $key => $o_repmer){
			
			
			$o_MercadoBean = new MercadoBean();
			$o_MercadoBean->setIdMercado($o_repmer->getIdMercado());
			$o_MercadoDP = new MercadoDP($o_MercadoBean);
			$a_MercadoDP = $o_MercadoDP->select();
			foreach ($a_MercadoDP as $key => $o_MercadoDP){
				$a_user['idmercado'] 	= $o_MercadoDP->getIdMercado();	
				$a_user['mercado'] 		= $o_MercadoDP->getDescripcion();	
			}
		}
		$a_idColaborador[] = $IdColaborador;
		$a_user['idcolaboradores'] 	= $a_idColaborador;
	}elseif($o_user->getUserRoleId() == "sys.res"){ // Detectar Sucursal y Mercado si es Administrador de Sucursal
		$IdAdministrador	  		= $o_user->getIdColaborador();
		
		if($idmercado){
			$o_MercadoRepresentanteBean = new MercadoRepresentanteBean();
			$o_MercadoRepresentanteBean->setIdMercado($idmercado);
			$o_MercadoRepresentanteDP = new MercadoRepresentanteDP($o_MercadoRepresentanteBean);
			$a_o_MercadoRepresentanteDP = $o_MercadoRepresentanteDP->select();
			foreach ($a_o_MercadoRepresentanteDP as $key => $o_MercadoRepresentanteBean){
				$idcolaboradores[] = $o_MercadoRepresentanteBean->getIdColaborador();
			}
		}
		
		
		$idPadre = $IdAdministrador;
		//Busco sus hijo
		$a_idColaborador[] = "x";
		$o_ColaboradorBean_Temp = new ColaboradorBean();
	  	$o_ColaboradorBean_Temp->setIdPadre($idPadre);
	  	$o_ColaboradorBean_Temp->setIdColaboradores($idcolaboradores);
		$o_ColaboradorDP_Temp = new ColaboradorDP($o_ColaboradorBean_Temp);
		$a_o_idColaborador = $o_ColaboradorDP_Temp->select();
		if(is_array($a_o_idColaborador)){
			foreach($a_o_idColaborador as $key => $o_idColaborador){
				$a_idColaborador[] = $o_idColaborador->getIdColaborador();	
			}
		}
		
		
		$o_ObjectBean 				= new SucursalBean();
		$o_ObjectBean->setIdAdministrador($IdAdministrador);
				
		$o_class 					= new SucursalBL();
		$a_ObjectBean 				= $o_class->busquedaSucursal($o_ObjectBean);
		
		if(count($a_ObjectBean) > 0){
	    	foreach ($a_ObjectBean as $iKey => $o_objBean){
	    		$a_user['idsucursal'] = $o_objBean->getIdSucursal();
	    		$a_user['sucursal'] = $o_objBean->getDescripcion();
	    		$o_SucursalMercadoBean = new SucursalMercadoBean();
	    		$o_SucursalMercadoBean->setIdSucursal($o_objBean->getIdSucursal());
	    		$o_SucursalMercadoBean->setIdMercado($idmercado);
				$o_SucursalMercadoBL = new SucursalMercadoBL();
				$a_o_sucursalmercado = $o_SucursalMercadoBL->busquedaSucursalMercadoDetalle($o_SucursalMercadoBean);
				if(is_array($a_o_sucursalmercado)){
					foreach ($a_o_sucursalmercado as $key => $o_sucursalmercado){
						$a_IdMercados[] = $o_sucursalmercado->getIdMercado();
					}
				}
	    	}
	    }
		
		$a_user['mercado'] 		= "";
		$a_user['idmercado'] 	= "";
		$a_user['idsmercados'] 	= $a_IdMercados;
		$a_user['idcolaboradores'] 	= $a_idColaborador;
		
	}elseif($o_user->getUserRoleId() == "sys.sup"){ // Detectar Sucursal y Mercado si es Administrador de Sucursal
		$IdColaborador			  	= $o_user->getIdColaborador();
		
		$o_ColaboradorBean_Temp = new ColaboradorBean();
	  	$o_ColaboradorBean_Temp->setIdColaborador($IdColaborador);
		$o_ColaboradorDP_Temp = new ColaboradorDP($o_ColaboradorBean_Temp);
		$a_o_idColaborador = $o_ColaboradorDP_Temp->select();
		if(is_array($a_o_idColaborador)){
			foreach($a_o_idColaborador as $key => $o_idColaborador){
				$idPadre = $o_idColaborador->getIdPadre();	
			}
		}
		//Busco sus hijo
		$o_ColaboradorBean_Temp = new ColaboradorBean();
	  	$o_ColaboradorBean_Temp->setIdPadre($idPadre);
		$o_ColaboradorDP_Temp = new ColaboradorDP($o_ColaboradorBean_Temp);
		$a_o_idColaborador = $o_ColaboradorDP_Temp->select();
		if(is_array($a_o_idColaborador)){
			foreach($a_o_idColaborador as $key => $o_idColaborador){
				$a_idColaborador[] = $o_idColaborador->getIdColaborador();	
			}
		}
		
		
		$IdAdministrador	  		= $o_user->getIdParent();
		$o_ObjectBean 	= new SucursalBean();
		if($IdAdministrador)		$o_ObjectBean->setIdAdministrador($IdAdministrador);
		
		$o_class 					= new SucursalBL();
		$a_ObjectBean 				= $o_class->busquedaSucursal($o_ObjectBean);
		
		if(count($a_ObjectBean)>0){
	    	foreach ($a_ObjectBean as $iKey => $o_objBean){
	    		$a_user['idsucursal'] = $o_objBean->getIdSucursal();
	    		$a_user['sucursal'] = $o_objBean->getDescripcion();
	    		$o_SucursalMercadoBean = new SucursalMercadoBean();
	    		$o_SucursalMercadoBean->setIdSucursal($o_objBean->getIdSucursal());
				$o_SucursalMercadoBL = new SucursalMercadoBL();
				$a_o_sucursalmercado = $o_SucursalMercadoBL->busquedaSucursalMercadoDetalle($o_SucursalMercadoBean);
				if(is_array($a_o_sucursalmercado)){
					foreach ($a_o_sucursalmercado as $key => $o_sucursalmercado){
						$a_IdMercados[] = $o_sucursalmercado->getIdMercado();
					}
				}
	    	}
	    }
		$a_user['idmercado'] 	= "";
		$a_user['idsmercados'] 	= $a_IdMercados;
		$a_user['idcolaboradores'] 	= $a_idColaborador;
	}elseif($o_user->getUserRoleId() == "sys.gen"){									
		$a_user['sucursal'] = "";
		$a_user['mercado'] 	= "";
	}
	return $a_user;
}

function validarHuellaColaborador($idusuario,$huella){
	return true;
}
function validarHuellaCliente($idcliente,$huella){
	return true;
}

function mostrar_error($val,$mensaje){
	return $mensaje[$val];
}

function fechaDiaAbierto($idusuario){
	$o_crColaboradorBean = new ColaboradorBean();
	$o_crColaboradorBean->setUsuario($idusuario);
	
	$o_crColaboradorDP = new ColaboradorDP($o_crColaboradorBean);
	$a_o_crColaboradorDP = $o_crColaboradorDP->select();
	
	if(is_array($a_o_crColaboradorDP) && count($a_o_crColaboradorDP)){
			$idColaborador 		= $a_o_crColaboradorDP[0]->getIdColaborador();
			$fechaDiaAbierto 	= $o_crColaboradorDP->getFechaTransaccion($idColaborador);
	}
	return $fechaDiaAbierto;
}

$metodo 	= $o_datos['metodo'];
$usuario 	= $o_datos['usuario'];
if($o_datos['idusuario']) $usuario 	= $o_datos['idusuario'];

guardar_log($cadena_log,$usuario,$metodo);

if( ($o_datos['metodo'] != "estado_cuenta") && (($o_datos['ubicacion_registro_latitud'] == "0.0" || $o_datos['ubicacion_registro_latitud'] == '') && ($o_datos['ubicacion_registro_longitud'] == "0.0" || $o_datos['ubicacion_registro_longitud'] == ''))){
		//if(0){
			$a_resultado['estado'] = "666";
			$a_resultado['mensaje'] = "Es necesario que el GPS este activado para realizar cualquier operacion a traves del aplicativo.";
			$a_respuesta["resultado"] = $a_resultado;
			
}else{
	if($s_token == $o_datos['token'])
	{
		$idusuario 	= $o_datos['usuario'];
		if(!$idusuario) $idusuario = $o_datos['idusuario'];
		$o_user 		= new user_class();
		if ($o_user->findUser($idusuario)){
		
		
			
		
		
			switch ($o_datos['metodo']){
			    case "validar_cliente":
					$tipo_documento		= $o_datos['tipo_documento'];
					$numero_documento	= $o_datos['numero_documento'];
					$o_user 	= new user_class();
					if ($o_user->findUser($idusuario)){
		                if($tipo_documento != ""){				
    						switch ($tipo_documento){
    						        case "RUC":
    									$a_resultado['tipo_documento'] 		= $tipo_documento;
    									$a_resultado['numero_documento'] 	= $numero_documento;
    									if(rucValido($numero_documento)){
    										if(strlen($numero_documento) == 11){
    											$o_ObjectBean = new ClienteBean();
    											$o_ObjectBean->setDni($numero_documento);
    											
    											$o_class = new ClienteBL();
    											$a_ObjectBean = $o_class->busquedaCliente($o_ObjectBean);
    											
    											$existe_cliente = false;
    												
    											if(is_array($a_ObjectBean)){
    												$existe_cliente = true;
    												$ObjectBean = $a_ObjectBean[0];
    												$idcliente = $ObjectBean->getIdCliente();
    												$a_resultado['estado'] = "0";
    												$a_resultado['mensaje'] = "Existe el cliente con documento: ".$numero_documento." con codigo: ".$idcliente;
    											}else{
    												$a_resultado['estado'] = "1";
    												$a_resultado['mensaje'] = "Exito";
    											}
    										}else{
    											$a_resultado['estado'] = "0";
    											$a_resultado['mensaje'] = "El documento: ".$numero_documento." debe tener 11 digitos.";
    										}
    									}else{
    										$a_resultado['estado'] = "0";
    										$a_resultado['mensaje'] = "El documento RUC: ".$numero_documento." es invalido.";
    									}
    									break;
    						        case "CARNET_EXTRANJERIA":
    									$a_resultado['tipo_documento'] 		= $tipo_documento;
    									$a_resultado['numero_documento'] 	= $numero_documento;
    									
    									$o_ObjectBean = new ClienteBean();
    									$o_ObjectBean->setDni($numero_documento);
    									
    									$o_class = new ClienteBL();
    									$a_ObjectBean = $o_class->busquedaCliente($o_ObjectBean);
    									
    									$existe_cliente = false;
    										
    									if(is_array($a_ObjectBean)){
    										$existe_cliente = true;
    										$ObjectBean = $a_ObjectBean[0];
    										$idcliente = $ObjectBean->getIdCliente();
    										$a_resultado['estado'] = "0";
    										$a_resultado['mensaje'] = "Existe el cliente con documento: ".$numero_documento." con codigo: ".$idcliente;
    									}else{
    										$a_resultado['estado'] = "1";
    										$a_resultado['mensaje'] = "Exito";
    									}
    									break;
    								case "DNI":
    									
    									if(strlen($numero_documento) == 8){
    										//Buscar en la base de datos de los clientes el documento
    										
    										///
    										$o_ObjectBean = new ClienteBean();
    										$o_ObjectBean->setDni($numero_documento);
    										
    										$o_class = new ClienteBL();
    										$a_ObjectBean = $o_class->busquedaCliente($o_ObjectBean);
    										
    										$existe_cliente = false;
    										
    										if(is_array($a_ObjectBean)){
    											$existe_cliente = true;
    											$ObjectBean = $a_ObjectBean[0];
    										}
    										///
    										
    										if(!$existe_cliente){
    											$o_CrBusquedaFN = new CrBusquedaFN();
    											$o_CrBusquedaFN->setTipobusqueda("RENIEC");
    											$o_CrBusquedaFN->setDocumento($numero_documento);
    											$o_CrBusquedaFN->setEstado("P");
    											$a_o_CrBusquedaFN = $o_CrBusquedaFN->select();
    									
    											$existe_busqueda_pendiente = 0;
    											
    											if(is_array($a_o_CrBusquedaFN) && count($a_o_CrBusquedaFN)){
    												$o_CrBusquedaBN = $a_o_CrBusquedaFN[0];
    												$json = $o_CrBusquedaBN->getTramaresultado();
    												$existe_busqueda_pendiente = 1;
    											   // print_r($o_CrBusquedaBN);
    											}else{
    											    
    												//$url = "https://rest.softdatamen.com/v1/b6816093f178e9d82d04e929a8ad5bfd/reniec?dni=".$numero_documento;
    												//$url = "reniec.softdhttps://atamen.com/api/reniec/dni/".$numero_documento."?api_token=$2y$10$yDyLb7t3v0vollkC50F.9e7EXRotlnfpp0tBy9ou5Et.PYFUlWmb5";
    												//$result = curl_get_contents($url);
    												$result  = curl_get_contents_alternativo($url,$numero_documento);
    												
    												//$result = 1;
    												if($result){
    													$json = $result;
    													//Json de Prueba
    													/*
    													$json ='{
    														    "success": true,
    														    "result": {
    														        "id_reniec": "135704",
    														        "num_doc": "06788977",
    														        "verificacion": "6",
    														        "sexo": "MASCULINO",
    														        "sexo_abr": "M",
    														        "estado_civil": "SOLTERO",
    														        "estado_civil_abr": "S",
    														        "apellido_paterno": "SOTOMAYORX",
    														        "apellido_materno": "DE LA CRUZ",
    														        "nombres": "MARCO ANTONIO",
    														        "ubi_nac_depa": "14",
    														        "ubi_nac_prov": "01",
    														        "ubi_nac_dist": "04",
    														        "fecha_nacimiento": "1974-07-13",
    														        "ubi_dir_depa_desc": "LIMA",
    														        "ubi_dir_prov_desc": "LIMA",
    														        "ubi_dir_dist_desc": "BREÑA",
    														        "dir_nombre": "AV.TINGO MARIA 791-202",
    														        "gvotacion": null,
    														        "fecha_emision": "2012-03-31",
    														        "fecha_inscripcion": "1999-12-09",
    														        "fecha_caducidad": "2020-03-31",
    														        "donante": "NO",
    														        "edad": "47",
    														        "ocr1": "I<PER06788977<6<<<<<<<<<<<<<<<",
    														        "ocr2": "7407136M2003315PER<<<<<<<<<<<9",
    														        "ocr3": "SOTOMAYOR<<MARCO<ANTONIO<<<<<<"
    														    },
    														    "images": {
    														        "foto": "\/9j\/4AAQSkZJRgABAQEAYABgAAD\/2wBDAAcFBQYFBAcGBQYIBwcIChELCgkJChUPEAwRGBUaGRgVGBcbHichGx0lHRcYIi4iJSgpKywrGiAvMy8qMicqKyr\/2wBDAQcICAoJChQLCxQqHBgcKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKir\/wAARCADgAKADASIAAhEBAxEB\/8QAHwAAAQUBAQEBAQEAAAAAAAAAAAECAwQFBgcICQoL\/8QAtRAAAgEDAwIEAwUFBAQAAAF9AQIDAAQRBRIhMUEGE1FhByJxFDKBkaEII0KxwRVS0fAkM2JyggkKFhcYGRolJicoKSo0NTY3ODk6Q0RFRkdISUpTVFVWV1hZWmNkZWZnaGlqc3R1dnd4eXqDhIWGh4iJipKTlJWWl5iZmqKjpKWmp6ipqrKztLW2t7i5usLDxMXGx8jJytLT1NXW19jZ2uHi4+Tl5ufo6erx8vP09fb3+Pn6\/8QAHwEAAwEBAQEBAQEBAQAAAAAAAAECAwQFBgcICQoL\/8QAtREAAgECBAQDBAcFBAQAAQJ3AAECAxEEBSExBhJBUQdhcRMiMoEIFEKRobHBCSMzUvAVYnLRChYkNOEl8RcYGRomJygpKjU2Nzg5OkNERUZHSElKU1RVVldYWVpjZGVmZ2hpanN0dXZ3eHl6goOEhYaHiImKkpOUlZaXmJmaoqOkpaanqKmqsrO0tba3uLm6wsPExcbHyMnK0tPU1dbX2Nna4uPk5ebn6Onq8vP09fb3+Pn6\/9oADAMBAAIRAxEAPwD6RooooAKKKKACiiigAorB8TeMtH8J2vm6rcYcjKwpy7fhXmWp\/H9lZhpejrtzhXnkJJ\/AU1FsD2uivmm6+MXia\/dit8bcYOViVVx\/WsmT4o+KRktqlzt6ZD8\/jV8nmOx9WUV8xaV8X\/EenSJJJetcRt1Eg3fgQa9M8LfG7SNUcQa0osZScCVclD9fSpcQsz1Gio7e4huoEntpUlicZV0bII9jUlSIKKKKACiiigAooooAKKKKACiiigBCQoJJAA6k9q8k+IXxjh0oSaf4ZljluR8rXJGVX12+v1ra+KfjWDQ9HbS7Scfb7kYZV5Maep+vSvmS+lae9d92Sx6VaSSuwWpPqOs3uq3cl3qFzJPLKeWdsk1V83yz8mGU9sn+dXbDQL2+TcsZRT3I61uQeB3OC8pyeoI6iodRJ7m0aUn0OSaVmbLgEjv3pdjSsSEZjjOOuK7SLwUschJJI960oPDEaA7YxnuwHWpdWJoqEjzhgygjByOtCSmJuOh65Nei3\/hOOV\/NQYOMEY61zt34UnMp8oe7Z601VQnSkifwt8QNe8NOE0++dYc8xudy\/ka+gvAvxHs\/FEPkXjxW98q7toOFceor5qm8OXMfEasxzjp1p1lfal4bu87GweCDnHNUmpGUotbo+ywQRkEEH0oryn4S+PYr\/RmtdYvEjkV8RGV8ZHcc16okiSIHjZXU9GU5BpGY6iiigAooooAKKKKACuY8deLYfCXh97jcDeSgpbxnu3r9BXTk4GTXzR8TPEH\/AAkXii+mM2ba0zBbKDlSAeT9SaqKu7sDiNa1W81rUnlmd5biZ8sxPLNXUeHvBJW2W5vk3SNghT\/DVTwPoP2m7+3XI+RD8oPrXpe0KoUdBxjtWNWodNOBnW+nxwoE2DGPwq4I1PyhQAPapgoMeMD0zUiQbuQCa4ZNs742sQeQCOBzT0tgG6AfQVcSD0zmnNEw7fhU62LTRQmgBB44PtVQ2qFjlRj6da15F9smoDBwcZz2zQ2wsZ8djDyQg5qG50CzvIWSaJWB61qiMgA+ntTunStacmtTGokzybxD4WuNFkNzY7jCnzFc521teB\/ipqnh65jhmma5tP44ZG4\/D0NdlfW0d1btHIAQexFeP+JtHbSdUIQEROcr7V3RkmcE4WPr\/RtXtNd0mDULB98My5Hqp7g+9Xq+fvg94yfStQi069kP2O8OzLfwOOh\/pX0D2qmZNWCiiikIKKKKAMTxnqg0bwbqd8X2GO3YIf8AaPA\/U18oL+9TyzlpHbJPpX0H8b7x7fwCsKNtFxdIj\/QZP9K+fNPlV7pDk5BAIxV\/ZKjuel+GrZbTTERcZA5962QcuBk9c4rE0iUNCqgn61toSSBnNedU0VjugTxqCBx0q7FGSMAdeKrRoFUDPXk1aR2AwAPWs0blhYTnP8qm+ylvmHHHSo45DuBJ59KvLLlenatEkxXZmPbEMQR3\/OmGDBxge9XZXOPcVXLk9uSKiUUNNlVoxjA7VUm44xVt3wSPWqs5BGMVncpoqsc+1cT4+s1msRMpG+P1rtJCRmuT8WAy2bpg8j0rqpyd0c9RI4jTr+e2eCT5QUkB75PvX17oF+up+H7G9U5E0Ct+OOa+RFtmkiKtxj5QfWvpP4Q3TXHw9tldy\/kyOgyeg64\/Wu1o4ZHcUUUVJAUUUUAeWfHskeDrIAZU3fJ9PlNfPdtN5JkYsQFPGOxr6c+MOnPqHw9uWixvtpFlGfyP86+V5i4yN2QTn8aroVFnpHhO\/wDtsGVJyg5967a2Utjd07ZrgfBsJstHM0g+98wHrzXVQao5KuUKqMnpXFKNzsTsdNDBuAIzirsVopxkYrmpPE0VjCoRTKx7dKfB46jaRY5rR13DAZSCKap2RfM2dR9iycgkYP508RsAcGqlrrMF2oKDGfetJJEZQy0cqHdkJgJABGaQWoBOQKleZYnJJxmqF\/rkVoAWXP0NDiguxZrPdkAY4rMmttgIINV7jxjHkiKBuO5NQnWvtqAqpA+nSp9mmPmaGXWFBx61wnjG+aBVUE\/P+ldlc3QXPUnqcGuF8dxB7eKcA4BrSnGzM5u6Of065LzNJITtyOPrX0R8Fif+EQuBj5PtR2n1+UV8ywOyjEZwSecdq+pfg7atbfDizZxgzSPJ9QTgfyrqb0OOWx3VFFFSQFFFFAGX4mtBfeFtStiu7zLd+PU4zXxxcQkaiIyuBvweMYr7ZlCmJg5AXac59K+Q9Xs4T4ju\/KfeiTMVZeR96n9kqO56Do1gg023+XjaCK1Ll7axgMk6jLdAOpp+nx+Xp8I5+WMckVg+IrSfU5BbqxSPPzMOuPSuR2Wh3QV2QXXi\/SbZvKuHA3HhUj3k\/wBKbZ3ml6uJGspP9WcHMe3BPSma34Tt9YtbNLAi2uLUBB8vDD1+tb\/hLwwnh3S7hZU+13FwQWYjA46cVpyprcak09UVrcNp7qQSuO2eDXYaXceZbA881zOqQSwxIJQq5JKqDnGf6VvaVH5doq9wtc7bTNpK6uM1a\/Ece1SMngVzF1m5QvMxYD1OAK0NUQ\/bVPOOat2tquInlhWSJegzj86d23YdlGNzkl1\/SdKu\/IuGVJAMkeSWIFbNj4q0y7QiIxyRnjcg5H1FZ\/jbwbLquptqGlOkbSIEkRzjjGOD6VnyeD4tP8Pxwwyg6hGxfzU4GT2962cElozGM+Z6o7G5t4J4t8QGCOCK4\/xhZBtAkJUnbWz4fuLprf7PdR7dijknqaf4ngEnh66UjkITSpu5FRcrPHtMt5Lq+jgiBZ5CAFA5zX2R4f08aX4dsLFV2+RbohHvjn9a+Y\/hXYR3nxH09ZMeWsm459hkD86+ra6DjkFFFFBAUUUUAVNTRpNKuUQ4ZoiB+VfN\/jHTBYarCNgRXOCF6E19MygtE6jqVIrxnxrojXvl3Y5a3mB2eo71EjakW7ZM2UQHQqPwpHtd\/wAxXr0OKmtQGtouB90CtJI1dACO1c81qddN2M21tAsvAwa2gipBl2yF6D1pscSoc+9Eq5Tc3IHalCXKXJcxzeoJ515luc849K2dNGIRx2rGmcG9YYOScVv2MOIxgmpau9S+hjajCGuM56HvU+nYIKsDtqTVE8tt2MnNRadIfObaeM0O6Y90az248nAOQRWbdaep\/gH1rVRxjkdKWRFYZqm7maujBFosYzjH4VT1yDfod0fWMgH8K6GVVEZ5rA13nSpkU8spWqpKzMqjucR4R0todQN7CuNkoAGcdRnNfRmiXUt5pEMtx\/rMYY+uO9eS+F9HkttL3kcswJ9+BXrWhDGkx8YySa0g25MzrJKCNGiiitjkCiiigArzjxS0kd7NFsyA+eB2Nej1zHifTC8ovI+hG18ComnbQ0ptKWpxls4VQBxtPStKKUbPw6isyRDb3jLngEVNG5xyeOtYTZ1wNRZNxGcVJMP3RPoKoRTc+lSXV2Nnlqe3JrNM2sc7e6tHYXCyXVu\/kHlp1GQv1HWus0y7t3sxKGDq4BBB4Nc2V3FoWUSRsc4YZFT29lcWsISyCiI\/wN0X6e1addBytsM8Ua\/Z6Wi+aDK8pwkSfeapNDnFyUZ4GgZxyjdRUMujRx3C3l0izTEfeYZ2j2qa2kYXhlZz6KOgApS7jVrWRuyx4Qkde1VHuCEKng+oqdLtZo8dGFZ1y3zEjqazb7CHSzgp1yazb0LK6K3QHJqVpMDmmwRG6vAm3cAMnPpWkHozKS1NDSLlfs7Ig+8eOPyr0ewh+z2EMXdUGfrXJaDorXN8twyeXbxNnaOjEdK7WtaUWlqc1eSbsgooorY5wooooAKRlDKVYAg9QaWigDlPEvhuBraS9s1KSIMso6EVxqPwB\/WvW5EEkTIwyGBBryi9tWtNQlhZcGN8frWNSJ00ZdBTJtXcCR1qtJK8zgKePWnlcoeAcVQubyWBSIISx9elYWR1ptl0lIQrSMNw5rQtdUtniPzhSOxrh2a9upMzuU\/3eorTttKfygVuWGRk7hVpM15I21N+61i0lKxAnOOWxwKgaIFd0TDnnIrDn0kxZZ7l+fQVWtLi+trjZETKjdm7UpKQOnG2h0kczxEBj0NS3EgbkEZPNZ0U0sy4lQKetW5Dwv0qLK5k21uQsdx612fhDQY5LX7fc\/Nv4RO2B61yMMDzSpFGpLOcACvV9OtRZadBbj\/lmgB+vetqaOWtKy0J0RUQKihVHQAU6iiug5QooooAKKKKACiiigArh\/GloIb9LlQAJl+bjuK7iuP8fPstrQ9txz9KT2Lg\/eOORsNt65prFdxyOh6VFkM+R0PSniMuc5rimejAkMMUi52jJ9qpzw3ScQHC\/StCKIL3q6I1K5NEG2zRuxiwWk7J\/pDbgKk2Rq+FUD8K1XjATkYqi8G59w6VM7rQcXciUrk8U7fubpwKay4JqLzVjBZ8gA04LUymzrfBenmfUXupF+SBcL\/vGu8rnPA6\/wDEgMhHMkpJro67YqyPOm25BRRRVEBRRRQAUUUUAFFFFABXF\/EKQCC1jzzknFdk7hFyfwFec+Mbh59QTf2JAHpipk7JmlNXkjlElMXysTgdDVuC5RiMNmqtzBhd4GABzisqRZ423WzYI5wRxXLJpo70mmdSko3deKtpcoB82MfzrjTqt\/EuHsZXA\/ii+amf29dEHGn3rHHaE0otrYbTZ2c12hGBgVTacBelc3Hqeoy8R6VdZ6ksoUH8Saa02qOcSIIlPUZyaJe9uCTRuTXIDYzzVYsZZc9QOg96owhg2CSznrmtGOPy1C56UrqKshWb3PVvCKBPDVttOc5J\/Otuub8HzBdGiTOByefXNdJ2rtjsedL4mFFFFMkKKKKACijOBTPMGaAHEgDJOBUMlyq8INxps0hZSB0qADqT17U0BLHukLNIe2BXnPi5wmuxQ5XdtZsd8Zr0qIYg7V5J8QXa28cWrEHY9uRn1OelZVfgZvh1eoiF13QkYPAxWeiL5jAj860oj5sSnOciqE9uYp2xnBFcNz0LamhaBOhAzWskEbIMCsCAlD0OK1re7+UZbgU4vUGuxangQQngE4rAvigOBzWpd3yiIgEVzs0jSzYyeuenWnKSuCTJbKHdJ5hH1qy+FPFSWkJSLJz75qvdSbAx9OmKzuDR6F4Qbfp0QycFf6108FwG\/ducMvHPeuC+F9zJdaXN5hyI52VfpXZ3seyQOvQ16VN3ijzKitNo0qKqWlzuGxzz2NW6ozCiiigCEksw\/A0Yx1H1oUjPTqKUk85HFAFeUDAHvSY4wO1KzBpQV7CpFUZpgOiJ8vBrzH4q2n+l2F2ACVLIcfhivToxiM5HINcl4904X2gyMAHaEhx6gDrWc1eLRrRly1Ezg9Pk+VdwxwKtXUQdN4BNV7eErGDxgCrkZEkJPJrztj1XuRwRbk+napHjIACjFJCfLYhhVhim0c\/SmSZ0kTSfezioobfdcgdh1q9LIiLhSCfSmwRFUMj9T7VLKVx8jhExnHFYt4xckc8itRgZGI7e1UngDznjgCp3BHXfCnA0u4jAIZZ23fiBXf3Cb4DjtXHfDy2WDTZSD8zykt\/Su3IyvPevSpfAjyqzvUZkcqwIPT3rQguNyDdz71TmUByKktGGSjVsZGgGBGQaWosDqMinB+cZzSARBgA+1KxCoT2FIpBUY9B3qOdjtKgjk+tAESfM5Y9zVhRkg8VDGOccH8anQcc4zTYCkYHSs\/VrQ3WnzxoAGZCoJrRbp1ppUNGVOMEetIEeVizMURjYYZeDmqlqpFy0Z69a6jXbN7e4aYAFGPPI4Nc9HHm9WVcYPXmvPqR5XZnrUpc0biTRYbkdarOhxkGtFlDTMCf1pq2Lv90gA9eazauWmihbxF3G6rN2DDGq55bpUgg8mZI1xyfWi6XzLsZwQvFT0HuyOG3YKSRkEdSaqKmHdjjrxWmXO3auOmKqCzlnuFijAy7YHNLyRN+52vge0aLT5J34Er5Ue3rXVVn6PALexSNeigAc+laH5V6kFaKR5M3eTZQuFG7PWoBlG3jqD0q\/PGGXPFUynLdPbkVoSXoyrxhh3qtIf32AeMGktZGRWQ49RzSAkuSSOh70gP\/Z",
    														        "foto_2": "R0lGODlhoADgAPcAACwmNJKPk2BbY8rGw8SSfJRmYMyqk145OpR8c6ursXR2eOTk5LOPe9ytmEM\/Q4FcUbR8eeTGvLSei8u7s5h+fV5LQ8efg0QiJIFrY3Bra5RwYXRMRsatrVJPU7CSlN26pNTX2\/Tk4eTX0nFbU8ShnaGfo5uHgUxAQqRwaISCh1xRXZqGdLOhpKyXi9rHu0Q1OjQzOaSPg4BjWrSHbMqyo4BsbkxBTal9YrS3vMS9wMSRlYR2cFxSVNTQ1uTIxd69vFQ1Nuzu8G1ib9SlkMSzrqp8faCWnZhxbdSrk7yQetytq7yfi0U2RLSJhfTx8tShpKSIgadxdNTPzFxibLSsp+zk4MqmkXpTS\/TY0oR4f+TQy11FQzs1RMSYfGxiZKiCcNS+vqRqaYxeUrGZlezCtIxlW4xvblBIUTQtNWxMTuPCtOXZ3MemnbylpKOWjbawt3NyeryWfEY6O9S0r5ZqWcmrn7CQh35dXcegj4xrYlNGQ2JdbURGT19NUFRWYKd2Zm1FQauHc0YtK7SAhNS6sPXq7YyKlWxWXOzCvMWZlty1qMSKfIRVUWw6POzq7NyzmzwmJNSzoWxUUsSKjPTSzLyZlTwuNJSWnMzOzHx+g+Tq7LSmnKSmrLOmpry+xNSurLyRlLymmpmCc7WCd5iCf5t2ZNze4+re0oyKjGBWXjw6PINycsnCxIx+dOHCvW5mbqmCfZ2aoph2cPT27LyyrIh+g5OQncrIzeTl7URATrOgmXFsd1NQXt68sW9cXqSgrZuJjdjIxqOQjn9lZbaJead9cnhWVVxGTcWZh0UuNV4+PEU6RKh2djw6Reje3fTq5FQ6POz29NSmn+zq5JhqZ4xyYNTCtKymt8SSh9StnryRh7ygl7yYiDQkKJxmYZx7cXx5f+zGu5xwX3xNSNzX2OzZ0cyhnlRAQqxxaYyEh2RSXLSXiEw1Nzw0OlRBTLy5v8y9vIx4cWRUUdzR1uzJxMy0rryJh\/zv6qyIftzPymRja7yrpox6fuzPy3RjYgAAACH5BAEAAP8ALAAAAACgAOAAAAj+AP8JHEiwoMGDCBMqXMiwocOHECNKnEixosWLGDNq3Mixo8ePIEOKHEmypMmTKFOqXMmypcuXMGPKnNnR0UAnjoI4CUKzp0lcPW69u1biV4Jrv2IpNRLrF45bpnxK5egoxzVbWXZp3bNHyCshXMPu2QUuha0ErHBNXQvRVA9PCYwY+spVhYo9dnnZsMGLl4ozZ\/ic4SVA365asd5gKsS2ccEgpt79ArdLQF8+ffPe5XUmFxcuuXLZEN05NK89+oToA3eNnGPHIK7V0ucnl2A+fELrBn1mNJPQXNB85uLXBhcmezmreJXujevXPhe8MySgWWDAubk0+2xjsAq9ukf+DwfAxd2ZZZ+ZLNu7N1Wta86gzzTFaVcH3Ph56RY8nEv30OiJhp5wTCBnAxPHcdFOO6SdkUoKnsgHkyfg+NHBfc1k2IxuoQU2oHAb5oIgGiQK1x+C7TBhiSUG7nXGK0bcwpOEKfVgCxyl5ZIhDDBot5tuGmrHRDto8NiOglxYkuRnL1hCopLqrWfJMryAE0taNJa0wDWZdOAZDBpuqGFouGkXpirtONAODGgsuKBwRy5popLH+bbMMmeosAsqJZBjU5YfgWCLHw7wcaYqqvChJok+8sgjFzC004wDzbipoKUvKIgGnZ\/RiSCCDpxwRh8CpJPAGoB25Al1GqrCI6L+iLajihwKsllkcCQ+2ualcqxp6Zs9KokGAJsmqWSmTOQpwCqtpZoRLgmAI0BnfPgaKwyWnBCqAy8cKSykPDrZJrBEuunrk8Hhmt6SybRjgx57+FLDL6g6WxEusezBmY7N9KhKM2jyKAeaTq742aM9sonkgssM6cCQC2o6HJ3C7nqnaCqkMsUuRjxnb0S4zKZff0UCzCYMqhT5girdtsMikZsqeWy3ePahhw29tvPCMi27bCuj2Jq7TDt+pHLGHiX0QI4THzsUxC+77KFjfzwWibKRrm4qxwttGnyceu7wvMwx8qijji+p6MGOHCec8IIeTGxKpCWROorymhkevUv+AL8YoVjTDLFiiz68bEc1jyaHi23QWzeZzAs7n3NOH33II8khvmTujz+H6HGOHqDj3G23TgZdt6uo8+EHHIYEkEksA8wIuEG4GBI1L+oK5yi4i1sCOeQnuHPOCdBAc8wxkqRxyAjDNO98DWZgcAjllG8x\/Albt5OMJbCuGSnqieqTSSYZZFJCVLMbxAocftT2mdUKG7mgHJ\/rIU8FW1RwiDGSSNKHMSO4wzAEmAczmCEPBUTAN2QxwACOoH992AI7krG2trVtYAtyFKIwI4D2ZYIV6SsICGznB14Y6mAwE84LTnCOClRgBDDEgPPMUIMyNK8MCDTgEXZ4BFksEBb+pIAFAmQRveb5YwT4O0f+7udCz8mhVwF7lQMc0IEpcGIBIRwIJ6awhxLy61IuE8QLWiiJEfgDAxjQgA+\/wUZZuLGHsijCN4pRDB8WoRiwKAY+9ggFWMDiG0eQAQZkIAMYPrCQFZCEPLYAugroQU1EAlOiphAAKcgOcNCCA2Zy45kMtmNr0KiAMQSZBw1oYI509KMqU6lKfOSxCPgghiub0AR81BIfxaBAKWRxhBpoIB55wEAe7kDMO\/RvBJk7T9wA4CoYdCAFnLgFFgEXDRxMgQ\/60g96sMU9OWzhCsMwwxq\/AIs9fgGW9iBGLW8ZS1h8YRTEYIA25klPO2jDDuz+rKMa2ViKI5gSgWiMBz9W4Q91yMMG7ViGqzqQgQwo4BKcGIDHUrVFXvjBUJ5RkO\/YJokzKhAKUCjGN2IpzyQw4KTaSEJK6akNddrDHklIAjaQMdN5YkMbDNgjLr8AhUB8gY67TOUXSPENBJhhFTXwBdy+pwdFdUAAmQjALZz1hkyU8AzNgJPL3vZCf1SjFN\/oIz5yqg1uIMMCyOBGHNYaB26odKXIiCsB4krXRCDDrtzQBkwZEM++EiMQd\/zCWE8KBROYgBQUWIUQDqGmu6nCAUUrXwmmSqN33E4\/WTVWMk7gBQxUIx6igMIe7WCHvNI1rnFARmpPS9OZ0tW1yBj+Al7jutKymjSmKY2pSrlhh3WQ1g5uMIIwSFELf\/DgBN6TwxRV54VMvONPr+lBhbyY0RXJQQ8j2IEo0rECUuDjt8iYZ1rT2oW1dgEZXUDraWfq2vTGFg9xNSs33BqH28ozDjedp3y5sY51jOG\/\/zUCMKSlBzl877E88IMA4HDF1+CrhCbcTo\/apAd\/ZMGwJhAtaelpWpp2waxnPa8F4MvauFrgCUMYwhPwgIdEkDi+uD1vaud6Xm5YgL+62IYudAHgAJiAwL2CwcBwcyHWoY8tb9iFCaeWJJedwx+kiIEbYhCDFvSXGyg9LQG6IGK0enkIdAWzmC2Q4iGcWL0mRkb+TNGL3i3Ddgl42Eact7GNNmyDBUYwggl24IsOGBhlA1PFU6dwiSNLhRUKsChWuYCehHbAH+kQxhh23IIxzHe+ZaUrAbSx5RBb4NNnRSuYn0Dm2MaWzCMeMZvLy+rybvm8Z4UvHpawDRKQwM4suHMsgMGPDPTBSYjiER86wAN9XOOSNKmdRffF6OA8mRTC2PE2QkHndcAZxDSNK5dDHWozn1jMZUZxmcf9aTSf99xJmGuaZ70NbmyDDWywcxtYMAZhCAMYXuCWk2T12DP4YRURkkoCUrEvw3XrBL5IhwnGsIlQhEIXErjyEuYb1yTQlcsiHkJ6zxzucWu8ASnGg5n+wVxu9Kb33Gg9L4vxYGtqs+HdLKD3LzyQjhrsAbluQhxDa0FZmphiF7koIR8a\/ckK1AAYLdixBHRB64nDeeUXh\/XJNT5yMnv86mVGtclPbgEul3rEeLDCytmwBDY4fN7zHoMRWlGD4xYpkmlKxS5KUIWecCIw+srF0HynBy+YwA07DkXEl0BrbixB7Cxm7cZJPvIyIwPkKY4t1ssM65KfW+MmZnko8BCKl7+czmOg9xiAAYxX9IFrbYqUA2zgi128gSY9ULI+8s6FbslBHlmIduC3QfjeL2HEYlfvyE89BCuk2PhllsbkPW51qqcY410H9cqtQALOl53abdBFJej+fW8KeEEPb2LYGQQggFr0YCax6IAfdkEbz7xADn3AQACWzvTOh4Lw3JBA7\/FwYxaLWuT8NwQGYABIUIDZkGLKt3wh13zN1wVVZw4sVn1mx3lWQGskUGd39l\/3tgOp0Ctvd10qIABCYASMAROOkAKEMRZTkAs6U2GRFnj353u+N2srx2JDAIBhN4AEaADZgATZ0IPZAHllJoRgZmqNR2YbJ3aIxwZ4MIEOd390Vmc7Nnrp4A8d0A7dwD3ucgZosws95xK3sAvt4wf60gzLcAICsAMxMGm6sA9LIAG8R3jWd3ihAHYrNwTmMARIsIN76IM\/+IcN0IMFCHINkIAqlmL+zYeIqCZ21fdu13d4tLYNlaBjAOYGwJAFAoBckfICySIEGWME9eIShtABpzEFfmAdJ1ABXiAKbjAGgEdntDZrcUB4s2gFFQhnI1Z8fiiIBhAJ2RAJj6AIivAIj\/CDgdgAhZhi4rZ8ZGYFBGiLJEB9ZGd2VkBtdFYJlcBjrugGJpABBWYJ7YBcZyMAqQAO7\/ASPUA43tEbbSMPGLACSadjUWh2hGcBvweJYGeL2WAFvxgJvRgJkeCDwUiMwqgEA\/kIDYAEQxCECqmABIgEtuiMEWmL9UhrkzgG2zBp\/wUMO8ADOXMGejB+AtAHGRAL0LUSb2BCfKEOZzA82NUKVab+C9YoAYa3BLNojxZgBXbIBlZQB0NQB9nwCL6IkA2gBNlgkMI4jMV4kD\/ogwWIBAmJjFKpkE+5j8U3kTppj3GGB9hYCQBWb\/EgD27DiTbQB6mQCh2wB+kQHywRBLbQGTaQCgLAA3qQiv6wAm7QAnBojdZmk\/eIlbZIgH\/oi0E5BwAplAbZC70wjEEpjL\/YAMUokEjwCFBZgJRZlXu4gwNoizQ4ZxfplWPQAm7QCv4ANyxiA3bBA+OXBV+YErgAdLnAC3JpM\/bzjm4gAfQHi7S4BAaQk4BpAHXglIQJjEoQCUqQlL1ABkmpCB8gjAAJjD9ImZAZCQk5mZYJhFYAkRP+OWJwtgSJIImgqQvr0AImUAN9wA4A4Durhz1n4AWvxxLpmAuDkQoqEJI84A87sAISkHRjMIm6SXi36JsR2YNA+Yu\/+AiGKYwfsKCK0AtqoJgP2qDFCIyHWaGWSYyDaIDPaIs4OXF4MF9duQ3roAstEAPx4AvLsD2bcgII5QACYATIdhJvcFGDwRnd4Y6tgJcSQG3i2W69h5M5KaDOGJwGGglJ+QGLmaSKoAZkoAaIgAg\/oAZqIIxzkJRGSoxCmaUYGpCXGZFBeo\/z9Z3YKKLjGQOk4A\/HwIkFkic24KK1MFEoYQiAMafvQio7gABSBoc7xg1Mtw6zeI8CagD66IP+FPoISKqYiKqYUfoDiBAB4RAOTpqkH0AIzImkSvkBWFqZkdmDgqqTv2cBcXBjIMoNY7AELVCiCGCe7KAzyxCS7JkBA7ASr2kbcAkY8uAL1ZCjecl0TNduEnCTvVmHgSmof6gIwLikzImoP9ALUdqo4eCo9BABruAKD7qYH\/CgzRkJmIqp1GmAl1mAHJpq6sUNicANlcBf6xADUIAAw3CeLdKm8rkH56gSPbAHgsEZgkEqXrADMFlllQaHZed7dQigm8mPPGiox4qohACh0hoO9OADDhutrhAO05qoivkB2rqgxJiQCHmZBiCAHGqTI8YNH9pu6MoAKxAPMnCe3dH+B3txM6ogAAGwEu9AozY6KqngD6sQDyvgr1b2hgD6qZ\/qjJ3qi0ZKpUhKCJPaoNQaAfQQrU8brWpAra5gsb3QnAuKsQhpmQ0QkH0Yrr+XVmZ1rv1VoiuAABjQB9BQM3OaC3LQAasAAipRAoIRm50BkqmQARjAs\/bWAnbwszJYgTlZsH5YoUI5Bx9QpXOwsFPrsOHgA08bDlFKrYqJuFlrpM2JodVZnU\/ZqeUWqpeGrukqCuyqtstgHoBhHs3QAfqQAylxgrZBq3MqD\/gZDyYQA39rZYOnfx1qAQVLgMFJqIOJuNraoFPrqBP7uNQqpYiqCHNQpcxppchYmU+5h3r+mJVhe2mV0F\/rwAAxIArVgAHy4A4ucgyDcQYnwAv68J4ngQtwEJvyCRgqQCoZYAatQAomIAxusA64KYOH57uayYPAiQTBCZR1AJCVerWKiQiuwMCIILlTGqVXa6xCaawUHJTVK4TaGaSfFrroeqrfGw8YIAnHQL7dkRdn0AGvwL4\/8QqYESKA0QG0uwo7QAErYAJ\/C7C7aQGh4Iz+OIA+yINAaKC\/GL0NarxqwKgNvKjN2wuGGYyFSpRQmWLPWHzlVm5L8GHm6lveGwitUA3DIA99cAbkewbqYBcqoMLXkBKmoA+CkSGMBpIqIC81wA\/4W2X9q3\/1OKyCuoN\/GJz+ABmUFIqcivADZNALUAqlh3zEi\/kIn+CckEmMDJliDQmRVnzFhndp\/WUHMbACorAD\/uALffAXZkyfZ8m6scDGe1Aa25Eso+IFOhsPd6y71van\/6uDRMuPP8iDhWqsz9mgyWnIjIoIZBClhXzEwyiMWSqMnGuL12vF3lZu2lu2ZivCBTW\/GYMXhDF+M4sS6YhV6IEngKEOXjAMGHCnt3uqfRmDtzyAeviDbMCDBozAhxmMyaqYZNCkiPCgxbzISVmlR+ucQlm9V5yVXTdrmcxbm\/y9O4ABAnDG8msXvoAXe1ALanESPSAEndEwyAE6ZyAPI5ABuSoKOKy7P9rDvtn+qQbcjzQQCYYJ0IaZDVWaqFLKvMlZrReLtYd6uc+5wTrpbV2A0DfmW771vQhAUKlQAX\/hInfhC3dh0d6sD2cwRRDTHRVwBhUQywjQs6caBy3Qe31MtMAr08+ruEpLqYs5Bwd8qFYLoVH6oDYNoVJ6uQPdqVeZlZ6KfwzQAgwABaQQD0nlsr0BNiqgDkKQChU9TSZxC9PiALmAJi9Qlh3QQiPgWVsdAwywn7+6BD0cCjrojwfs0sxJCAvbC1V72pYqwXKtrMUspUxs2jUN11errQGpmSDbhDTIX78VA4nlD\/JwMyfQMHhyF0IAFqtgaCRxC4RyHizjH33QAZ6T1Rj+EFpUxr3618MD2NItDZBlXdrT6gIR8KDTOq1TG9vM+wPjvbxvXbUR0N7h\/aBnjbG+GJwFK3b4x1ucjA8mYAa+cAzBfScJZcYqUNxjIbcnwQqEoihDcoboiz3nQLt4ysm6u6PVSAPZHQktvbhKCwauYA2uAN4R4AK9EAE+UOLhnd7j3d4+IK3oTeLu\/eI1zbi9QAgAWQc2XgdWAG+57Vt2AFLlKZbsMDSZsgx24SB7IAA1YOCLLQB8oC0Lsp7dIgjssAUjEA9ShsfX7dk0EAo00NIfMAGk\/QFgYNod3t5aoAYu4AP9QOIr7gKuoOIh\/riPu+Il3g8lXuJa4N4u4AL+U+vmakAIhjnf8EZ2dKbbfe3XaSsH7MA1Q8IEf+EO6oDYWcCWJpGOemAd2IIn+mYJ7IBd1VBlMcC\/ne1w2U0DYD6pvcDhHf7h4H3n\/ZDnWrDmIX7ntK4Fd04PWoDrLg7rTiutaD61qf689XDjLzdxY0BaVObX5nkOkGMJakLkLmsXanmSJLEA7CMYquAf4KczggAJWS0KnayXXy14O0oDm7APNEDa1gAG7J7mbp7mH77icD7rJl7nJT6tat4Pr04P+x4Ba57nPsDn313ahMABdRBvdSABGNlu\/tXjFGCeTeIybbIegBHt3XwSmlALHTDVT74o7SAI7ZDVeBqTS7f+DbgZCvsQCnVg6qQNBoTgCiUeDDAf8PXe3m5O63iu7\/fuA7me6\/su722uBtJatT\/A7oBeD\/EWhb3F43YgDMp+nr6zIFPCHsOdyikRAITSL+YSM4JQARjQr5Wmu3gseCpPBPVA2oQABuit9m5OCDhP6\/xe4g\/76jFP6\/pu5wDv4iRe9KQt7AbfBtkniRh57B5AWsouDxOkM\/NzJwViAx2wxinBCR0AMGhCIhIv5e4I7vlLZcJAZaFOfxwQ+hywD20Q+vVw9q5Q9G9e9zOf77Zu53buA62P89Lq4RGwrEd\/8ByQ9Nn3X9noldtrBx5gb8AQD4fA7D0jBzxTeylMCyr+4QkCQCkmk3poIAhyUNl\/ZwLdRdIYJpq60AYpX2+wQAEUAAywIAweMAZsYPD1sLjMit6u\/rCQS+utP96EMOzEnpGF3+OVdpH\/lZEAMWZMCzvCoEAxCIWfL3cvkqFp98IBk4gObKTK8U\/jRo4dPX4E6ZGcgg4OHDRr1w6GJRgvlPmLt6IFqXg74iEgJcpEDBMCBZLiZ6aG0GF3hpmhAGXMNjYcOMwhBOaHD6o+6FG96sqHK66ufvwgVI\/NtjF27ECBRaEYhW8UKMAS5qFJXJ8eEpJKCgyvr2PJLFlqJ2dZSiYnbLzqEVLxYsZBbE1p1syBqnYsLbGrUA3BzlbxVt3+XNFqhQlSJoBBoRB06BFZZvLcuXOEAj4PlUjUedprzg+tVbFy\/bqbEKE5dbaZhbJWliwE35bLpiBM2FwPAz0cREuBFCxgFIadeQE45Qs5XOTYsAGuCmP27TleEjC53TJVK9tBG4FA1Apg8W4iiAEY02JwCy8KhDLDjGFqaC2PPGQrApbaSGhqDqh4iyACrqjy6gcLLfykDhIqsQMWUoopZrm2ZOEHOtrG8CBGD3g6qDtSgNGrBnXYseQFNACTaJkTzkjHPSPZw0GAyFJqp5vAKpBhPxN0imEMYWKIoYV11iFIRhjdOsKMI8LMQ0xqjiiiCVDwYCObOixUwzfegvH+cA4OzKHQnErw+WbMMsYcE5YXK6mEhaba8IkghHgyAQoc+TkEGkgigsiBExw4g4c3juQ0JFZ26YAP+f6SQ55qVsDSBBNa0KWFMXTZJtZ1tqnEgxFvvQ6YtI5gZswoiiimCAYSqaPNOXpxRcOuvLLwThIS8QDYXsU54o8vmuCGQjaaqsepENmgENEW7DINGGFM4GcEd5KJKKJLT9BDnwE6pbcjEDLhxQEuIrJEDjlGODUGN9xogdVYQ2HDuBFtI4GEMeZqQtBBvomQ1yIiLAafSsxJGKpluQKDuE\/0BKWJCCP8oogZYCGGAUITaZiNTxRRZI4QOaijjja2afXcGAz+8u4YdiB5oR00JHJADwUWqLfpf3Ax5IxcKDNaDj38QbXggmGFFeGcxzILnyZk9EBsk8UOdpQm1saHAW7YjIQQV1yY+wcwdPuEDWgHMbsJe4iBBRYUBcUHH1BoPVwamxWnIedQeJZOmBaMIKWGPuRg1xKI4O0AFaebdsQQP85woLJJK8CaYAl0Yb0NWBMGmwF8YIEiRpgTGaMSUOzQZpJRIhyEmCaEx4ebNglRoxcX1HDlAwvZMKfktf9uAp9gv1B7bW0SgV6bwu1J5Ak3i2OjjVBYb8ENu4RZJQ3M\/e03aT9K+LzeIErg5QxVVEEDDTkqyIBMtsa6ULQBN2wYg\/X+voEABLDlCEUJE5qaoA0K2mN4LMMHMYqHhzpEohe9YF4viJMNc3BDG8MTHjEANwrrCU4WpZBFsAKHj0F8oRj2QEbCvva4VhnBA25gXxqWARh\/yQFT+shI\/ej1BgFMrWj94oEMVsA6KhbwgAmUxREQYIY7pAEayWAHEKBxACAYI2NpSgQFLziDtnHDAHFDHiGclw29aYMY9hjFKITHADviI4t3UAYQlLEFIKThCn9iBrX+kK2c6YxnAxGIMCAlB\/GkxAE8aIUplEgvVujDDyaRQ2D0gAET8IxrbTAgB\/aUxSMYQxJ9UIYgLsCOc0ADCBdIQxHwcQRYVEIHJoSFDW\/+wABkGEARH\/iAGlwQCTeZAxsz0CMx9GgPbTAgRVCQhSTYkYwDHOMAyRDEATbwJxREoXi3YUMozqcLgfzCAxRgiByeKIcTZKATm6SXKVJwhjOcICIv4MEqWuA6XbRhHzozjh0ocIQ7AOIcNVjIC7rxgj7UMhl9qAQHPAAKD2jDHEMgRjFCGghuWCEScUNmJMyBB22MAhb2sMcNcIgMO1TPDm14gz+ScVFfAOGWBzAGIADxgCOI45zFMqUuWMCCMQDDHycomhycxAM4SAGfnQqd1ErnLx5gQBioDMU+2LCPx9WqGGXYwAF80QIW1ABzLziHO6DBjkO04Qcc+AQJsGX+DnsUY2WjKGY2HpFMQqgUGS2FgApx+ASWNmEbdQADB4TgDnccow9gTMYd+GGMAwDikMXQBptitQ0WKLUTYwjAMBpStHY4oA\/pYNpVOWWE0TmAnieowCqEUUCDqhOBZfmGMRoBCDO8oR7A6MMLwgMJJvSBAmDwwVc4AIrtaaMYo7jBDIoZCUVYA5l1sEIab6DHRSwCGUNIBMzm4IN5sIIfqTgDE9zBBHZAowaggIUx0nAARvwBH9pYwlh42Ik2sEAYNdCDDXxkxA7oQrad+oUAOsBPHuiBB\/EYwz42EdbH1WEdDIAFNa5wSCiwgAMs4Ecf5MuEY5ihDcHwARjakAj+UOxOhcRAQROQkY1IDFYNH4gEG\/DgO\/ISABvY0MZtehGMYMzjGqs4AzuWsQxoqIMCHCBBETg7DjoU4wt2IMHjXLcPKrDACFlIsAMgYVseJPHBRnqDPiasBwHwYASkYME+DFoHsj6OT3koAzWKECMTt4Efd4AoBYxQj26p0gN2oC4Kb4iHBmQDmWoorDRYCs1FGBnJ3DBeU+ARDDAYYRWH6MMxhHBlVQKDGhsAhBgKQIcvVGK0m2hDJ0qbhT6cwJ8nkIMArPpmI3kCDvA9gTx4IABSjMF1Ya1DKJawDjv0qRQRksuErOSBpTrFKW14mTnMkYiLjYIAlH6EInqBzLz+meOEo\/gbNobwBHBtw6D1gAcH6tEGW\/CDAmNwCglKRgFqMKIAsg7EEkiwjVCwINe77oMDzhGYeq6B2O5xwjVeMeFM9YEHzR5ztDexBAnYIRCBI8YgmiA72hAK3E5pFsx\/oIRPJKIY40XGEyqtCDVgOsjmQIY0y0uARDRAEbjRNxiIwAEi5LsN3uboGEqWSBSI4w8M2AaFyNqJTSw1BfIQUjuGlIVhX5wxC6gFPzvQBy\/IQwAm6AQH9sEBGvhWAgxgwPAmqEZI1wbmFpLKbj7xA0Ukwg6jgABgh5CNBkQCmR9QhDTGDdMkzDQbNbMTbqLibXCzAHeg2FOapHmDL2j+gxtLeOzWlZoOedg2MH1YBTzMzp4cZCED\/hiBL+RRAXmYQBdOoYU6rRAKPICagsc\/fiLMUYdP7AbGdoOHVPKaxurh0BxI8HHPFZG3NNojCdrAhvLfZKenAF4RYGh3w3QX6SQkAdSnXwK0qaBUFgBDAHq4zDHkMQw7WGP2inGCdziXHfCFPqiANJAEYdCFfdiHxhE+IUOGCJRAZOAGZGCTbGi+OaCTYIg+6RuRtWkZZLACwUqmnnuEbHiCCJwgbECGRMADaWi+R5iDetiN3fiBT8ArNniCcaPAHkSGJbAANhk+Pns4+1MHGziHLUgDGYACDiiH\/wOJKqAFXSgBE\/D+hz7YAnkYgd1iQAe0AiHDAxLAAzxIBAkcQ47JhqeQCjBgwx+gE73pKN6JwCHosRJUg0cYmTKkIGSoBGSgkGyYA8zbDamgmU8wxE9oJjIcwyC0ggBTpzrYBAbsBGBIhVTAwgowhmqwgzqohxCAQo+QwhLQBWCogd2ThLWKu4OqO\/ACQzEsQ3HDA3MwAAy0kK\/YQBizk0SoBNPDhrexgnSzww9QAk1LI21owTO8vK\/4CleQCruxkJrJBjpaKTywAmpkAwMIBSuoA1pgQA6gAmHwBV9IBUzEAFnAB1TKh0\/sCCfIAaUChh2QBHkwBl\/YLSI4qIPKmS+kRskzBysYAn\/+rANAtEE37Id5iDEc1BMKqsBEWDzHS6ZkUgTowQMJLMNYBMQPcoVgAI4f0A3Mi0Y2kAYrQAIDGEkDMMlGmjsGNAJ\/EAJJ2AIZ6JMvawN4WA913IhgeId9GIN48IUKkIQt3AciIAI+C4XGgR0r+Ch\/BEgeU7eu8IGC9JAcZKmFtMhj6gUy+CAloCNFnEgLvI10Q5aq6BAwSB5ojMaADEg3oQEDoIEGDEoioAIjGIZwrABZqDZ80IU6mABnsMmNIIdgmAAWsMIt6AN\/iIE2EEq6qwMaSBgDqAMk+MJolExAbMreoIof6JatNL2KpMNHACHti8gdnMiuHEMes5C58QH+ZWkejhQhCzmpbECCx1zLaFvMt9wHI6gBX7gDSfgGEnAbNqgHQqjJvlyDYMiBb8SACnhJYOiEpSOCxskZAyAERWCmyUxLD8JIrWAWm8kGEgA1CxxDaeAuEPoBrNTKaYzA0RzBdFMEuUlNunEFQoDPDyosHjupk4LOUKAFGoCHerjNVfCFGniAb8ADt8GDegCDQuhLjaiCfIAHIhiDGtgCSagBYQjKe+QzGpjOSJgDPBSsHuOuD0CWZakTGqwDPLCDt3lFabg8RUAE3lADRcgGpLTAIRjDF0y3nhtRV+g5rtDRdZvO6UQmOYqEemgcGrDHN9gHYZjLYXgAfGCT5Vv+Mk9c0AZlBQitAd6LBw\/YB\/9kuiOVI+eBxpoZrA\/qOebxita8Qb35TjLsx2RUhB9AhF7YPhIaQ8YCz8tLJmRRJh5VJjT1rg+QI6iYA0ElBBpoHFoYSj2zhSaVgSaIxeWbGyrtyyqYB6XThVaQBEkghRYwrudEUhqImw8SUTqlU3UzUz9Nnl74il4IkSXghvQ6wyGYmThlVcKbA2kcwyGIwOvTUz5lnuXJkAjQUdYcUkMt0ra0Rz0DhmE4BAw4gnVYKZNyBS2gVJsMASkIBgb0gFcYAQrg0m55Tk4c1Q8y13X7zJ4jgx891yBLhFgdzWikmfKU0xit05U6L85sUXP+5dFhJVZi5QpzvRsR6oUJQNTE3If6q4ERMAMCtYLIdIV8eIYF\/YdCkAKlywEiIIVhiAcjQEynGMp6mABCIFhkAaF07blwSJ51XdXtY4NK4AaYdcFsUAKeQwQ1QIQOqRlNO8b0ZAOjQ1Uz1VGVJdYzNdlesAZMIwSDZToiKLAAqIFheIs2OcsfkFiKvYd8GIDoc4Wd5AcPeLqlqwciqAc4wsjk0dEzVQOsXFcycAUyoBkR2UUTckElqNleeFFECIcOUQIRSSOga0EWpZl129OTVdlw0JAQcgWkdQVrWFoaqAdFtcem4gfdsoN6oBkOBYNgUFCKFQE2JLV9gIJma07+fRvKsJCj4WCeEOo5Yr1KECKD2LXXvOId3uEGcxAsnovdCAgHesDVmivDFmxBJLBbVEVVrPzM2PXTD7IG+pQjJOUzDjgtYOCHZtuGkz0mMNACJ6DYfyhOViA1IjAwj2U6p9DLuGle5EFZtV3bHlVZOs0rmKUu5WtROeVdDvGQPNRDbHjB3DVVRUDeq+y58vxRkh2OQ0XSbjwtYagFKGAKV0CEOf0BaxCB7v2HINBWwOQARBkDhyNbfUPd4fhM5DHaPVUD3i3WmtGbSnBBEpCGeVUDSugHsQQDmxkZ4U0vNoDhdT3XcyWDH1ADIDZXOTJYhOUAXRAGYLCDMbiNSJj+4YyEB760YHKQAimABz0TiDxzii6dAKgoWUxb3TP10wzhUVZVBJzZFjxpkziNU3roBy3oh+fLXxJAhpWiXzZG26s83qssz1Mt1OGIBERF0i1mgYKwgyXQRkJ4YxcgteGkWHIYAGuAh50pMIPaYn3z4sWNTztE29VFYSGGRugRt8urWd7oB0ooByy4TDCgOWlwZVceQVu9WbYtS3PlYRl9xg+YgEAeyi2GETvQBTZYAgP4gAzxAWtghWtdUCueACIgC3vrhJRkOiMNTpJNntSlTxDq18TlyDkgAXFrE2kAyRfWWywwZyyI4xs0RFdWPnFORr1V17fthXTzTHPdvvv+LCxERboNZgFXYYNGrAPkcQEXkE\/uneJmJgJdWAdYIbA38DayhYpRvWYRLdXPRFy35dE5GDdQGIQ0MYfti1NXoAQZfkpXELxEMBkUIAbugUE1CIdwyNubpdMO7VCaoU4OjZtAbpy522CBCGYriANiTiYXgId0tOB\/qIIrrgNdYIB1WCoDWjqcoYEZLCxArmihPWFEiACZjrzoOYIrEIMi4B68\/YHezYqvUAJzYAZGAARGEIfQYgMl6AXE1duXnlObZqb7ZKZHwE8H3GIOjpUliAM8MIDgtAYwOIWjRmproAXj2BLXYYFUzNCyLVsgc7wwlaPP1JAMmdM5AAVxAwX+ZigARrgCbXjhstbZmXsCZgiqcfAG0KLfuX7pl\/bRdbvp6kQCN8mG2TSAlCywQtGFJXAbC+ggDbWGiT3qe5ACTqSBWCGoSDwonNE3lCKOy0Ymc3Vpl86QGB23cUNpagCEAvAAdePIOLXbJ2gCRmiEcQiD8HPBRMiGufaB2ZZpuO3QvEaCxnETx8TGnNGzSliK3CGGLhjDk5oAF1Dsf3CCfHjO4eCzfYAVBuzSnBHVOYiEDuKuYyrVlA0HMlDZ7TMHHTAHu9WBIpCFOyiGj7bpuH4CUCiDcRADZrCDJ1CEtMaDbFhbvaWHvb3ZsoyEWczvkbxGxwyFaJs7EmCq3Fn+h5IibFcQysRO8FMw2JFty4ZbwIMaV3KlAabkrkLdcO3m0e1LBB0Q8SeYvurBB3MIxEAct0GQIHN4AppjqUrQ4Q9whZemhx7\/IOqMzUgQciS4xjrob6b4bRZgih6jcL28hwT\/h2cIBlAdyvnrmlAYykbaclHlrgx\/vKvscHvVQTJXPjRkA27AB2ktFmmolUHwgESAwbimPm54YRe98x3XUcg7qZI0gC+0ApMMBWwsIBawNaaggZ77gKXehwpmdCcgB8aegGY+Yl3YMEqnTUHHcL3OcDO92UJEwTFPL5iJmZeFtFqpMZjBE3A2PPoFS5ztXeSFPL7ObwPox4fVRmz+3JadAXZDORYLoQEOOG5G14hpyAdrmACBJ4JNYOgin\/acufDq5GubXttTPcsd7PasW7g3cZiNWnU2sBm9IYFPkIb0IoFsYFH\/VVc9vmmSlPd+\/OdsVCdaEYjHqocPYLqBjy1\/\/4cFCAZJdoEJgHB1grZGWkw\/n0X7BEZz7VsMdOWNJhQKaSSbaZhPoEHCQ0hnCfX1jEbHAyFkuu1sMEkh0\/XhQz17Ewg6D85eoLtgQHabb3RyuAV4IGoI7zOyAnoaiM1ZHHruYs9HqANp2HuQ9O6lb6Sor8VltJk7sQ3biNQGOHoeu7R2ZybHTPnhswBpQz1wq4164A2Bd4VyMGj+tf8HgB8A49SwUDD4hGdLk\/zxyeRQRThBkCyWcm8Yps+Z3RCh4NDA6KoHHERyPGmYeHeT3B4srX9NA9iWf37YULCAJQj7nXE2QtBINiQHz1\/HBZCCAZhCXaCC8\/Ga6BT033cTo1OC6pzRaRXDbcADmH0sqmZGZgQDa8jIGnYKcAHwrPMaapxMYPxxyLdGyqd8dmIDpgIIDmCCBSNX5R\/ChAoXMmzo8CHEhtPIDUiwSZeuUNtCsQlloA5IA1ayZRuZrQ7JbGzwsMSz7SUJmJ\/mzCH0w9pAF66CuQJDaA4HDmzaxGQjYUkoPOasICmZ7dGHSE2RWKnaMdSSJRK26Rr+s4\/FGFoFnTiJaPYs2rQLpNCioqvNNjYg67D5WEcam2xL61iRWxUPt8CVtpFgQ6JwnTmKfvT64arnj2A+fvyYQ5cNZo6hJKwDbI5EVQORHkXK9vEzCaRZl+jipourrk6s1hRKa\/s2boRORMDblzEU3TrA63wkiVmvATbm8FTi1nwJYbrmMCtSTLmXz8Y+XFX\/hBmz8NXctrXEY0A0yTpISLBUnZXrS4zwQuSub9+sCCIaN2ruyxclSNkUZs4SgY3HHAnJYfaEOU\/UocRirvSiyGKIKOLdJ0qcVJJcqh3IXl11RIJScqnhsYRL20CHkS5EHHQfjDEm9EwwVGwDFxv+S3QEklw81lGYS5UIeRgbVqDEIB6JIJOIORD+QOEn0kiTCCjYmCNNNhoS95EVMamoIh7E0TAiZoeh+N5L23glgoxtxpjfJqFoBt5GPGIGXSXMqViYkdKYsyQy2NgziQ6JPHHoE4kkMskgEDQxCTINknRecj\/GBR1SxBFXGHtfLjEYbC66OWp9VcCT0UYb6RicnZWssw2oeHzn55KTaGOPPU0MsogOheowyST2QDAIrqNgg8wQ0gxhmpH7YZVVmD8uEVNq443HGlcTvEgqt2mJ4NZFLy1RB39sxDfYq3ggphweyDQxShGjNArBsIMuwii9RdBL7yj2JBFpVX2RwJH+Ua8OZ25MgFXiZXyhBNMtxGg5s88mcKUpHGb7IAwTkYcxp42uRaAQRRglR8HMsIM0GgU6YaDzMgrooPDHKNrgMURhhpGr4rQ8buQlpmnqsk8+ERsN0TM57BPKJhdvo\/FcHJEXl2HbaANLEcyggMIR3ojhTRhRnAxBFGSTbHLJYXjjjTjFaLOkuJduI0GPSaWaWpqhbns03wqxQvGNbOjSEX9SpxkkN03gE4U4BRQAtthRqKwyBEXMO+++Wq9NzR9F4EMMA3Y4VyA3HAnnLHSE8dcGPH27rlA+tFwkZyUd2d5RauxVYkcTX3xzhOMFUHOE5MQWmkivyCPfK\/OTQMD+TBRde3NEMUXAgo\/oQkJHHFZyxi1nRkS\/Pr4zE3TyluByaQYSYZ8ygA8s38hyxPAnM8OMyvboYI6hDXLQoKJ6BaxGQY8a1GBGEYqBjybYQxtnShBwureEpslJAhkhAn3G97oB+EZjccHYXFayDm7YgQFNIAYsYIHAIliuhYNInv8adCgB2mMQlrsfAgcBMm3wkBuJOJGRhCMB8MnJey0qmgZfF7s27KMOLDjdB0EyrUogoxI81AYDamg5lekKFPvj3xNIYCgSHAp5NZwcFyeRiGPpQBvcQAYJLLANK3hkgkgpYh02sQ9r7C2JR6tCDobGARZYTE63O1FL3rikSoD+goe4YqAXmSRJUCgKeaDAVa5wpY1jIaOTnWzPifiiEeg8a2kSoMUp\/Di+YNDiDRxoAwdesxG5FClHiUSGUpJUyUQw0leWvCQovBjMYCpPSZ\/0JB4sYIFkFomOGjHXS\/KoC3g8Q5WvcwYR3rAPJsInLsD5DiJZYo4GjXM5ikIGD5ugK5VZjxhN4KEOQGHOJbVrCLhMJkusYJ5QWEFHsyzi0Mhhzdc5Ah5t6EQbLPYSgmGmPOUZpxWGsJwkpZOFFi0GLN6JjR8qBRlP8OQ974mHqvBTNYR5JkaIMI2Bvm4eb2BiQvMWl75AC583M8cQhsAGiZoTZE1Ioec+97YfNqj+XchClj3btcylnghNoSDB0DAyAJZekwj72GYb9pMmW6KIJZ8cqbIiOlFLesAeHnCjD5UyUXt2sgvK9OQyT\/Ss1AntIrRYA1VdF4LefOVG8dHRnZCBIgsoUpxWWI4+W8JLHeSJPdORRkRB2gVkWICyneTGiZS5Gl2kTk5t2IQ1ypJXvjnhb21gQTdhQhfAcIOwRmXJEEYaUSvgRTmogWhK\/ORVZEz2rbhsbVNPNJ5UMZEK+5DCaPt2j2C8FLWvGcM61gEtFAUGGYr8pAWGUJWUqEQleAGQNPgS0WTylgCdtGdrMbuaV+UNlrqgRR+T2y0ngOErcNFFJVrTGnFVV5H+b4zrzQywofRgiLvZ0GlsKztZt+JSsIBpKje28prX+OYdGZSv0YLBAl1QAS7QfUklliBY6\/a3k8q82XZJ8okVs5gDc\/jEhgyg3Xb1trLtUu9qlvCq\/N7ofDmoJoaNNoANd0Jw21jHGKBjLcAQlqmwZQpKSvPiKXPgQnMoTUpuZmILPCGpXeWGkjmbpjZINchHG4AujJDVroxhuC4RcVfbdbObDQEJbGhKJGii5xW7eCbpQYJ2s8tlADt4veuY8DY64QYWPMzMEWMFC9yAEVhJoBKV3gYyyPPQ2ObUAFMhiWL0\/GIX0wTLMs7pELIbW1CeiRvRfe4YxrDoRjuaW6X+7YSsY62mJST5zS3RZ0S1mywjISEx2VAMn0Xt55IIO6ddduhmoxvrdQhDGC24BhJrTSonWAPX1h7DS9o8mCUkYlqyje1sI0oXDSm7HpWZww9WDJK+NAXVOY1je1LzqVfpgtomGAMLsq3tUQXjGrHGhwfGkF9ww8Sh2o1oXvKCEg6smCb1oDhNPlGPT6BkKVXJqRUsUBXNAgZWXdmGHUwAhRZ4Ba8DJ9UtNhFrKCRc4QpHl6YDVhWPf3cmNAHDTMAwB6EDfeN0sYJIRBIwkVtAxLAS0jrsIIwY2IHl+yjHy0dVWrCMARjY8wCSoQvu1eTzsIfdSx0+Qep61EPolRH+OlA4cHS+KD3kmi2QqyoxBg9AAQpVb0EL9hHfrNtn62NogdQRXnMPuOolv\/7LSMGT9osDZeh65sDFL9PMkNtdPK7e++6gQHXAjwGDhG9TISB9eA\/wXRhVjzW4Q4xZ2bLHCnGxC0gwznbM856W7BkpS5o+V2nbwQN2sIPoo2uHadbm9DEqaFc80AK+Q0EYxrcDdNfxHHWBsks9Cg7vgxKU4NyJZ6uJQ1Y4E\/XiH98OVD9+DHQxgXs4P0YLoEWsWV98YeCj2tU\/fgtEF5hBx5v103fMBQJ+B1GkybQo2TochQQg3vsdH\/8B4KvVQ\/PVn32swRsc3hhUnfFRHxSonN\/+Hd+1DOCXdI9mbEURpclWBE2BbIOrcUYLxEDfxYDr9V37jdAY1AOQaWBuBIEU7MPeoZzx9Z3\/UcA3iAIU4AP2BAamDOB0HYWKbEXUPSA3QJerOIdzwB8UrAATIh8UkAL2RJcZvgWbAGFuVMEtEGHYrV\/fxSEpfMMSfgEUrMMTBsYIRZf6PaDyBeCrmGH7tR8UfAEpiAICkIIOMgAZRhcDrEMSHNo+pKEa2kYQkINBdYVzCIkY4kPfzaEsaEAplMI3MEDoKN\/7hE7o2ME6mCIrKp8THp8n+o78lEI8yMISxiEDQEEgsGIkrkMcrIloVSJarEUOgAUXNscgxgAsfIH+KHxDKWBAHpQBKdphIODDLhZi312jJ36DNX6BHeIDNB4BBpRBGeSBBsgCAsRhHPbiI8YBA8TBqxBBOUzDMBIjRDgCOQRDICGZYHShHWBP3+GD75QCHZSBDMiAOeZBKeBiKRTDN0AkRJbCEZAiRB7BND6ADDwAQlIjAngjLwYCOELBOwKjHuoCB6xBFawUPkbENICAFLCCJgaGkpBQCTVhIYoCOEJjKVTDA\/zkFQTlAwQlUW5AGmzABgCCMgACUm6ADBSABhyBONBhMRSDKIgkLBTiO8YBN8gjV3qFFiwAS7akQzhBEMyDFJyKHcjgD2FWIpAQLxZiMYAjOIrkDZT+AkIO5QZcQVM25U\/+JB0okB1woxN+ASwUg1zSpSnGgVeaJJIRzUqSZVkiBAgEg0yu5Ru1y9QMphN6YiAwgEgGwmfGI2OCpgkRgx1UQiLwkGqqyzxxgwl15ueIpDeOZlc2pjw+TT5UwQIEQTRIZkKIlhNoAkzSQgyMkHWZG5jBJj7EQGjig2g+IgOAGSKtxGWUExtEyXcQSJJYFxYRwzUGwlx+gSm6GjBGF1c+IAfkgzMcxG8Cp1kiRDRcIiYGYGXZDGvp2C6KJEmaYjyO0BIsU1UQR26lHYtlSElMVGAkQRKADngqpnQx5nnKI2cQDTkswD8EwT\/cYyUGQRAMYxD+wCQ8BOAbARd1tSIDOKd\/YlFXooiRUEok5NmBzkR1PMIclMTvBUYJvQ9\/fmYcNB2YTeg6BJ4UkIMzRIMj\/EOSEqOHBsFY\/kM0FGdAJkFlzd6ZDKlpmiKLBgZLwGgkUEiNvlh1gKlK\/AVh8RAxfIFojmarLUEcSIA8PmAduICRJoSGqqFZeqgj3GlCkMMQxgADvA0udVWBwKMpjiYkBipwIZ0VxKgifEBNVAe8McZPhIQ+cYM22AFqqulocmXTdYGbomccBF4+1ClCfCiHZl0QOMKeeihDOAM5EMEdXlaJCheKRud0JkGJCiixxegHEIIiAOt1TEgvqESRAEYJEQP+QQYC6DDmMhWqhI5qC4QCnTrDnTqBI1RBqtZannqoWaYqLpADC3yDHQQKibWHq6UormpDEmhDF7xNPuFZnkEqIdhEY9TElfEFa5WQE4rmDExn0wkWqHplC8AjtWqBtSaEIyyAI2wrhpklq5JFhjqEIwSDMGAAPpjYV\/WTPB6qf+oqNugqZZmHgEUCIUTCr\/YCvIUaIZyEcO3obPooLn1qV94mA7QAAyyBC4hAwp7qNFQBq3Lrqa7qh2YonypExQKDDAQCMvzLUmRWgRyqmjJAEnwOgyKTefgqpE4ITagspPIFCcAmc+IqgwZoMg0gYxZsHHyBHUwAz\/KpWVYBLrD+6pJimIZ+K6pObEMkrQwUgz2Yl5OJmCnWJQMQwwwQg7+IrDIxRYxeWaRWh8pGwowZKgOoKXgebhx0QTI1nQUwZmkyABhaATmcwpMGAdA6w9w67EB9KNHaqcPighQAwx2IAzEQgHn9Fue2YmgSA3gmAdVebYCCxoYkxpjW6GqhaOVWpUj+axyM7OZ6JTwGwg1Ugx24gFgqhBNMAy7ILaseLVU5QTTkKYj6ZkMUQjCQwgiIw9\/qKlM1nZuCZiD86wywa7tm7lKFRkqE2ieURh0kk++Cp\/R+weEywGRR1rNCb\/R+gwyIAh95r+niAgR3b3LhbcPaqfcqxDxQwAaIwyj+jMK\/3NNgNV0SxC\/VEoPvMqiu\/pds5UU2wFhKrARhweMMxO8Mg04SuNVSKVMc+C5jxm8pPEApNPBCYCvqcm8F5xXexqduQEQGSwId0AsxaC4+iVwywaOD2vDvem4ysYeUcNdO6RMy7HDl3gANz8AMJMGPJhPnuWlpiuQPB3EVXHAhyO3c4sI0FG1eoerRqu4\/rIEwGEMZoMMNzAA2ONlfwGYJYzFj1ux\/IVY5nV1l7bAZz8ANCPDhojFljZwOt3EgiII4PAAC8NEP2qkjRPDC7ikfvw74Bmd8OqwTOMM2lIEYhMEonLFlydbI7TCDxmPNcmUXLDJljVNLgBSDyq\/+GQ\/yGeMwHgBayIUxPMrwF9DBA3yDNYTAKOtGKcstw2rCHbNUk+JxhqbyGrSBDHyNIBPA1TbdyAGG735sZTXZrm5uSLULgxruGU9y7VLpk2lyF\/iuGX\/BDXxyKWjBKdAfQ2BrKdOtBFvTqmLrMK6y6mJTHswyOszAIjCoMusTYXFDEtgD1RqIiLWW2XqVUXUSCvMuSk+y7VJWqkXUJhczJd8AHYjBDWhBOWwrtkJwFWgCLiwAw16wKnurQoSvxFIsGACPOJxzEhCAW8lWezQtCvtyawEYPrnpG3ElCv9uEhzu4TK1yGmyBXRBP2\/1Mct0GXwBQV+znWqCI7D1AvT+dKuqUt4uxIeGb0MEgfl+QwHEzCCjszIr3dlialcacFcFzNkSVhg37Q7rcjGbMAEsrt2F3C\/DdEzTAR18QTlggcOuqkIvAFuz6ntqkBIfNDgrBF6XAylQAx0k9eFGcSbPllfRL5e2xP0uVXr1MjeINQpv9Q23dKApkwWgMCVXNh2IQgRUgVrLZylrgmf7NC6wNVDzTWkvRGgfdAh4QNeIwx+Y8VKrMLDRs66mMaM69RTjAVeed\/N67gn\/KOfZnTL1MwNM8iAHdDWUggucguoSrUIDLSonEThXd0QUgjO0gV6Lww0sQleLNT6tc9NW11fXHeQ9NTwLrBj\/aHaBdVj+w2Mxz\/cN3EAZaMAEpNJDNKlCszV0+zfcpoUjhAAHRPMfQMAMEIAJe6oaA5pRdUFgfDVVDMF5jJwmBx\/nluYNK1NLv\/dkU7Z8a0A1hDhEzAKrcvNzL+xPj8+3bmA9mEAeGDjvonN6j5SAvlVuL+pfeNqMjVSALgFYszEaAzebi7UYb7X0kjEZl8IK0EBymzZnL2xPn3hQRzdEvGfFjoFUfkE+E8Cu3i95WdfIMkXAUMV3f3XABGjnOqvIpRpw\/zJjk3UZl0IgWIM9QgTEtjWrMiwuTPfRmLpZ\/KYjFEII1AECFEO\/oLO7WleThZylt+gyicSOe5rOAR\/T+e9i47D+e\/+o5zLmVg8ynCNAC7jAM\/i5buR5WzOsIwD4qafyQ2xvFdQDKRQD77YrAbjrVI8UVST6olIFEniapzm6zi1TJ\/0uDlv6pLuVvMfBJAu3KCwB6Tr70D75KZd6UKcytZ\/qqoOBMMAC4qIzNpToVCNdoCW22W6Xp5mGowubRk+2\/dYZvHvup042d+9yINDAKTS7WZjlHbMqXOv7qNj1fRRCPmwDBRADJ81sGLfW0gG3Cncpj8tYwFA8eWG0qqWapRN7WHduF6A0U6NxDID8M8yCWeipqI\/6nvYNtqJ8gDsDIUDBJmHtbQaoS8fViN2vzk3UMJdXbiOVpeOwhV\/6Dpv+cBcQwDMbgAhMA9NHhJM+\/XIHrdGwLqqfhW9mK42UECdpGUfbL6AVOckx1bifmILZ7lIDrr0ZudC\/N2Nj+puGQj7MPd3T7WdL+d6PiqveR7Y6wjx0QrmqVfA587s7uleF9FvJe1iLdXmZGJ0VPpsDtybrMqW7qQS4wJNCxKpqwk63dfBPO9+XBdUP8fE\/hEODABWIDmiIFT07fp1FuGa98xL8sliLNVP\/8qL3eHZlv1ir2luhcVZwrgTsfu+PeN3v6XJPeUQ4tN7axhHHCDlQQQuEyUcgwXKg08VHFFWYA0BYwDPQAjILXRAmJECgCwFkBvFYkYhkiIWDCS0MQYL+xIqFOEnidLG4xIKETdam\/VO5kiXLIEEcvQyiqYomXFWCtNT5D2bOnDuB\/nMSxElQozqDkKOiy4qBbNkMDETWJcnDIRqHSLRCEE9BiwmTLGQoMqIVJAYMdOwS0mLGjV8ZxLFAMo4Vk\/lmHV059KUjv5r+xjwaZFrOonpdOkK82FmOUGzq0HhqYMhDbQ6vbsy6FU\/FtiIVJkFo0OzGjWpFtrWQtuJHuW2XSNh3arHKvjBxxfSbezBOnrWFEgV+1BE5InUiR4r0FA8ybFXxbHyabUjnjJ2RVZyaEKFA08o5Xlyd1oDpg2xhS7D2DPhQv++JOlqA6ydQJ5oM1x46dPj+0RDWJjCABuWyacAcPJ7DZogGGniKooGqy66LiobgjiwLzorkkUeQOM+Cps5CIhIRv1KtJBq0yKu2Z27zSyb5HDlsJ8LyW4wo4foLyhERrKGBBkKWo2iIBPFoQIlHGqSus8qYPOirCQ0aorwNP0CCKoSaUm7Dsyx6rcs4rDnlHuBujHEm3f6qjyUnhsLvt8VkzDGoaU5xYQIgl2OOyAIVyUbIIczRTqSrnmgIoaykROKRDx6xAiOzNKRhQwNMRCiOUPJ5hr3aZoHJEcDeA4wmwXZyYpqi4jSKr1TlZMmRZ\/IBEE8kKyOgqgYeecoKcySqDrvsLNouI62Q+IBR8TD+HHDDRyKhlC6P4ojDgExTau8lvmJyIqYFANMJW5\/gxLFVoKogBx4aiCBQmsqc60yRXLMK8aolrcqIwl4VZbZCexWNhAYDHvmX0pHWkmCCUzTtD9sF3nMEl2mqUKylG4VjFaiXxjWqEGekmICGeh5RQsipsnu32fL8zMaKrDpbMjOJVtMwkooOlfIRgAUkby65ol0iAoQtPoo\/bYOIhie\/FlhATb4IK0rNoFZ1Ipqg5XSkChHAqAe5bAKtrIvswCMPiWwimWjXJU\/zzKwPZm4rs\/LQinuuJZbo2QotEFZxOKcBKzPppA97qbBpNHEazoyN8suZeSaogw1pXBYIV+Wq4l5uxKeQjEQRRjkMD2BGO6QQiQbOujluLjtawoAPTpmm2hy1ddHTT6dxxGiVVv3pacRbLSSEflyZgzqsNMKV7bgHVE5zYz\/ohXkO0yr2gwYQvUqjjdBSFOe4rfhAixBO0Zt3ntyLkyj+gtNraKmprtoZXMr5wXGBrN+IcvLKE1HDzZ3nvFGLVsche2UGe2eJG1oEtgTWnaIK7RvMi3pSuyAwDFUyoRFPAgIAOw==",
    														        "firma": "R0lGODlh9AEEAYAAAAQCBAAAACH5BAEAAAEALAAAAAD0AQQBAAL+jI+py+0Po5y02ouz3rz7D4biSJbmiabqyrbuC8fyTNf2jef6zvf+DwwKh8Si8YhMKpfMpvMJjUqn1Kr1is1qt9yu9wsOi8fksvmMTqvX7Lb7DY\/L5\/S6\/Y7P6\/f8vv8PGCg4SFhoeIiYqLjI2Oj4CBkpOUlZaXmJmam5ydnp+QkaKjpKWmp6ipqqusra6voKGys7S1tre4ubq7vL2+v7CxwsPExcbHyMnKy8zNzs\/AwdLT1NXW19jZ2tvc3d7f0NHi4+Tl5ufo6err7O3u7+Dh8vP09fb3+Pn6+\/z9\/v\/w8woMCBBAsaPIgwocKFDBs6fAgxosSJFBEBAFAx3MX+jRwzauMIsqNHayFLXhwZzaTKjSgxYbShsgHIlpZYzjApwSbNSTphlKTQc+cjkS9CXggqtBFRFj+Pnkw6FCkKoxmkQrW4dOrMDVavGtqqNSsGsV4PkR0BlmvXsoTOhkir9inbRHBF1I37cq5Ztx3u4nUgNydfvVyo2h1cNbACxAdwEhbjl0PkvwwYG1iZ93FhyxUMH86cYHJozJo3c54gOq7M1JcxKy5NpakH1hrcel7t+jXsKLcpm4jMuqnj3VN6114723bq28OJP5GNFzQJ5cuR03YeBPpx5Ml1N67ufXR47ESaj72+XToC7QsYnybPg70F85\/Vfwdvv\/14+ED+5ANdWQJfxumXH4H8IUHffzFNZ51lp3F34A7+RWDUgJI1CGEA1733wH4RXmhhh0Shp2CBGnL2YIYUevhheiqKJxeJgmGoYoosrnjjWAcmCMFSITo12I\/idZajiBwa+eJVPAKWlYxImthaklIWiVtuVpIG34RVguZkZUKe+N6UUK53ZZm5tbikl0F1uZiW9yUJZolMmmlmaye2SCB6dbH5JopfDokanVfi+ZabZCLF54IzHvmioBhx+SehPaYJo3RdAlginFEGeuaTmkrapqFgImojpXN+6ueRUaoK6qFf3oUflkCqmuqYW1LZap7ukTXgoNGhmiGro36aa5+I+ZX+lpWFRhqqrayaWuypISIraICi4oajrWrymauv2lWbArRVZpsYs9FW6mi6K4g77qTaNitssY6lu+C7H7CLLZLlctuqoq7SSQO++c65b7zd+icavyCaq6a+sz6K67nD8hqkwX1d667DRGIs8b9SJazwr8QCuu3Do3a88Z6TOXqCv6oNnDLE9qJsHlX0Yrosx0a2G\/PJKHMK18296iytxW\/qOp9IIx\/M3M1AW4zzxboxapPRhNK7ZdIMe2z1qnlqfVLXaNbpbsTfxXmewGU3C3ZeS4MKcNkzw\/x0yCQfnel9P3vaabZzE5zpS29\/jXfdm+6ta5mGgyBm1WZrHOZWYpf+JvS7dpMZ+OFoxVijYU2uxnXUI2Ht86J\/T1q3zKePNnHlrpOOkmuhl266taY\/JeDruu9O9EKyJk67378JfpmxvB+P\/Oqxu5y4uWInD724rvMnvehyyx290C6mDi55v8P7k+qrZr+71y3X6rT35K+veNGHhhusstsqvxP73feFvduDr+230uNNThP7AZB1nnpfWG40L1JdTjPWc59WsHc3BjlIe2XZWtGoZMGkXc+A56NW+giTwebZq3dHgSAHrZU92IQQfDMjYQkdqLfusE99+zNezGq4sNesSYBaGuBDFigwF+ooa+ji4dx86BAcji9ySGzTBctHrhjKCTtKbF3+\/FaYMuNVLjoR5B9xnlchFjFvc7wL1cJgtDEqPu5WgvPQGPvHw4alh3A4UuMa53dCDRWxJyzpiBGXaJWleXBRzplc01pnRSMGEksfu2PwXOXF3YCxSYoEz\/yS5R1BYiiSKnQkulioO+BxEpA7tM8dQfa\/KkKka8ZxnPza5izFfE9zBEybG9eiylUabWht9FXm6hi6TIZHeRMUpiczskvgbNGEGdsj4JxYMEIaiIb0QyQb9zjLSDUyd6ZcnZ4USD1hUQpWpYwbMD\/5zDxmcYqFs+Pj1GZGNr5xmuhMJ+ZsCaR\/hRNYWGxcA6VYqRXJsW2zaqc7WwjPLsIxQRSD0CL+bXk6V1YzgP7klqamB69zQrNnBcslMq\/ox5FxSHLq6tOMQEdQFx2zftyRzbPgBBbo3E9EKF3nryTFzXLik6OJ1F8f+0a3e+ZNaitNCiW\/RSyYjghTDZ0lLWtZOxn2y5eQLKhMtNgYa5oPlLJTzlClOtV\/bjWN2DpkL33azZ+eFahnE0zx7rVAo87zqZzKH6Q4h7uuFLN9Ap0oIKOF0CMiEJM6NGhVAyc7jRH1kYhTqGK9SJ0CUU09dQJiXosaocaxk5unyiffEgtWxjaWrjtT0PjwyDPTMvOVOwXoaA1rT7saM5UXzZGPqAo0tr32sKP87CWllTbEktSpdHRsY0H+Csu07udSuJorKbdpzN2isZlg+y1wzwPRIv2Os9Id60BzBqVERfSUrI1nd1eG2dNuMLg3IC5pj4tLzP5JnOmV4U9rKl3qMK5UL9OB\/2Tq132mFa783U58oIvX7noXbSLjKXtzkFP9KXhY6nxYYKvp0X0Rsr7uhO0vHfzg9jYqrtQUX3bH68k+ijhiJD5oUncZ2oA1cW8WbLFvbjJjxP3IvTjmcEonTGCViVXGGX4akMFLth\/Y2MhHDnJPl1wfIge4yXcKJoJ8zGQqX+wKRV6vlvsbGyx7+csa\/kqOR9tlMpwZzWIuA5TzO2U1YJHMVTZzm+mM5zzrec987rOf\/wxb6EALetCELrShD43oRCt60YxutKMfDelIS3rSlK60pS+N6UxretOc7rSnPw3qUIt61KQutalPjepUq3rVrG61q18N61jLeta0rrWtb43rXOt617zuta9\/jYICAAA7",
    														        "huella": "R0lGODlhoADaANUAACwqLJSSlFxeXMTGxERGRKyurHx6fNze3Dw6PKSipGxubNTS1FRSVLy6vISGhOzq7DQyNJyanGRmZMzOzExOTLS2tISChOTm5ERCRKyqrHR2dNza3FxaXMTCxIyOjPTy9CwuLJSWlGRiZMzKzExKTLSytHx+fOTi5Dw+PKSmpHRydNTW1FRWVLy+vIyKjOzu7DQ2NJyenGxqbAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACH5BAEAADMALAAAAACgANoAAAb+wJlwSCwaj8ikcslsOp\/QqHRKrVqv2Kx2y+16v+CweEwum8\/otHrNbrvf8Lh8Dv0sL5eZnc5P74snDzMbAycbfYhfL3pNBxsPhgMjCweJllZ4di+BKycvHydIEyUFISl5i5eqTB+fRActDgENAwUJLQ2Ufw+bK38zvKvCThsrKxkKIgwCDiYuJQMZE0cHIxOCw6oPgnkzCwOwHd1CDwEmDhEOGg4qLAEVK0UXCyvj2X0vCxUlGQ4ZLR4UWEiXoECFAoUGXGg1KIUICQpkpDhhLZUQhvfkPNhQIEaFFAYcuDBh4kECExkuNDgQgMM5CRwstOgw4UCBCBk2TLhgQYD+hwAFFlhEYi9jmRQOEmQYsKBEgAErGgALFQrYigUbEmgQQECGiwwmFISoEMgBBxktMqiIkaKBUmy\/sBkl82nDhQcNKoxYEaNAixgmCspokKJEhQaLPnQIEMGFBBYiZLCQ4MCDYSEdGqRDIMNBhQfx5rI5EMJBCRUKKBgIIIJDap8OJEuQEcCwpAEaXESIoOKsiIGfsb1IsSBFjAYWgE4TXWbBhA4JDBhIkaxEhwodvi0wdGFFhw4aJKjQsK5Di4sVMiTgQMCli7UtNlQ9UaG0zwXMxRxoYEKGBAEiKDDABousUMEA5oFmHoHeZFBCCxYY4EIBE8yUEiwDeGCACv\/+zRbCTi9UcsJ7GiSQXxcHTNCABzIQoIEBGnSQQgoHdJCBB\/895FJvMlggiwsJ6DRABAGowAAFCgQggwG4\/NVCAi4AqAALLsQQmjdFnWjFChFogJoMCZTwwQIF+BigDDKcJYAMKoQQgAcWxDCSBx4s90FUITCZgAgCcPBQADF0UMCDBrjGgQsdDKBlFyeEIIIJGxDoXAIqtKeBCBr8c0EBLqwQ4gIXGGJTA+w00EIJCYAzQwWAFqCkBAxooEAEF4yQwW4GsKCAAR0sasUHE2wwQgEZHDfIBQ5YoAAKzmjgAYMPuLDrP+YYYIJ4HEiAAgUymCDCWhlUGewCC8QQQQP+GpDAgQO9zuAqgCwYMEKWvh4x1AYpRNjCKCVEEAKcFhj0wUIbLNCAAZJh4JMCCEjgggMMcOhfCCag1s5kEhrgQQWOzHBABASI4EEID74wkwshFHRlvUtM8sABMVjgnY\/cihzCEA+UYAFEAliQgAcZkNnBAXlUw5Qg30xAbMUSkOcleSW8HEMAIcigrgstpBLiI0OxbMQEFlQwxIoKCHDOahOEWUF\/7mBHtCPRhJ3ZCAOEEEFHJTRA0wB5DRvzViqIILIHCcQTQEQAqlDCQl43ougMJ9wYncj4XeCCBSYwgMHIVUWVwsUYQPReMgEyIAGf5J0VgIMOVmCBCgLA\/gz+Vvy1CAMLcU7wglyNJ9FBriyQMsIhF3QgQLwJBBpfCS6wwIIDCiRFCVMIlkDcACWYEDsGFLT2GAUeSFJBOmf5B\/TGFhCAAAMxkLtT70kkIMOjKdjVaAO7AlVJPhL4u9YI3BGCfCCXogysYDmosl4AJqMMAHnlOi7YCgVUo4G9HE4AIdhOVRoniK4VQAYeKMAIBKUCkZggBiWohMcqIJ67SGIGDdCNC96DsGaRQAYCCEAKXNCAejSAEOtoEQlY0KantGB+swkJSuQnELExAn5DUIAEQDWDCYjMWi44gCD6NShSxIMjKUiAAhQQEAMoIFss8A8J2oFDDBCRGRWKAIL+YiGCG35Iiw8IAQeGyIEArKAEIuCeAurHO5bhpQIaeNwCIsABDmhgGg\/oACMFEIPljAJOEbiWPySgkL2MIC0tOID1UhACFVwLQGdJwLncBaNdaQAhkWLH8ZjkAdhxwAARWI7XXlCBDWhxBriIjQYqkIcL\/Cx2URuAcSzwurUEACgDMMAKHmCwCUhiAidowQAEEawRxMAAAmCA+tZhwAJ8SwAYUIALRrCIECDAJRGYxLCARK\/8DIAsQxiBAzbkAKk86TFsmsYAYIeaB5nKFnaTjhRRMMRLnVEAujEBKUNwIw3gECYUqE2Y3PQtDcRgECG4FAs+hI16ZmQXOBlCBQz+YIGlgOoARpqOMgOgAQaQoCsh4GYEzkgCDEDPjE97DAtQcDsOMKBQDNgVkEjJAGW4aAKgCkBscBeCDnyiBJIxQQq9doGPiCgDEijJDC7wAv\/EwAGhGCi2pgOqFHCKA8zQZideMIJKgIZcDWAMeVzAovmF0ysg1BCaFJAqSZiFAiaw6gw80FSz5aJrzPkAQiDnLBc8jksSqMAHtjFQDqgAVPPIQNVkUDYDFC4zJ\/hjClrQll6OaQUFOMQgnrTApOrKBeODHgsEYIBQRUUDMZlmFQ0ggni1C7IZSYVmFHCIF2wAfwYoAWZkZcYPFScZClCBtXrlAgT4SDowaQ0LPKD+AWW1Jmx5WYlzKkBe0iogBv9qQQAIIIBbPKAFBiCACrQ5gxUwxgQciEFitJQASi4nBZf6KORiIAAJZMAWI7nU8aIHJiHc6EEGckFbIiAnC3jABTicTHhNYAFToEpDyuBALgnDIhKIrQPS2oqAh8BI\/GipAo8SwglO8LqbvaABqHHANKCkAGewgAG39M4A0oaOChyoACagFTkOsAJCGMx6\/jvdWVjqgBRoSAUoMIAgAiAeFRyDSDe17BAG8jjmjEACFhDCjxXAAAfoxCEkyIAnGuAwVsEkaKDKnn9g5D0ZJLWX10lACGJwi5lUQKC1sIAGKOAnD5zLIRTo8gkWEIL+M7bpL8DFXQcekIcHmFY0L4gZ8TJAHihFoCcSSECIIsCMBTyATvWoQLJM90yPFEZFyYsSCSjgxkauqT9L6hlbJvBqWFFgQhtoAQeomiIPkIAEzwKGHjmphxeQjDmUWBV5XQDVfFFABb0iFYwMA9wRuMtIlHZAmykyAlaFU7vkIZIDIqMBBHMAAwxYRgK8\/KYIHlWbEiDAGnvlThAooADaTpYH2mXSYbQAuBKQbgEqXYkNzI\/RjmFBBGxUXAbENkX62NnxXkQAMc8gRC\/oRQdK8Jx9uY4Ca2paoKgTsRc5QAIkEEEJ6JMaERDTDkd8R8VVsZAFnE4AGbBVbOzMFxL+t2AFLWjHU8bTYPzUDWHSiV1VCVEPfsCJogDBlLIqNkYPW0AZUbbVpEmQgD0RwEWOaEFaLHDcF2QgA8x5gQeu1QDDLJADxORJZIZsAT+5js4OGIFJADQbE2AnngNIiymNSmxDLyMEPUkGBQIugTylgL2kNU6lWDCBtNG5Z744gBhVgE0hJEW293gA9BKAH6xC5llgc0kINhADyRS5kTKIQaRMgAKhK40sHyQtBRDQHgWM8kaEsxHop+YATgV5RelRAYdasxoKdUABJBBICTYgSRUAfgb1rgByL9EB\/VbOApCB+AFYlABrFqlHEfAYIYAQBQA96LY7GcAtvUFfImD+AIuGPTYmBMUDerHTI\/XmFSzgJxsiAQFgI2VjVDEwAlh1Fs8jBA2wE8tRSKtwACNxHhtgARSgAYjxABYgA7pzMP\/mZBrAAglwAGoBIKSQFunAACbQAhWQABUgFHllRtl1DoVxVqaEJsliFt3iIyQGGTHjFSziGkBTATFwZK9UajixQdmwIqGwANcSSoPwcybSARbQMAXAE+uCILDDexMQAGuiAbk0VgGgGwMhK0nFJwBzOrsFPRqmAVTzIoT1SS5AUxN0S1+IAa5BHOWyWwYAcQ9QACkwAL+gCi\/gC\/31HxD3ASlwFgXwHT\/nYDOQAQQAZ2GhOBmQAmQ2SAYFEi\/+EgM4N0aOFHUv9wFHqAJw8hDW0n\/fUEr\/EQGktE+URiwpIAPN534DoEqVlwLAkAAquAowFmsv0AExwAEUgBgNAHrOMgAOIADP9k1gMgHqkAIQlBvisRQlUDVyk4SD0AA\/ZE01kRY0FD2KwxH+UlOmpCzkwS4T0A53Z3IzEDMR8n5GsQG6YmMGkH7ZUXy0UTwAEjGHABYO4A4T8AEDMF8ikAFUEwGDxwApIAgbADD+0QziQSQheALdwRoNVno50QBWQwLMkInWMgL2yEwNFk8LMAKZ5BwZcQKw0ysPkAITlAGydzyytgDssAx6cVbmmACG8HPOoBAMNl6NyH7+FiD+DvBNyeAnAfIo6lEAJ1ACIjEemOMgk8YBHmCPYGkZJ2BOFCABHpA1UMkC55ENmqg7L9A8IRltGykDvSQQRKRo4JRd1ohIsfZDC+ABrsF3ItleA3h1emAuhkE4HUGS+ZcCdbUAGQBXlucqvdFn3jJBKbACFMMACCACinIC36RgqwAacuYBzNJDMaACLhASK6U9nXJW4aFh1lNCUdMBBhh1+SID61AQd3EqKaMhJtAAGeBkoekjLEABIQCTpPEmMIFbJpB+QHIrpxMAFlACi0QBVHIeE+BE2hAa91SRM6cMD2KeIRFCWuFZd3MS3bcN1MECMTAP6JgA3mQKMDZGw0b+WsuAOKaUJ5fjAcJoAgGgInkCZ7VEXCzwSmopAjCgYgOAixCgAFIhZ6pgDfBXMTn1MdnyUSOAQ\/vEDnAmAHfjAbxFVivlDh3wR+EhAwgxAZ+DLSVELSljDsyEfo4UAPtSIQYQVoCSEwMAYryVGqTlEws0RCKAKAwmAhNRmw2QB4ykAjaxMyzQSyOgPV0WAfMzOrsBGQ1gElMiR0CGbUNSJmpHoAYSH5FzC47gS4thAhaFOxnQAHSDGnBZgBYKTq\/kAuriMz3BULwyAo4CKZ5YCRUgACRwHlaDAR9lTuPFKbHCDpVRSxKQAhPgAiKgNuWoAgT6pCSQG3YDVQlgAUj+QVoWJauamACCkgIcdjoaMHzYIzhEpA4BySbICFw\/IQkmkKFIiDAeMH90cAA4pAHHQGkDwSn7pKtH5Yiv1g5B4wDnNj7ZpQElsAIegIXGERsBslu74lZ5Yg7kFYPxIhUTUBpR9iCi5UiUAlH8MCXvlQHmaAJYYQKSaADg4AIRmAgXQFMBwJMW9VGlKAMURR3lVSjdVynAeCnDFwJU4h14KAKzcIdAdxYmYAsJYCpNEQPR0AKc0pthMSgdmXXrABQsginmkiyHI4kUY3zQEBbgEw8P0Il8UAJQ9wJCi24nEHzIGBENKJkC0AIusDkJIAEYsE4ZQDlgE1ZkYgKFMqr+IhQDdJIskDEbGqC1wPhJuxk6JWANQmlo6pQWnuWj2tMZgSMWEQCWCNIaMhABcga0cRCYAfAIwFVJp\/FsFaCoJOAjjuIB3dgmHBICsSAeMwIgFhCfKACxuFofFNB4juQwJFEoxZWh9UoS+6YCg1J8AHI3vSELBfgo1WIBEfQYAxEzUoR7iPAAH3UAMBgBKQlXdyMCAEBJxacCb6KsR3aSWIWkYtQZpAIr7+C1bJcmGsaTkRRGmjEexPUoMkRnDDAWNxJOBgBfKtAtfSgAzgIlLBAW89NHEBQAwYAIoDADKcAAPDpQJrBkGkAAqlEA6JdpD4EMI5UA7BADGWAB8ov+nj8nAyXAPGezTgsQJ\/qAiAhDq7HzD1ohANkFKDMUGFRzLXFCU7fEG+RRQmP0G7X0bHjgUdc4Bx0AGR\/BDr0imbGWApYqAbAiowAWAmWqAieYKx5bADt4qroWPYhSCf6KWOhXXN2iTiLQHiLRb94io3ALTkAhLf6xM2N0QgogiY1nAj\/RadzSZikMBy8QARQQJCHAW7VAWrFWABFDUwiAiL\/xaiJgJRqrYcnaM9zoLclRP5mUDN2iYfCVhNBRZEbSFepxOL16N5mTQ8UyJSKAc66BMBaTUSFVJQaAtmTYBzZpAbxUKBPHJiJAMhyiSgFnwQmwQEyqAtxSAhAaEwX+ATtuRY6OdEJLNnOAxIHQ0wwcdkGZi0IxIAHfy2oAoldmcSgSQAHqkiw0vCbqwmGwIwLzkggbECADMAAEDF\/SogAVNGkSAnRkdBLThhNLOjVGosMTUHwkoGHSoaqGwQ99CCjOYC6xY4mYsyEXnAIimS1ggsq8GQIQQcNL6h8fXBl0BowDDCBLtwYfsECeQcAqULgTtCHh5LWSIbxqCVdAMxntoz0CABWSaRkRsKQowX41SEkRQEw8GSywZTegF2NsJzfJ0IpvogFu1IjyozCkNW1KZSsUAAECcBg75Ap0cAFhFUbeKBLHw3eqbADstTm6Ji0+0l7qcTzkBsB4LMP+BAA0UJIsEWAYHVE1JuAmqsRh9REmoJkvRWYqAOyNwqsxZARllBYg1rIz2ZIUQAc+L4cICbsXNC2uFrBwDWDBpeQnV3EpIgCjhLUASCaDZLY65AhnjEEneXlA5lBcvTEZtGEfuQJnPPpgDMZbYVMA1UUS\/2G9kkZib1JCAIKEzHcoKsQHm5CQphMDDMYsEZBGbqKaLAGWChAyMzdU6owCDrAff\/23wei48egCRzUeYdQWiSLAllYZe6UxqgShIkMKktYjvfkQJTYS3NIfgKIsQuYCdwkPiXACS8pM\/oFk5qhDPVFVaMpSVTPHrIEBifTIQtcC2eUBblWIonVYYZ3+N7YCXzQVVhPCaOphRi0ig2IEGVJFXA1maTBCOEXsH5OhtTBwqtFBAC7grG2QR8OULyQAzGUzK8kKmzFQZyWwpITVANmJQbDD1CVAHjMREYwx45mbSUc4eF2y2NrVH5fCACMhAbSN0TjBG+L3YWxSEDHzECghRf3hJzWIAjx4AIRHB3ZgPOu0gR5WR3QHXP7QGjMybZbR2xygiYdyI8odAuG4JEBzLc4ywOBkSg9mHOZSsjtE133iDDPkH0ROZhFTMd4Syv5LWCDBugIBXIfbCTfSB30YFWtCOD9nnmFRJWdkGuIXASvQeKS7JxKxAsugQ7JiEEmCiMyzKwKhsrT+QApQ4t7qtFIu4I3fwhY1lVQOaDWh\/BC8CSs9IifGWQJAF8ow4W60+waakEt5pAIchn+DYQIUIEcRgAGhvIMhwCWxsmi7pbsJ8Dyk4hUrIqNsARMogZ4b0LlJRZrh6xqo8TM788jKHgM0XV9ezMWZ0z1Nc6VTc4sFYFzo5wBh3AYbYGcLYME3IrVam10imBofRuOslr\/i50c0KgMXEAJCjqYiEAGvrAD\/8JFSRISy0AH\/IiODl3C8myGq\/Mc70w4tBRmKZiRhFR0C4SbLMAJ4WEJasaV0kE0zwEgSOm0Xv6QOACEc3gBBx3sewloCIBUuTgH4XCLhKACFIbfYFKv+zGkBPSQf0Rgn7FAsD3NGrmRK4SuLixzW9sHF8+OAwFVBLdEWNL2dnxMAQ+DhZ1AgvTrAqkGSh113Nt7eXII7oxC+RxsbQDLHNJ8c+NMf\/fQmLlF44fIw32JKydAMjIHOmOIm2lNk2eONchQAprOR+EtiW1EQxNU0OJcSDdyXdCAn0Ti2eXHYJ\/Cfi9Yt4dhHBxBNBBABD5AbOCFq\/lxendEv1sIBCcxaSxoescYWtyKW5MRsQAdC3hR0KxURDgMnGehZygAml9KrNeUT4wFxKNsH+zACsvIPpVR4GahdfrIBJdByjtAnClAhgxILvKUea6cAMxECmbY4F0AnJdb+AYOXPUAQCVkCkUrCoEhlEiqWoHGIMCSGgEnBkhkEDI1DJWC5LCJGpiUiZRYh2egxk8\/pdfsdn8d\/DonRQEQmwUGm4CVFQEKDgUFlwoHBYSaBQqMkw+NkxkXGo0OBTMIjglDEYuOlBMxjpMNFQYRDwiImpComJVBEMSAhREPFQsLEwCQkYNfFg0NEISBAhoVDgcChIobFZKNFxaBFDzxc\/G4lIOYkIjvAwaKixSUkwYSDICNEQWXgommgwsBjRgwRFBYMcOBBhoMEyEQ4WJAAYYoRK2KoMAHPhIcKBx5MKKBAQwANu1hIqDAiBAeMGjBy0mBBg5aQ6USEkGYiQQL+DfY87JowJ844oUPlZGgwo4AKFw6OdWggQEGDFTIkOEghgUGIEaMuPAhAIkEDEfViGIhQK4AbASHsCWvQokEAKzEyuCjGwUCCFMhctChALJoFFwvvGTBggVBeJ2TGgqTCUgAHExlMxNLQYtaKF3Q2E\/WM50WBBxumFTCwK4ULDgwipCjWwQAFChlKcKgwI4MABwOE5RvrYkYLkRJSdJDnoIW\/hB4KcBJAxEGxeRiUWlARo8JgBxpwPU4QQ4CMGAIpmNBAAoGABGaCSSChQAYKAhw2lJAQ4XN+cB8226zAe5okDHAggy2QMyGSFkIQYYQFVJDhgBYU8GCFCsJLoQT+LCSYIEMCLFihAw9MiOCCABigQAAMCxgghrQsMMECFhiQpYQVTIMng4FIoAUxDhwwgQRzZCBAhBRskkGDBanggAUSTHjAls70m9KOEzzIJ4UwKhMlAweYKQAZFqJjQYMVDKinAicCkEIGFxpQgJkUFoAzgAHelGDNAVQgroQSQoggAQkwEMCACiaIQQEFqoggA4P2hK9JGVIwAQUnJRBBhRAqM6CBQKMCTwYZdmGghQUCWGEGKamkUp4UOnVAEcOGw4eQaA5D7E2HnMinQBU8+FUBukQgM4QOHKAggRMKCHXFEjSQIdMI0rp0sAyRJGaFBs7Eax4WAljABRRciAD+KgsSgMkTBwLIIAMOEmEpiQk+uGDVemcYYcIOQmBMBA00KIAFDJADQ4Uw8KyFiBaAaeAFF7yNQAMJXBgBK4mRUMCABWJwLwRwZRuxRRlgESERcyyYRoEIWugAwWG4kKGEFNjRgIM9jdCyBYgDUAEWBY5hIQZ77Y1AhRMmsICCRDWAbwsZKmhgz4M44KAXZ2IgRIIFli3kNAMGGMAEi8lgwAMLTjMiBmAKgIQABaCCUQIWYkxA4WY00FcAF5aSQAwTYvDCNSIrqIABuS1IJAQHSGCggAJCCOEooac8oWOkJOBAg8oY2MKAGBoQxtxh+5SBhOLCXqAEktMSAAUTtgr+wIUCLNDUARdIxk4CFUQooQN3CVyohRIKyCC2MYABxmcXdIsAIazMtqCAEuBzITtCTRCgIXI9rGCBTumVXD9NRnjQ71CRVKSAQCmIYYKkJ7izgRLy0lOlFubx1YkIGsigIgsyYAEFKjBNIBzgLLltYC8KQIwLJrCAYdUOIiYwASQYgI8kuc0C8lPGmBSigQT8RWSEoIILOjCAEkQOfPoRhjUiIIPyuA1zYUiZBwwQAlUIwAMJaFIMXDAoY3CAAsO7XAm4sYsCaAAGDAiUZPRGQ\/N4YGkkQAEDSLCTVxBPARWABs9g0gwDqIAEInCBBijAgBR1wQNk8B8wAuABCUj+IBotGEEMOnAAOXwghUN5gQYIYIAMwK4bGGgGM3AIE0khQQYRABIHAkWAV4ghdpezhAcqBRI1rEM2S1DEK6hYMBXIAhb0KAYBZCAXA6gEIbJggDBQdDWY6KSPv8iK\/BCDKRMQQAW0EUAJ8uiZFURgMIjxmwGqoJqqZGBPOxGGMURWAG5QgBRUSIALSJBIE4RhL9GAR9xCkqguIYAECmnBCXJmgmi0jmbK6NwsxniyqnBDECwS0SJS5gYJNEACpFTUP1SQggOE4BtB6aU4GiARLbaxhRIoQDpYAChFVSB1Cs1NPnQyIQVQAB6KMkIiGKgMAXTJnB0ogzOJ6YANRC\/+BTQklAAocBh\/GaATZbvIALbgiCOO65qHiQwwZDAihyVyWBnoQAp+cseBjmN\/I2CKBB90N0SpYGkGGF4IOjeCBCTkqhbYSyKYIAMORCACzYgHocBknRiUgBYDKFsASoAoYBCDBSKYBxhqxwKo1mIXECkD9Z6hgWIYwAVgZAAGNCCEAbxCkeKZ45qOOpQBNE4CH4yOBDDmL2QGIn4WaBM0ROElB4QIFOcyD75yJxwVRGAAScjbj4jWDgGwZFiTYaUCX1YS65CwDCkyJwmkSsMqMKAmEkCBBESqAEywJI3I0ZgD7NhYcZxgAQjJJSf6GVgByKUKiLFFXQVD2SsAYwL+gR1RAPgGvU8oY4JgzcayYhDWV2hWA30IQzIq+CIHmMFzpPSAA9zmgRYczhlxrR0VAqAACY5RBDl81gZWIIKiOjccJzjNKs25G79ClaUGoBkHZgdTB8RgGq7J1Ag0oJvEyYABA7IZrfZiAYjJQFPOwMcQQlJg4JY4GBeJmwTuoRvYIYs3hDpC0qA4Qxn0CAYw9lIAJsAGOagKwlV6iYEnSEOQjEQW0KCAB7r04ceJwI8g+aM0UqOCHy0tISdTAIf6mQIDqcAXzkAICYYBsdxZAGPE2FNCsiQApTSDrSpo6bNEBSOlmFNRq1GEOVH1gO9FOQ\/6OsbS9KI7+MxIAx7+eIJfZrHQwzwuLwUYFh3hJLEvCkaCkFtKBoiwMQ0c7bN8MwEFRNCoZ1VkQlBNFAdC4AEMeGEkHggBody2netqmjkSoMAWCNBScoXAqJDOQwh4RjOlXCqGA4EWJG0nsXmMKBgVItQD9AWjNC7NGLlkRw0jWwBel0AGDagAHC\/WjnwWrGb3MQALEADjQBhXw1NjnhUqY4IGEINo4REGM6ZxWmnrQcJtwnMrWICiPSvCIj2NkYtlJAAElSkdfB0tuUAhwfv8KiR4cpazVFABTdUkSyxIjTTBMJkQnKg6AhDA1UiWRmHIRQsNuO+LNPsrFaCABY3LwMPzMIIXUVsBKzj+QE8eZEZlGHh2NCtABRruQv9xgARnoXp4I3vZGJzLAUJvyF7cnCl1clxuLUwZrjPaNARRAJUwlh8LimER60hsPHIVAgn6coIVPJrpdBBOLZTSggy4mYf4qEALj3weqdolBh+BcQRgQIEWTDOLMcqlLTxYgLNWgHT\/UOThhgC5B\/nZ1P6SRwWLsIvYJ8owHqTZfWgG4\/kUYAKJyry7PPCBNkCZ6aFpIBg0UAHrGHhp2InPP+KaFi6MIAIeukcg1FrKBpBOBvZYZQpYkoKrBqsbLZqduSqwDAWyRGIuAPFADI4Ff2lqJBhL2lWwpwAS2JACZCQBkOmrFMCMIEoDUiD+8epgA2Yg+PIGUWDslO5DBWaEHXKnAnJBBd5EgHJkLUpgRuQvPLgMzyYAGQSgOVKM\/MyDBUQkwcboJSoDUUABUcqg+QZBMDLAADngSvBCdpZtWe7mlLIhZsLJ+SjApEpgABbQqBqwBdghBcymc2QgPH5hxt4KmGCM9JRFFAqKBWCgWEDiF67pCUvJfv6qEKZAxyCiGXSnSE6JqnhtEUopYiRmGfxNFliCBDiAMkSgAp6FGX6FAmwIGSyACWcAj+bgAi6gRUogARLhIHZEiEzhKjxgAAKATBogAmAqRDjMOByAANiCWTxAJEBPWmiNCiWFE36EBHhGAT4IKwBFAtL+JpyAhARioCecJAACUAuwLQt8RDX2qyRcMWWWQsOQjwkvgIaEY1igY+l6RwY+L8FQwhQqIGw04uBEAFz+oQSwB87WAdzcJAMaIQFAQugqq6eoId6AJAQ2oHNioKecTwJGQFmmAfuyYF88zgVmYb\/eIwIwYHbi6pNEoAM+gpcOkTOgIW1cICN8pQBWwHZM4IgK5jAyQnq8Jc7yYR4SoANI5gt2gS6G4QXmRAJSSwPGhwEu4iZioQCuxAMmoGDcqE3gJAEOYAH+4QU2ACYwgQECoAySCxRCoBJCAAPCyQBbwEwMAPEOcR\/GhRK9RKHuBLBg4VnozR8KawqC6JdEwQP+IgN2LmcCaIoFGmBBPOi1ZsBZMiAdXvE8LsJf7svPpAHMokNkWkpv8A5GwKziMGUp2shdLIAACGBwYGwDaGgEDjERNaaB\/jCyYCTNAkYRCMCuVAAECGACUuBEmEcWGkBP\/EYACAAK8OyjCmBHUuNtkqQcHIEbVCx3CscwMiI1dsEYLuo09sQJWlGCqikLMiVSqOCiskI1\/Ehklg4hg2MJjwbGPqIYIIYDMKA124R1SKADBIA6cJFmhoAFosI9HKAlq0CtOEAiMNE6zMlZEOAgYocSCkspFgJjFCFWMHGXliY742Yw5Gp\/KEAFSkAFMEAaXkJARMZHbCFoinMBTiD+FdyDUAIRYiqOKm4REkjAAxAFA4ghlEwDRvRTABagA8AoBkYAs17AAVigLs5gBWyzMlojjMglAFIgAuIGxtooAwDmFRWoGTDGAmLEG9LEAV5gAFhCU5zSzGjmbuQIGR\/uAObFS77AAHutAnHzQcgSTsyisqpgFsuRCEyDBaYJe1TGFFqgYYyLGkrgJgllPydENmzB41iNAsqubCKAA2Dsk7YAjtaUBeTGA0CiQRJgACokAX5pRBTGAOwoERGyM5AhQoeFN05EMlDjpE6pmmBAPZ7vIYRtqAyGYIIHKi6BsvbEbzLAPd7BGz+TmKjC9GYhASDmOXJnEPpFecQAplr+UC7kKmJ81AM0xl0qQgAG4AEqYCmZsAAuRVTwjhaYBMxk4yzKwDz48yVzxKRITJkw7pMEwEr4jiKmZhDaZN4EKLAoC1pkZ2d8MsV+QZBGQmK+4CVQpBieIEKTQItEIBCAAR4JAE8WIQGskTiLk5oyRxbg0KuqAHsCQHbwxAEiwwVeQIegSYcGg5j8h6UkMgn0VCAUAFxMwPxwKR8LRubQ0hkGID2ZgEgcYGBzD2DDhgz20MUSYQPCpaGcwDrwswNMBCfgYVCZ8BDeNJSGxfbwzK4SgBENLABcYTCCdRBYQBRhQAHsQyV0Ii\/28bpWQBEcSjIekSW2bAUSgDVWYAL+XmMDeKY1rMBNudNEDIMAyOa+ZOBoADIplGBZDOBoQFNleLZIpa0J8CEG5gEkmtMw3HVCKqOlJLKNKsMavCRCBe07LCJ6SGkAMIORciFlSsBh\/qSC3GwLIgY+YEWMNqanCkaCkmZA7iMA\/Kw2oMLNWgczzYJm1nUYjqIDivNeIuAyX9E0DCNu+uUJKAsx+CZ3ZMdbUuAPMaCNYgSYQBZKS7JA+qgErmADegwLeC0AANI1ZoQILoXH2JMWTsltKGBHYAVjPIACfFd6SCkiK4IAItT0rEAOBIoJN4BexrHG7vRypgYF\/OyajOJ6ioQhM8ICqGBUsyEQIuAFwCOyiIb+KXotA1YASJxhRrQIBSLgAMIlRe6rFY\/BBH72Ka7Lq+RmB5MgYCaECxThJViGkZrMOhipVw9xY15EtZqEb8oob\/JhAS4FzL6ghqjwVJcGKswoBdxxc5gHFNw06TpAAhAgh\/wvLXitBWhNN0imIQATBVJmYGeHpawoEMiPBJyTC0QAdowIGjII70IUP1j3fO1iCKgzGiLhVUNFACBqDBLni4oDWs4CH+yicIyAGdqhZWyCATDEnJig+lwAWVrgPQ4DxfTRZMPAj55lR66mE04AFJ9jHmSgau1xAz7MBAjLjRIgVcD4AHQu4MIjAMNmRvJyPLjl7zKgAvqlbHLnaoL+IWZkgY6+8MigaglgZAgwB03Pak\/0xm1AAo6s4r4mYxd8BBbEpAHwNjoKZgRcSAYKUgFIbBA38YvBeBxJcVjc6NdQbGz9RRTKABSgIdNcIMWcxTx2ZjKscU86IA3OIAtK6WQyIoRSAC\/MJsEwAU\/SB3vUZU\/ioSQughFgDwVQoO94hm3oIhNdAAES4DINERFZlyleYDoFAU78SnpZwgXKrHPM6U9mTQN6FFN6IljWAyY6wBpNYENJoAUN8KyoMwZemC35jvwkYwiedmk+CxtMVzKBgUkyBwzkyoUwYAAwMyQW4SjgURPA2AMaMAGchBNeES5fAo7ai4DjhjkGlqT+PcCM5oGB8AlJQLZg+ItkIgBO\/iOJVvSLJmBIMkiBEEML2qRmYoA3iCwPocGMLkY2NiZRjsD\/GiAGKEABXyJuHy4RN4AqHPG+EuVyNAwYjiGOr2knwgqwFuS1isHxWKIgNSs6LMvdnsTdsjQL\/ItvUuCICCRWieme81cEWkgLFmAB3AWLzQDMdOclUmtqqhZPZkAuwFgR500AWqAF7nQf6QwL5O8KHIB51sEFriAYGPK0CKGAhsAETmBDVWAF5EcpH9ECpAAGJtj\/IIIKRkcEPgIvLkwA0mHZUgBOXOAC0gSHpszFzmMWteUL8ClFZiACCgC3z9cfJCBGMWY93oP+KmhhKdwETKinLCxgvwwM3nZJqf7hAlhGGxCFju70agxwOETg+2BAMjRsgnC4vT4MnK8DGl4xQ\/LiAOZBv5VkLfbRAJSQWdxxAe5bDsAaUwqmaqo3YoaAHdpKq4zjbTPCKWbhAFYgcaIHZOmmYHhDb9JkdtwML4aNAEaimlpUZJjnTwUAQoXDg8DGXyZgBAxgleDRzOLBAFqnI5atvQQAVWBcd3ARJlogvPzMr442CeSPlVsyWBwXQ67EHaQlA5wOCMFjd4DBA1JgPCIgfzuhXw\/ntUyATI4srjIwFs6Kv7hMKRSCGkQgAqkK12DmEeFov9gWxm3bA15AOCTiEpX+IEc8AGqcgUVrARcGo\/1+YS0eQAdHZAXuyxKhSGXWgXsGIzfy+Iiw2Es4zAAtQlB6amrAoArooYJWOk365XA0bN+uTeiM9nddIM3vewW+QXre8TBGQAfJOiQMJQM1nGcmgxga4ARSQzAIQQVWxiwOQPk+4AHy4h00IC4eJKWoczWcgShNoXC4A3vwjAL6KAEe4JdGYFn4hrPP\/RK1wHH9qoSLcwIcWm9K4JJXAD4sAc8+SHgQA6wUogLcfbJGwby5bAYe4iek4ABStnYAK9O8ys\/KKJ8QwArgBEUaASFsaU\/cRTpC4AUIh2SQBIiwOAYEo3MQG33BmA9e4ASopzD+n1t6wu9xzKwXOqBPxiUAgkcuGFJUmi9lY2Az9MRzRIIs2RZi8gJWMmJGtIACINVftMBtCIX+qAo\/eSbKNwBOrulOKygYEsxZLoc48OivH25XT+ADCP0FpEBlooOOhuAsUqAf0OAePKiGts41AvUClEq5bmRfsIMhh2rQ5SHBRndzzMZnAKUB\/OpPfiQArkHV4wJPFvFwbsNDs0ivtz0syQBymuu+NeEC9uVpePdcTN48YlQtlyInfEVZRGMGnE8BUKEiHKEW3KTXHDEECoAsc2iCkqQMEKA80EC1E4BHP+sC2uqDOoBRNuCfBCF4+KYDTqAcIwCPoLsAFmADOJP+8EN9Bg5goZoPCEqBgEQVi5lUlkChpfFEmrHSJZVYTAIqVqikMjk6IlVlJCuFLKVVwhIbWSJChsBi4kgsLZOoYGAERJh4GEhwECg5aMgYqEgwGISYWHx5BJgImIRwOBSczICGio6SlpqeooJuOORVRHiMNMQkFGRYhWQMuIRUvGyUZGhVVKh4ODgkyLAkDERomJwkeJw4qJWALVRIhJxoy8SkEDBYbEoocAhIUIyxcDCwGFCMR0gIkAi4KEQKKDgSKMhQQECEAj2pDiJMCOpDqBN+GiywAmrFig8dBsyKECFAwQ4lPGgwEKNBAhUpGpSIoUJBhQUhSxRg0WFFACv+KgR4WOCAgYsJJTTo40DBJJFH+uyJYEFAQ4BGLFiocCCATiEZJkwYsCNARAQXQgsxSKFwLNlRDF8cOLFi4gZQLUYMCBGiGBIPxWyBLOFQgYMAA1JoiNHiQYmCDzwIaFAgRAvEKhKkiNEphl2sDExI3sJAxCURGlxsjRBDAwkVAbZuMaGBgQQDJhIgUuGiCAPZMkR0KKt7t6gND2ZMsODBhQULjDIYMJAgQwRKJqKAdOGhg5YEMxqo4DzAQQhdETIkSTGi2vQIKcw3NVFBBgcMArKGHI3CxIgADgiol0BCgmWhJnQhEJAAFEzFQRoevDDDb7wxmNALBTzwgkqBGPD+GRqPvQCSAwrYkoQDG7lkwAUvUMeLCy48QFkJ9FhwwAABtJSAAblNYIACr7Agg32N5GEBBRwEkAEDGljQiAxDGjCQBYqYUIQLq8kQgQIKMLXBBQs1mCUqB5QwwgERGNBACwXFMAFlBUyQhgQyFBDDYgu0kEEIDsSQwXVTNPDfBQF0EIMBAnTgSgDATVnBBRl800BBCdBEAD8WKABPPms6IIMAT2WgAAYSVOAnA5cl4MJ+HswlggkTaJmqKVcuuNgAF4TgQQwrVJCAAw00F4MFBbRB3AshgrPADC0UMEMHFsQVQQsuqFDACBpo0MEBCUiQwYpPaOGACwPMkIISKrj+I0EKJkCShgi3uXDaexagw4E+CvDjgQyO2BjAgqriC1yCClqQwAMNkJNBB19ogJwMuyAXVQIjlBTAAg2koEUEFywWQQgPABbCATGcAWsEDWzgAgsaOOABBQqUcMAI9MQgAQESBJCACCIMI8PJAbR8W1NJRamrBBqZ0E9ABnySr6oPjPDbARU4MMB4HgywQUkuZCBZACE4U2EClM2ZwAHeCqDCABW40EgLHfS1QQNEznCCBSlsMKYEJTDL1QHM9uMBByxQyIILLzjAAmvUmhSCZEuKBumumXk9QQRtGZ3qBweAMl4DMxTw4QknUNZCC5egKZ0mCQwScwopLLlkA6f+cRC1CTK0cIGMI8xQAZ80FTxDNSmwwQAzI9zBAJUKuACMCJxENfIJheFRAN2CY7UF7B49Fnm+FzT32xJxdhXCAnZpkEILX5jQgJy6ruAFVqQGIK8HF8QgQvGGF7tsAS\/AcbsIBnApQB1LL4IFGIDHXygggfCpQAZEWoEDMKDAdH3hSQhwVCQUcBLIWU9LvxrAAx4QAjaNIAaiWcEIDMAZXAWAA1OQlwNKkIAQaAAfCSBZYGaQgTEUIDxYwEU3mnUAu9yqBe+pgKJE8J47CMABZiCQtn5UPBlJoGRMYYFqIECCZ4gAEpfLIL7WAhwXxOADK0hBAQ6wgl14YAVj0pb+n0LSAkWV7WNYqdYLbiiAARzAAhI4wQYs4IIVwMoEC1iBhVYAErF5QQAc2EWsQjUgE5TAAfe4WkEMEAAdOWAS6zCACxywkud4kYv46kAKrhSMF6TIBYPxoAAiICMZZGAEtZLLWozhNQW5YBDA4MDlPECCEEwAYk3ZjAlawDFVDoxPAPMAyNrnpgAQh3hQoFI1+DIcE\/zSTM\/ZAGWEJcpUHaAF4vlACQQglhGoQAMFCBRHtsYCBTRgAAkYwicWIJviOQEyHZCAB0ywgggIgDHJiIIJuFAALajgYiWQwBaPoKBqHOBQk+hOAl64gBOkABIV+lQJKoAVC1TAABzIzTf+tfSAqAFnSZPzgB8VVSRyaGEWQYuBsFoAQ9EUADT+WoEIGFUCvs3gGhk4wZgeVztGjaAFf1JWSkzQBELMYAUkSUMMFKCxOKXAKjkiwIY44Jk\/wYtyJW3Qb34TMqOqpAQTcFtWWlCBDBSgAsZJgYt+8poRBFMQdgrOBDogAwd84AKTmMlsfvOCCHCrAfVwRD\/9yIKZYSYAwkkhA1CQgAr4bxIsoMBfLTAzPrkyAwm40lhTdR5Q+OFitetnDC4wAl55khsL1QBXVtABGNICYrEqjAomsAETBABkxsiALJJjC3swxipFcgBBbJJFFkjAMxKYZzvkcIlFUCB8uQjB1qT+o5fSNugABWjLD\/94Al0QSQ6S4ORJQjAURWygA8wKAe1igDU\/bAt4IljABQAygBVYgAWILZUFLjKJbMhAAoPZggKe+xpIfYoDKdhQvxjgAAMM4KDxqwcHygheBr3gLCOAwt342Ro5aUA2awGPHyewGDuM9wWra8F1IjCDPUlAWAW44wL6oQK4fKEDZnKBsi6wCL4Iwl0zY0o+3htDd5FkEJQQQeCgYgAPfLhBJ0Cl0y6WAQmAkYzeEkEMNtAMY9SqOdnd6xcqUrkKgKQBHsXDBgzAtxGEQAISoB2cl\/Q5NoVABNWyMyKawYB7POl4MmAGS59EByoHYGUmwGCWybL+rw5EYK2HxVoCVjEvf4XUADLgRgYQI6IV5HFhoXgAJgpcTlVuwAPyq8KHGrC8L0TsSYJpgQw8kAEBIEADUfDRyIhAAk4MxwMHZE8UtjgublV6N791wJYD8JlXleRnG5jAM5ixgBnOsyd4o13bLmAyFegFMZTLALqZo0JhpYAFLfoeujGthAXMxgAwkZ4GzMcRAwjCEl\/YiLboU4AvtIAh0S7LCDJAOb0VgIQDoO1MMqmBKyxgAHqsnx9NM4MEPaAAUHirrGXQAE86PAQ3egCsWgNI17zVzhRwkzlSMIDNJvQEIV\/SVMw5SFvQ4xEisMMEFL5wS4MCbRm4ABE3wN3+FQTaBdLqWgkWsIEVZMAOtwKOaEOwFsxGsTiwmEAnF7A0F4xjLcmAQgT6goZlTOJIFPhPm2BjlIoOUuXM4oAGWlDRex1dIfta2Qg+QQRUTaAY3GDDhi63Al3grKMye6evz5MdmqJuLQWwAKqu63WWTzernBpBVi2wgACgQAQhyIcFGICBczHgGzAsgiGe04DVgQSYgR+LwlewgQR5YDoNSFMxL8DNFMdAvgrARGu\/FImPtaBSgCg6l0yQgmsE4CMMgAXmmHyBEhhIZdK57WOLGYDHIqLvwrHzvBoBoROoPCukQtXuD7Ivo8\/AJdbJ4QA+gavVBYDTJZEBZMAGdEP+A3gJKMxTLI0IHCQByuTJppzEC2SUACzdCWQAMuyEepCOuLDbI2QXLxjHariDB4xW\/h1AACyFxgBe\/SnEA2Rc1aFSW7gCtLgS09SBkL2A8f2eKMjJbwzAlTnASQzAAsQA37UAKjXFooECETQYf3CObCTfbGDF1TiCCpCAtnDHAcRN5rQAQAFX0bggWVxAC07AeoBZTmmCcEwAqmBgICjICmhYC4jXI6DIBhwUHzgAF0qDBLCA87TANUxF+dhKJwjCFblBBQTauTxDDGyMEmiAVzFArLTAt5HbGI7FvoTCCsTA1TjcsLyFzs1ACQnb+6CXSJxX6+GDWslMQHhAxDT+RZAImRIYAhlExJSUgMahw8WpROzFDDg4EgrsTYLxz0HBxSViom5gHdWUYXyxirFkhsPUDn90wJWsQNB8zNeogCOMBJggQtOAQgMIQFzJWaDkgUcckCdkyj2oHhemgQoQgFeFjUfATThUwCiGUjIqxAUEE+Q8gDG5QFu0gQLURAVswGvRibAgzVy0ADdlwMi0wAl8D2tEQgZQBKIkBmoVRx6UBAVY5ItAQUpEgciwn3qUQCW6wJIdzAx8hz6SxZaBwgLECgFWgMooWxjMQKzZR7G4Vj9lgLCIzFUsHfBkV6jYgRaontPwo818xhJETAq4gAL9BvMQAAksnwuIFXD+eAAMEMC8BJpqIKNLosKvkJvsaMBJfoBDzIkLjICEXAVdzcAHNAB3eVOmQI3UEAMBBMAEJACVnEsUKIidpdjylQGqRcBtWBUa0BYMuMsC1AJMMAImcAC61YIWiIVYOggo+ITAUA5GXZnDaZwHUMGNMUcFFM1tXdwCvEAJCId5xJMyJN8noIWf1EEDoJoc9kVUwkuC\/chaNsABSBKVyEBAjFoNuRVmlkWK+MtErF4IFEtadsADbNsI7IJYsUGOGEoQisuW4Q4BFk1OlUwCtACqbEBXGAc\/TUK6YBpbtsRvvQMlnEOzgMQVTABpIWdCfI33uIUKREFWbsAGVIAG8JP+jQGHuZmALbwAd1UUDX4UF\/rddOwgKqnmCYDGN9ACXFmJwl0AAy0flZ0AxeSIAkTXAFkA7RigJt7nKXzAAvwG1g0C5GzoArwUhumc7HBSpIVjsczAX4RAchBRYXhAfbZNBwxSX0iCB8TOAfwGKRGp3yUBCYxDApRACdBVCnQdFMXAx1kJiqYoKqxAIRANKMhVGyApqgRWCthIAUBbgtQCxiyJC4jJECRAA1wAHw0Au3WHlb5K0sHFBfhIJkQigbAGzHgAVIBCJNHO99lnlybEocCMF\/UlFDiAG55k9vkeKPhCR13fyjTA5DjOJYxn1tGXGSnItrXFCCyUIn3QufT+g7BFn9Q5AAVAVwUEhwQ0gVqc16IyairEzW84xGecABfOwAEkByxoouwEXwPsy4jk5EC6QAUUAGA2xIW9h8hBkwE4QAUMQAN0wPAVTQqEAOZsgyWFwKFFigiAhArtKlmYD2bQn8rY1xowxEmWQCF8DKaKnAsUwCCphSgkiAGmIJgJhvFNwAEY3QoUjRGKVrFwDrtMAgoIwBAMhx9507oihNNZqVhdQxiI1T+6RvJJCyikIHtII6b6FhEOwXiJiRhi6uMNqwVowJW0gGcUQANAgQv8CLbKQAf8540Nq8UmxAOsAKpcSVyUQA9yicgl1FuAwoZuQMR0R0M4zoURTwj+kFQp4GES7CxgMMBa+Mkl\/QkdFMy\/hOvHAa2lwWTbRMA9RlW0ApzAkFY3BIJtLmoGpksKFKzZ+usFHMBFxAJl+BsWgusrzsbaook\/ikLRbAD+na0paGLE0Op1LMyexmWpMYKwaOIb5VQB6CoosByX7AK4GsBahFPbqFEmMUAExMIEtKDPutacHEA2tG7jlgKA4USe+FbHutUxWAG3qMxBOsPH0J\/RyRNcAJeyPABRgUxctuDTdi6mfs9wiIMF\/F5W0i4q3FYJ5IYYjkD6aILAmO0JJBsUrECEiMIDWO7cWB3gcanViSGKGta30aY+EMRrXC9CoMUopEl9wASdeq7+nJwDmiwIaaGazVrV8oYC6zrEIMnCAFxDKcXlJkbIC3hUilFLHlAZJVjH\/fLeybFlfWrieLyHRYqC7JzIE1TARSjcByRIA7BALh5MPkSFJVUs32aBlKakA2meCbDlMl4tB6PCBzxtqSWhJsJJeZYZ1pYa3qpmKPhCZHTLLkRNCpAKuG6RHMaXRoCDJEmCCcTlbdFfTgIxQrjI8P0GQzyAytwWpSlI\/2FMtvYgKGzZWrnJvbBw04Kcm3GTQo7iK6ZAGv9nLRRDFHwCG48xKXzAvVzJCFRj527baPhaLibwCYxHCWyRE9sfKbDsly6fAMDS51XsIafCGA0A5fZGXx7+z88U3cdt6FkWVAUg7AtMQKKaAuN6qfWJVi+UQNOKMkKcV3QuhJLK5CW0hgnSTvmiabpkjkk4A5HpqNAayoeWwuyKAuUElir0Mm80xiWMBFz83tC+hRHWbG6s7wUMUkRpZtshINTwkfVm8zfdaczETkPc3wpwaSjYclxGzQYcAEGgjRv8Y1l5Ueveyz2\/MyqMwEGO5igwawR77kOfwgto4gdsgk8MxwAk4Rl5wG8kQAS480GXBaxkKZaMAlqYjyuV9M8GFglNABs8awJcBNYppJKK7Dwbi2iCNIPwEcsayo1dCb5ZwiyHAqwwE30FCnV8yCWciAKMNELY54Y6tN7+5nREh4LZHYq\/jI2VWElZNURHy8laRVSg9N8gJe\/zHkQ2hILf5eNUn0J5Zh9MfNwJ5PNBklYa+2vRGHQpGB3+2bUcd+If0YQH5DNbn0BLJwjjHrZmCsYdM8gH4J+LYPKN9WxMXBg8mPVB3\/M1S2eE6Fwab9nVicJgT3MpVEAKbE6LiIJO6IPHboRpRjVbjyXS5jVvaCKYMErtiOwIOCZ\/sspaUDNsH4Ro21+CbJkmvsC2Pgu0hcIIKMBlTNgPOzHLAvdu5LNx4wq3\/G1Hd4CMwQKNiYIYzB2NffSObmNDTne+PADrwmCdXI6QhYD4gIwho+8MeUBWSnTVwMTAcJYm1J03b\/BR+Z7XBGCBlRRshKTIBUDEKHe25x6LIUDXqLXVeGdJEAAAOw=="
    														    },
    														    "print": "318397"
    													}';
    													*/
    													//Cuando se haga la consulta
    													//$obj = json_decode($result);
    													
    													
    													
    												}
    											}
    											$obj = json_decode($json);
    											
    											//echo "-*-*-*-";
    											//exit;
    											
    											if(is_object($obj)){
    												$success = $obj->{'success'};
    												$message = $obj->{'message'};
    												if(!$message){
    													if($success === true){
    														
    														$obj_r = $obj->{'person'};
    															$nombres = $obj_r->{'nombres'};
    															$dni = $obj_r->{'num_doc'};
    															$apellido_paterno = $obj_r->{'apellido_paterno'};
    															$apellido_materno = $obj_r->{'apellido_materno'};
    															$fecha_nacimiento = $obj_r->{'fecha_nacimiento'};
    															$sexo = $obj_r->{'sexo'};
    															$fecha_caducidad = $obj_r->{'fecha_caducidad'};
    															$estado_civil_abr = $obj_r->{'estado_civil'};
    															$ubi_dir_dist_desc = $obj_r->{'ubi_dir_dist_desc'};
    															$ubi_dir_depa_desc = $obj_r->{'ubi_dir_depa_desc'};
    															$ubi_dir_prov_desc = $obj_r->{'ubi_dir_prov_desc'};
    															$ubigeo_distrito = $obj_r->{'ubi_dir_dist'};
    															$ubigeo_provincia = $obj_r->{'ubi_dir_prov'};
    															$ubigeo_departamento = $obj_r->{'ubi_dir_depa'};
    															$ubi_nac_dist_desc = $obj_r->{'ubi_nac_dist_desc'};
    															
    															
    															$dir_nombre = $obj_r->{'dir_nombre'}.". ".$ubi_dir_depa_desc." - ".$ubi_dir_prov_desc." - ".$ubi_dir_dist_desc;
    														$obj_img = $obj->{'images'};
    															$foto = $obj_img->{'foto'};
    															
    															$a_resultado['tipo_documento'] = $tipo_documento;
    															$a_resultado['numero_documento'] = $dni;
    															$a_resultado['nombres'] = $nombres;
    															$a_resultado['apellido_paterno'] = $apellido_paterno;
    															$a_resultado['apellido_materno'] = $apellido_materno;
    															$a_resultado['sexo'] = $sexo;
    															$a_resultado['fecha_nacimiento'] = $fecha_nacimiento;
    															$a_resultado['fecha_caducidad'] = $fecha_caducidad;
    															$a_resultado['estado_civil'] = $estado_civil_abr;
    															$a_resultado['direccion'] = $dir_nombre;
    															$a_resultado['ubi_dir_dist_desc'] = $ubi_dir_dist_desc;
    															$a_resultado['ubi_dir_depa_desc'] = $ubi_dir_depa_desc;
    															$a_resultado['ubi_dir_prov_desc'] = $ubi_dir_prov_desc;
    															$a_resultado['ubigeo_distrito'] = $ubigeo_distrito;
    															$a_resultado['ubigeo_provincia'] = $ubigeo_provincia;
    															$a_resultado['ubigeo_departamento'] = $ubigeo_departamento;
    															$a_resultado['ubi_nac_dist_desc'] = $ubi_nac_dist_desc;
    															$a_resultado['foto'] = $foto;
    															$a_resultado['firma'] = $firma;
    															
    															
    														
    														
    														if(!$existe_busqueda_pendiente){
    															// Guardar la trama un temporal de tabla de busqueda del cliente para que luego se asocie al cliente creado, sino esta usandose sin 
    															$o_CrBusquedaDP = new CrBusquedaDP();
    															$o_CrBusquedaDP->setTipobusqueda("RENIEC");
    															$o_CrBusquedaDP->setDocumento($dni);
    															$o_CrBusquedaDP->setNombrecompleto(unicodeToutf8($nombres." ".$apellido_paterno." ".$apellido_materno));
    															$o_CrBusquedaDP->setOrigenbusqueda("APP::Validar DNI Cliente Prueba");
    															$o_CrBusquedaDP->setFechaemision($fecha_emision);
    															$o_CrBusquedaDP->setFechacaducidad($fecha_caducidad);
    															$o_CrBusquedaDP->setEstado("P");
    															$o_CrBusquedaDP->setTramaresultado(addslashes($json));
    															$o_CrBusquedaDP->setFechacreacion(date("Y-m-d H:i:s"));
    															$o_CrBusquedaDP->setUsuariocreacion(myUser::getUser()->getUserId());
    															$o_CrBusquedaDP->save(); 
    															//////////////
    														}
    														
    														
    														//Enviar los resultados
    														
    																			
    														$a_resultado['estado'] = "1";
    														$a_resultado['mensaje'] = "Exito";
    														
    													}else{
    														$a_resultado['estado'] = "0";
    														$a_resultado['mensaje'] = $message;
    													}
    												}else{
    													$a_resultado['estado'] = "0";
    													$a_resultado['mensaje'] = $message;
    												}
    											
    										}else{
    											$a_resultado['estado'] = "0";
    											$a_resultado['mensaje'] = "Cadena json no se transformo en objeto";
    										}
    								}else{
    									$a_resultado['estado'] = "0";
    									$a_resultado['mensaje'] = "Existe el cliente ".$ObjectBean->getIdCliente()." en el Sistema.";
    								}
    	
    							}else{
    								$a_resultado['estado'] = "0";
    								$a_resultado['mensaje'] = "Debe de ser como maximo 8 digitos";
    							}
    										
    							break 2;
    											
    					
    						}
					    }else{
					        $a_resultado['estado'] = "0";
    						$a_resultado['mensaje'] = "Debe de seleccionar el tipo de documento";
					    }
					}
					break;
				case "validar_acceso": 
						if(!$usuario){
							mostrar_error("USUARIO_VACIO",$mensaje);//HUELLA_INVALIDA	
						}
						$usuario 	= $o_datos['usuario'];
						$clave 		= $o_datos['clave'];
									
						$o_MyLoginValidator = new myLoginValidator();
				 
						$a_resultado['estado'] = "1";
						$a_resultado['mensaje'] = "";
						
						if(!$o_MyLoginValidator->execute($usuario, $clave)){
							$a_resultado = mostrar_error("LOGIN_ERRADO",$mensaje);//HUELLA_INVALIDA	
							
						}else{
							$a_resultado['estado'] = "1";
							$a_resultado['mensaje'] = "Exito";
							
							$o_user = new user_class();
							
							if ($o_user->findUser($usuario)){
								$a_user['idusuario'] 		= $o_user->getUserId();
								
								$a_user['rol']  			= $o_user->getUserRoleId();
								//$a_user['idusuario']  		= $o_user->getIdColaborador();
								
								// Detectar Sucursal y Mercado si es asesor o Representante de cobranzas
								
								$a_SucursalMercado 	= sucursalMercado($o_user);
								$a_user["mercado"] 	= (string)$a_SucursalMercado["mercado"];
								$a_user["idmercado"]= (int)$a_SucursalMercado["idmercado"];
								$a_user["sucursal"] = (string)$a_SucursalMercado["sucursal"];
								$a_user["idsucursal"] = (string)$a_SucursalMercado["idsucursal"];
								
								$o_crColaboradorBean = new ColaboradorBean();
								$o_crColaboradorBean->setUsuario($o_user->getUserId());
								
								$o_crColaboradorDP = new ColaboradorDP($o_crColaboradorBean);
								$a_o_crColaboradorDP = $o_crColaboradorDP->select();
								
								if(is_array($a_o_crColaboradorDP) && count($a_o_crColaboradorDP)){
									$idColaborador = $a_o_crColaboradorDP[0]->getIdColaborador();
									$a_user['nombre_completo']  = $a_o_crColaboradorDP[0]->getNombres();
									$fechatransaccion 	= $o_crColaboradorDP->getFechaTransaccion($idColaborador);
									$a_user['fecha_abierta'] 	= $fechatransaccion;
								}
								
								
								//$flagAsistencia = consultarAsistencia($idColaborador,date('Y-m-d'));
								
								//if($flagAsistencia){
									$a_user["registro_asistencia"] = 'S';
								//}else{
									//$a_user["registro_asistencia"] = 'N';
								//}
								//$a_user["registro_asistencia"] = 'S';
															
								$a_resultado['usuario'] = $a_user;
							}
						}	
						 
					break;
				 case "validar_dni":
				     
            		$dni 	= $o_datos['dni'];
            	    $ubicacion_registro_latitud 	= $o_datos['ubicacion_registro_latitud'];
            	    $ubicacion_registro_longitud 	= $o_datos['ubicacion_registro_longitud'];
            	    
            	    $o_ClienteBeanT = new ClienteBean();
					$o_ClienteBeanT->setDni($dni);
					$o_ClienteBeanDPT = new ClienteDP($o_ClienteBeanT);
					$a_o_ClienteBeanDPT = $o_ClienteBeanDPT->select();

					if(!is_array($a_o_ClienteBeanDPT)){
            	    
                	    function curl_get_contents($url)
                		{
                		  $ch = curl_init($url);
                		  curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
                		  curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 1);
                		  curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 0);
                		  curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 0);
                		  $data = curl_exec($ch);
                		  curl_close($ch);
                		  return $data;
                		}
                		if(strlen($dni) == 8){
                			//$url = "https://dniruc.apisperu.com/api/v1/dni/".$dni."?token=eyJ0eXAiOiJKV1QiLCJhbGciOiJIUzI1NiJ9.eyJlbWFpbCI6InNvdG9tYXlvcnN0ZXJAZ21haWwuY29tIn0.fYZBnuGA5LO8gH4umbJoYjwgw4PgYQ09B6ARTO3Cq9E";
                			$url = "https://dniruc.apisperu.com/api/v1/dni/".$dni."?token=eyJ0eXAiOiJKV1QiLCJhbGciOiJIUzI1NiJ9.eyJlbWFpbCI6Im1hLnNvdG9tYXlvcjEzQGdtYWlsLmNvbSJ9.GZ8B8Vg9BPy9kEQJT1AGPMtHrVP9RgCtfCvOwAzEKrE";
                			$result = curl_get_contents($url);
                			
                			$obj = json_decode($result);
                			$success = $obj->{'success'};
                			//$result = 1;
                			if(!$result){
                		        if($success === false){
                	         	 	     	
                				     
                		        }
                			}else{
                				if($obj->{'apellidoMaterno'}) 	$s_apellido_materno     = $obj->{'apellidoMaterno'};
                				if($obj->{'apellidoPaterno'}) 	$s_apellido_paterno     = $obj->{'apellidoPaterno'};
                				if($obj->{'nombres'}) 			$s_nombres    			= $obj->{'nombres'};
                				if($s_apellido_materno == "") 	$s_apellido_materno 	= "-";
                
                				if($s_nombres == "" || $s_apellido_paterno == ""){ 
                					$url = "https://apiperu.dev/api/dni/".$dni."?api_token=0aa2cbfeae74b3d765bd354ca02fe4178ba40fc73af94b83cccfb3eb49414aa4";
                					$result = curl_get_contents($url);
                									
                					$obj 		= json_decode($result);
                					$success 	= $obj->{'success'};
                					$obj_1      =  $obj->{'data'};
                					
                					if($success === true){
                						if($obj_1->{'apellido_materno'}) 	$s_apellido_materno     =  $obj_1->{'apellido_materno'};
                						if($obj_1->{'apellido_paterno'}) 	$s_apellido_paterno     =  $obj_1->{'apellido_paterno'};
                						if($obj_1->{'nombres'}) 			$s_nombres     =  $obj_1->{'nombres'};
                						
                						$a_resultado['estado'] = '1';
                						$a_resultado['nombres'] = $s_nombres;
                						$a_resultado['apellido_paterno'] = $s_apellido_paterno;
                						$a_resultado['apellido_materno'] = $s_apellido_materno;
                						$a_resultado['mensaje'] = "Exito";
                						
                					}else{
                						$a_resultado['estado'] = "10";
                						$a_resultado['mensaje'] = "No se encontro ".$dni.".";
                					}
                				}else{ 	
                					$a_resultado['estado'] = '1';
                					$a_resultado['nombres'] = $s_nombres;
                					$a_resultado['apellido_paterno'] = $s_apellido_paterno;
                					$a_resultado['apellido_materno'] = $s_apellido_materno;
                					$a_resultado['mensaje'] = "Exito";
                				}
                			}
                				
                		}else{
                			$a_resultado['estado'] = "10";
                			$a_resultado['mensaje'] = "No se puede usar dni ".$dni.", no tiene 8 caracteres.";
                		}
					}else{
					    $a_resultado['estado'] = "99";
                		$a_resultado['mensaje'] = "El dni ".$dni.", ya se encuentra registrado.";
					}
            		break;
				 case "registrar_asistencia": 
					
						$idusuario 	= $o_datos['usuario'];
						$huella 	= $o_datos['huella'];
						$ubicacion_registro_latitud 	= $o_datos['ubicacion_registro_latitud'];
						$ubicacion_registro_longitud 	= $o_datos['ubicacion_registro_longitud'];
						
						
						if(validarHuellaColaborador($idusuario,$huella)){
						
							$o_crColaboradorBean = new ColaboradorBean();
							$o_crColaboradorBean->setUsuario($idusuario);
							
							$o_crColaboradorDP = new ColaboradorDP($o_crColaboradorBean);
							$a_o_crColaboradorDP = $o_crColaboradorDP->select();
							
							if(is_array($a_o_crColaboradorDP) && count($a_o_crColaboradorDP)){
									$fechatransaccion 	= date('Y-m-d');
									$o_crColaboradorBN 	= $a_o_crColaboradorDP[0];
									$idColaborador 		= $o_crColaboradorBN->getIdColaborador();
									$HoraIngreso		= $o_crColaboradorBN->getHoraIngreso();
									$MinutoIngreso		= $o_crColaboradorBN->getMinutoIngreso();
									$MontoDescuento		= $o_crColaboradorBN->getMontoDescuento();
									$HoraMinutoIngreso	= $HoraIngreso.":".$MinutoIngreso;
									$HoraMinutoActual	= date("H:i");
									
											
									//Validar si sera una [A]SISTENCIA o [T]ARDANZA
									//$o_asistenciaFNTemp->setTipoAsistencia('A');
									//$o_asistenciaFNTemp->setTipoAsistencia('T'); y colocar un monto de descuento
									
									$o_asistenciaFNTemp = new CrAsistenciaFN();
									$o_asistenciaFNTemp->setIdColaborador($idColaborador);
									//$o_asistenciaFNTemp->setTipoAsistencia('T');
									$o_asistenciaFNTemp->setEliminado('-1');
									//$o_asistenciaFNTemp->setFecha($fechatransaccion);
									$o_asistenciaFNTemp->setFecha($fechatransaccion);
									$a_o_asistenciaFNTemp = $o_asistenciaFNTemp->select();
									
									
									
									
									if(!is_array($a_o_asistenciaFNTemp) && count($a_o_asistenciaFNTemp) == 0){
									
										
									$o_user 		= new user_class();
									if ($o_user->findUser($idusuario)){
										if(($o_user->getUserRoleId() == "sys.ope" && $a_resultado["idmercado"]) && !$idsucursal){ 
											$fechaDiaAbierto 	= fechaDiaAbierto($idusuario);
											$dia = date('N',strtotime($fechaDiaAbierto));
											if($dia != 7){
												inicializarPagosApp($fechaDiaAbierto, $idColaborador, $idusuario);	
											}
										}
									}
										
									  $o_asistenciaDP = new CrAsistenciaDP();
									   
									  $o_asistenciaDP->setIdColaborador($idColaborador);
									  $o_asistenciaDP->setTipoAsistencia('A');
									  
									  if($HoraMinutoActual > $HoraMinutoIngreso){
										$o_asistenciaDP->setTipoAsistencia('T');
										$o_asistenciaDP->setMonto($MontoDescuento);
									  }
									  
									  $o_asistenciaDP->setHoraMinutoPactado($fechatransaccion." ".$HoraMinutoIngreso.":00");
									  
									  $o_asistenciaDP->setEstado('A');
									  
									  //$o_asistenciaDP->setFecha($fechatransaccion);
									  $o_asistenciaDP->setFecha(date('Y-m-d'));
									  
									  $o_asistenciaDP->setRegistroLatitud($ubicacion_registro_latitud);
									  $o_asistenciaDP->setRegistroLongitud($ubicacion_registro_longitud);
									  
									  $o_asistenciaDP->setUsuarioCreacion($idusuario);
									  $o_asistenciaDP->setFechaCreacion(date("Y-m-d H:i:s"));
									  $bResult = $o_asistenciaDP ->save();
									  if($bResult){
										$a_resultado['estado'] = "1";
										$a_resultado['mensaje'] = "Exito";
									  }
									
									}else{
										$a_resultado['estado'] = "10";
										$a_resultado['mensaje'] = "Fallo el registro, ya esta registrado para la fecha ".$fechatransaccion." - Salga del Sistema y vuelva e entrar.";
									}
								}
						}else{
							mostrar_error("HUELLA_INVALIDA",$mensaje);//HUELLA_INVALIDA
						}
						
						break;
					
					case "grabar_registro_caja":
						$idusuario 			= $o_datos['idusuario'];
						$a_representantes	 =  $o_datos['representantes'];
						
						if($idusuario && is_array($a_representantes)){
							
							$o_user 		= new user_class();
							if ($o_user->findUser($idusuario)){
								if (is_array($a_representantes)){	
								
									foreach ($a_representantes as $keyu => $a_representantesdet){
										
										foreach ($a_representantesdet as $keyrep => $a_representante){
											
											
											
											$o_CapitalInicialBean = new CapitalInicialBean();
											$o_CapitalInicialBean->setIdCapitalInicial($a_representante["idcajainicial"]);
											$o_CapitalInicialDP = new CapitalInicialDP($o_CapitalInicialBean);
											$a_CapitalInicialDP = $o_CapitalInicialDP->select();
											
											if(is_array($a_CapitalInicialDP)){
												foreach ($a_CapitalInicialDP as $key => $o_CapitalInicialDP){
													
													$fecha_ci = $o_CapitalInicialDP->getFecha();
													
													$o_ColaboradorBean = new ColaboradorBean();
													$o_ColaboradorBean->setIdColaborador($o_CapitalInicialDP->getIdColaborador());
													$o_ColaboradorBL = new ColaboradorBL();	
													$a_o_Colaborador = $o_ColaboradorBL->busquedaColaborador($o_ColaboradorBean);
													if(is_array($a_o_Colaborador)){
														foreach ($a_o_Colaborador as $key => $o_colaborador){
															$usuariorep = $o_colaborador->getUsuario();
															$fechaDiaAbierto = fechaDiaAbierto($usuariorep);
														}
													}
													
													if($fechaDiaAbierto == $fecha_ci){
														
														$o_CapitalInicialBean = new CapitalInicialBean();
														$o_CapitalInicialBean->setIdCapitalInicial($a_representante["idcajainicial"]);
														$o_CapitalInicialBean->setMonto($a_representante["monto"]);
														$o_CapitalInicialBean->setFechaModificacion(date("Y-m-d H:i:s"));
														$o_CapitalInicialBean->setUsuarioModificacion($idusuario);
														
														$o_CapitalInicialSystemClass = new CapitalInicialSystemClass($o_CapitalInicialBean);
														$bResult = $o_CapitalInicialSystemClass->actualizarCapitalInicial();		
													}else{
														
														$a_resultado['estado'] = "5";
														$a_resultado['mensaje'] = "No se puede porque la fecha del dia abierto esta cerrado";	
													}
												}
											}
										}
										
									}
									
									$a_resultado['estado'] = "1";
									$a_resultado['mensaje'] = "Exito";	
								}else{
									$a_resultado['estado'] = "4";
									$a_resultado['mensaje'] = "No hay representantes para modificar su capital";	
								}	
							}else{
								$a_resultado['estado'] = "3";
								$a_resultado['mensaje'] = "Token No valido";	
							}
						}else{
							if(!is_array($representantes)){
								$a_resultado['estado'] = "5";
								$a_resultado['mensaje'] = "Debe ingresar el representantes";
							}else{
								$a_resultado['estado'] = "4";
								$a_resultado['mensaje'] = "No existe el usuario";
							}
						}
						break;
					case "listar_registro_caja":
						
						$idusuario 			= $o_datos['idusuario'];
						$idsucursal	 		=  $o_datos['idsucursal'];

						if($idusuario && $idsucursal){
							//$fechaDiaAbierto = fechaDiaAbierto($idusuario);
							$o_user 		= new user_class();
							if ($o_user->findUser($idusuario)){
								
								$o_sucursalBean = new SucursalBean();
								$o_sucursalBean->setIdSucursal($idsucursal);
															
								$o_sucursalDP = new SucursalDP($o_sucursalBean);
								$a_o_sucursalDP = $o_sucursalDP->select();
								
								if(is_array($a_o_sucursalDP)){
									foreach ($a_o_sucursalDP as $key => $o_sucursalDP){
										$IdSucursal = $o_sucursalDP->getIdSucursal();
										$FechaIncioBalance = $o_sucursalDP->getFechaInicioBalance();
										$idAdministrador = $o_sucursalDP->getIdAdministrador();
										
										$o_BalanceDiaNew = new BalanceDiaBean();
										$o_BalanceDiaNew->setIdAdministrador($idAdministrador); 
										$o_BalanceDiaNew->setIdSucursal($idsucursal);
										
										$o_BalanceDiaNewDP 		= new BalanceDiaDP($o_BalanceDiaNew);
										$fechaDiaAbierto  	= $o_BalanceDiaNewDP->ObtenerDiaAbierto();
									}
								}
								
								$o_ColaboradorBean = new ColaboradorBean();
								$o_ColaboradorBean->setIdPadre($idAdministrador);
								$o_ColaboradorBean->setIdRol("sys.ope");
								$o_ColaboradorBL = new ColaboradorBL();	
								$a_o_Colaborador = $o_ColaboradorBL->busquedaColaborador($o_ColaboradorBean);
								if(is_array($a_o_Colaborador)){
									
									foreach ($a_o_Colaborador as $key => $o_colaborador){
										$o_CapitalInicialBean = new CapitalInicialBean();
										$o_CapitalInicialDP = new CapitalInicialDP($o_CapitalInicialBean);
										$a_capitalinicial = $o_CapitalInicialDP->selectAppCI($o_colaborador->getIdColaborador(),$fechaDiaAbierto,$usuario);
										if(is_array($a_capitalinicial)) list($idcapital, $montocapital) = each($a_capitalinicial);
										if($montocapital==0) $montocapital = "";
										$a_representantes[$o_colaborador->getIdColaborador()]["idrepresentante"] 	= $o_colaborador->getIdColaborador();
										$a_representantes[$o_colaborador->getIdColaborador()]["idcajainicial"] 	 	= $idcapital;
										$a_representantes[$o_colaborador->getIdColaborador()]["monto"] 				= $montocapital;
										$a_representantes[$o_colaborador->getIdColaborador()]["nombre"] 			= $o_colaborador->getNombreCompleto();
									}
								}
								
								$a_resultado['representantes'] = $a_representantes;
								$a_resultado['estado'] = "1";
								$a_resultado['mensaje'] = "Exito";	
								
							}else{
								$a_resultado['estado'] = "3";
								$a_resultado['mensaje'] = "Token No valido";	
							}
						}else{
							if(!$idsucursal){
								$a_resultado['estado'] = "5";
								$a_resultado['mensaje'] = "Debe ingresar el cliente";
							}else{
								$a_resultado['estado'] = "4";
								$a_resultado['mensaje'] = "No existe el usuario";
							}
						}
						break;
					case "grabar_editar_pago":
						$idusuario 			= $o_datos['idusuario'];
						//$pagos		 		=  $o_datos['pagos'];
						$pagos		 		=  $o_datos['representantes'];
						if($idusuario && is_array($pagos)){
							
							$o_user 		= new user_class();
							if ($o_user->findUser($idusuario)){
									
								foreach($pagos as $key => $a_pago){
									foreach($a_pago as $keypago => $a_val_pago){
										
										$idpago = $a_val_pago['idpago'];// => 1300795
										$idprestamo = $a_val_pago['idprestamo'];// => 38908
										$fecha_pago = $a_val_pago['fecha_pago'];// => 2021-07-14
										$monto_pagado = $a_val_pago['monto_pagado'];// => 5
										$tipo_pago = $a_val_pago['tipo_pago'];// => normal
										
										
										
										$o_PrestamoBean = new PrestamoBean();
										$o_PrestamoBean->setIdPrestamo($idprestamo);
										$o_class = new PrestamoBL();
										$a_ObjectBean = $o_class->busquedaPrestamo($o_PrestamoBean);
										if(is_array($a_ObjectBean) && count($a_ObjectBean) == 1){


											foreach ($a_ObjectBean as $key => $o_prestamo){
												$idusuariop = $o_prestamo->getUsuarioCreacion();
												$fechaDiaAbierto = fechaDiaAbierto($idusuariop);
												
											}
										}
												
										if($fechaDiaAbierto == $fecha_pago){
											$o_PagoBean = new PagoBean();
											$o_PagoBean->setIdPago($idpago);
											
											if($monto_pagado == 0) $monto_pagado = "0.00";
																			
											$o_PagoBean->setMontoPago($monto_pagado);
											$o_PagoBean->setFechaModificacion(date('Y-m-d H:i:s'));
											$o_PagoBean->setUsuarioModificacion($idusuario);
											$o_PagoBL = new PagoBL();
											$o_PagoBL->modificarPago($o_PagoBean);
										}
									}
								}									
								
								if($idprestamo){
									
									//Listado de Pagos Actualizados
									$o_pagoBean = new PagoBean();
									$o_pagoBean->setIdPrestamo($idprestamo);
									
									$o_PagoBL = new PagoBL();
									$a_pagos = $o_PagoBL->busquedaPago($o_pagoBean);
									if(is_array($a_pagos)){
										$SumaMontoPago = 0;
										$cantidadpagos  = count($a_pagos);
										$i = 1;
										foreach ($a_pagos as $key => $o_pagos){
											if($o_pagos->getTipo() == 1){
												$SumaMontoPago += $o_pagos->getMontoPago();	
											}
											$i++;
										}
									}
									
									$o_PrestamoBean = new PrestamoBean();
									$o_PrestamoBean->setIdPrestamo($idprestamo);
								
									$o_class = new PrestamoBL();
									$a_ObjectBean = $o_class->busquedaPrestamo($o_PrestamoBean);
									
									if(is_array($a_ObjectBean) && count($a_ObjectBean) == 1){
										
										
										foreach ($a_ObjectBean as $key => $o_prestamo){
											$o_PrestamoBean = new PrestamoBean();
											$o_PrestamoBean->setIdPrestamo($idprestamo);
											$MontoTotal = $o_prestamo->getMontoTotal();	
											if(($MontoTotal - $SumaMontoPago) <= 0){
												$NuevoSaldo = "0.00";
												$o_PrestamoBean->setFechaCancelacion(date('Y-m-d H:i:s'));
												$o_PrestamoBean->setEstado("C");
												
											}else{
												$o_PrestamoBean->setEstado("P");
												$NuevoSaldo = $MontoTotal - $SumaMontoPago;
											}
										}
										$o_PrestamoBean->setSaldoPrestamo($NuevoSaldo);
										$o_PrestamoBean->setFechaModificacion(date('Y-m-d H:i:s'));
										$o_PrestamoBean->setUsuarioModificacion($idusuario);
										
										$o_PrestamoBL = new PrestamoBL();
										$o_PrestamoBL->modificarPrestamo($o_PrestamoBean);
										
										$a_resultado['estado'] = "1";
										$a_resultado['mensaje'] = "Exito 1";	
									}else{
										$a_resultado['estado'] = "5";
										$a_resultado['mensaje'] = "No existe prestamo";
									}
									
									
								}else{
									$a_resultado['estado'] = "5";
									$a_resultado['mensaje'] = "No existe prestamo";
								}
									
										
								
								
							}else{
								$a_resultado['estado'] = "3";
								$a_resultado['mensaje'] = "Token No valido";	
							}
						}else{
							if(!is_array($pagos)){
								$a_resultado['estado'] = "5";
								$a_resultado['mensaje'] = "No hay pagos para editar";
							}else{
								$a_resultado['estado'] = "4";
								$a_resultado['mensaje'] = "No existe el usuario";
							}
						}
						break;
					case "listar_editar_pago":
						$idusuario 			= $o_datos['idusuario'];
						$idprestamo	 		=  $o_datos['idprestamo'];
						if($idusuario && $idprestamo){
							
							$o_user 		= new user_class();
							if ($o_user->findUser($idusuario)){
								$o_PrestamoBean = new PrestamoBean();
								
						    	$o_PrestamoBean->setIdPrestamo($idprestamo);
						    	$o_class = new PrestamoBL();
								$a_ObjectBean = $o_class->busquedaPrestamo($o_PrestamoBean);
						
								if(count($a_ObjectBean)>0){
									foreach ($a_ObjectBean as $iKey => $o_objBean){
										$fechaInicio = $o_objBean->getFechaInicio();
										$idcliente = $o_objBean->getIdCliente();
										$montoPrestado = $o_objBean->getMontoPrestado();
										$montoTotal = $o_objBean->getMontoTotal();
										$SaldoPrestamo = $o_objBean->getSaldoPrestamo();
										$FechaFinal = $o_objBean->getFechaVencimiento();
										$estado = $o_objBean->getEstado();
										$GastoAdministrativo = $o_objBean->getGastoAdministrativo();
										$InteresPorcentaje = $o_objBean->getInteresPorcentaje();
										$PeriodicidadPago = $o_objBean->getPeriodicidadPago();
										$Duracion = $o_objBean->getDuracion();
										$nombrecompleto = (string)ucwords(mb_strtolower ($o_objBean->getObjectCliente()->getNombres()." ".$o_objBean->getObjectCliente()->getApellidoPaterno()." ".$o_objBean->getObjectCliente()->getApellidoMaterno()));
										$idusuariop = $o_objBean->getUsuarioCreacion();
										$fechaDiaAbierto = fechaDiaAbierto($idusuariop);
										$o_pagoBean = new PagoBean();
										$o_pagoBean->setIdPrestamo($idprestamo);
										$o_pagoBean->setFechaPago($fechaDiaAbierto);
										
										$o_PagoBL = new PagoBL();
										$a_pagos = $o_PagoBL->busquedaPago($o_pagoBean);
										if(is_array($a_pagos)){
											foreach ($a_pagos as $key => $o_pagos){
												if($o_pagos->getTipo() == 1){
													$tipo_p = "normal";
												}
												if($o_pagos->getTipo() == 2){
													$tipo_p = "mora";
												}
												$a_pagos[$o_pagos->getIdPago()]['idpago'] 		= (int)$o_pagos->getIdPago();	
												$a_pagos[$o_pagos->getIdPago()]["idprestamo"] 	= $o_pagos->getIdPrestamo();
												$a_pagos[$o_pagos->getIdPago()]['fecha_pago'] 	= (string)$o_pagos->getFechaPago();	
												$a_pagos[$o_pagos->getIdPago()]['monto_pagado']	= (float)$o_pagos->getMontoPago();	
												$a_pagos[$o_pagos->getIdPago()]['tipo_pago']		= (string)$tipo_p;																							
												
												
											}
										}
										
									}
								}
								$a_resultado['idprestamo'] = $idprestamo;
								$a_resultado['idcliente'] = $idcliente;
								$a_resultado['monto_capital'] = $montoPrestado;
								$a_resultado['monto_total'] = $montoTotal;
								$a_resultado['interes_porcentaje'] = $InteresPorcentaje;
								$a_resultado['saldo'] = $SaldoPrestamo;
								$a_resultado['fecha_prestamo'] = $SaldoPrestamo;
								$a_resultado['fecha_prestamo'] = $FechaInicio;
								$a_resultado['fecha_vencimiento'] = $FechaFinal;
								$a_resultado['saldo'] = $SaldoPrestamo;
								$a_resultado['estado'] = $estado;
								$a_resultado['gasto_administrativo'] = $GastoAdministrativo;
								$a_resultado['forma_pago'] = $PeriodicidadPago;
								$a_resultado['duracion'] = $Duracion;
								$a_resultado['pagos'] = (array)$a_pagos;
									
								$a_resultado['estado'] = "1";
								$a_resultado['mensaje'] = "Exito";	
								
							}else{
								$a_resultado['estado'] = "3";
								$a_resultado['mensaje'] = "Token No valido";	
							}
						}else{
							if(!$prestamo){
								$a_resultado['estado'] = "5";
								$a_resultado['mensaje'] = "Debe ingresar el id del prestamo";
							}else{
								$a_resultado['estado'] = "4";
								$a_resultado['mensaje'] = "No existe el usuario";
							}
						}
						break;
					case "grabar_eliminar_prestamo":
						$idusuario 			= $o_datos['idusuario'];
						$idprestamo	 		= $o_datos['idprestamo'];

						if($idusuario && $idprestamo){
							
							
							$o_user 		= new user_class();
							if ($o_user->findUser($idusuario)){
								
								$o_ObjectBean = new PrestamoBean();
								$o_ObjectBean->setIdPrestamo($idprestamo);
								
								$o_class = new PrestamoBL();
								$a_ObjectBean = $o_class->busquedaPrestamo($o_ObjectBean);
						
								if(count($a_ObjectBean)>0){
									foreach ($a_ObjectBean as $iKey => $o_objBean){
										$fechaInicio = $o_objBean->getFechaInicio();
										$idusuariop = $o_objBean->getUsuarioCreacion();
										$fechaDiaAbierto = fechaDiaAbierto($idusuariop);
									}
									if($fechaInicio == $fechaDiaAbierto){
										
										if($o_objBean->getOrigen()=="F"){
											//Buscar la referencia del prestamo refinanciado
											$prestamoReferencia = $o_objBean->getIdPrestamoReferencia();
											//Debe poner en pendiente el prestamo refinanciado
											
											$o_ObjectBeanT = new PrestamoBean();
											$o_ObjectBeanT->setIdPrestamo($prestamoReferencia);
											$o_ObjectBeanT->setEstado("P");
											$o_ObjectBeanT->setFechaCancelacion("0000-00-00 00:00:00");
											$o_ObjectBeanT->setFechaModificacion(date("Y-m-d H:i:s"));
											$o_ObjectBeanT->setUsuarioModificacion($idusuario);
											
											$o_ObjectBeanDP = new PrestamoDP($o_ObjectBeanT);
											$o_ObjectBeanDP->update();
											// -----
											// Borrar la mora del prestamo en referencia
											
											$o_ObjectPago = new PagoBean();
											$o_ObjectPago->setIdPrestamo($prestamoReferencia);
											$o_ObjectPago->setFechaPago($fechaInicio);
											
											$o_ObjectPagoDP = new PagoDP($o_ObjectPago);
											$a_o_Pagos = $o_ObjectPagoDP->select();
											if(is_array($a_o_Pagos)){
												foreach ($a_o_Pagos as $keyp => $o_Pagop){
													if($o_Pagop->getTipoPago() == 1 ) continue;
													$o_ObjectPagoU = new PagoBean();
													$o_ObjectPagoU->setIdPago($o_Pagop->getIdPago());
													$o_ObjectPagoU->setMontoPago("0.00");
													$o_ObjectPagoU->setFechaModificacion(date("Y-m-d H:i:s"));
													$o_ObjectPagoU->setUsuarioModificacion($idusuario);
													
													$o_ObjectPagoDPU = new PagoDP($o_ObjectPagoU);
													$o_ObjectPagoDPU->update();
												}
											}
											//echo "entro -**----*-";		
											
										}
										
										$o_PrestamoBean = new PrestamoBean();
										$o_PrestamoBean->setIdPrestamo($idprestamo);
										$o_PrestamoBean->setUsuarioEliminado($idusuario);
										$o_PrestamoSystemClass = new PrestamoSystemClass($o_PrestamoBean);
										$bResult = $o_PrestamoSystemClass->eliminarPrestamo();
										
										$a_resultado['estado'] = "1";
										$a_resultado['mensaje'] = "Se elimino el prestamo satisfactoriamente";	
									}else{
										$a_resultado['estado'] = "7";
										$a_resultado['mensaje'] = "No se puede hacer esta operacion, el dia esta cerrado.";
									}
								}else{
									$a_resultado['estado'] = "99";
									$a_resultado['mensaje'] = "No se puede hacer esta operacion, el dia esta cerrado.";
								}
							
							}else{
								$a_resultado['estado'] = "3";
								$a_resultado['mensaje'] = "No es usuario valido";	
							}
						}else{
							if(!$idprestamo){
								$a_resultado['estado'] = "5";
								$a_resultado['mensaje'] = "Debe ingresar el id del prestamo";
							}else{
								$a_resultado['estado'] = "4";
								$a_resultado['mensaje'] = "No existe el usuario";
							}
						}

						break;
					case "grabar_editar_prestamo":
						$idusuario 			= $o_datos['idusuario'];
						$idprestamo	 		=  $o_datos['idprestamo'];
						$monto_total	 	=  $o_datos['monto_total'];
						$monto_capital	 	=  $o_datos['monto_capital'];
						$interes_porcentaje	=  $o_datos['interes_porcentaje'];
						$gasto_administrativo=  $o_datos['gastos_administrativos'];
						$forma_pago			=  $o_datos['forma_pago'];
						$duracion			=  $o_datos['duracion'];
						//echo $interes_porcentaje."*****";
						if($idusuario && $idprestamo){
							
							//echo $fechaDiaAbierto."---";
							$o_user 		= new user_class();
							if ($o_user->findUser($idusuario)){
																							
									$o_ObjectBean = new PrestamoBean();
									$o_ObjectBean->setIdPrestamo($idprestamo);
									
									$o_class = new PrestamoBL();
									$a_ObjectBean = $o_class->busquedaPrestamo($o_ObjectBean);
							
									if(count($a_ObjectBean)>0){
										foreach ($a_ObjectBean as $iKey => $o_objBean){
											$fechaInicio = $o_objBean->getFechaInicio();
											$idusuariop = $o_objBean->getUsuarioCreacion();
											$origenA = $o_objBean->getOrigen();
											$monto_capitalA = $o_objBean->getMontoPrestado();
											$MontoExtraA = $o_objBean->getMontoExtra();
											$diferenciaAnterior = $monto_capitalA - $MontoExtraA;
											$fechaDiaAbierto = fechaDiaAbierto($idusuariop);
											
										}
										if($monto_capital && $fechaInicio == $fechaDiaAbierto){
											//echo $fechaInicio."----";
											$o_PrestamoBean = new PrestamoBean();	
											
											if($origenA == "F" && $MontoExtraA){
											    $MontoExtra = $monto_capital - $diferenciaAnterior; 
											    $o_PrestamoBean->setMontoExtra($MontoExtra);
											}
											
											
											$montoTotal 	= round(($monto_capital)*(1+$interes_porcentaje/100),1);
											$o_PrestamoBean->setMontoPrestado($monto_capital);
											$o_PrestamoBean->setMontoTotal(round($montoTotal));
											
											
											$o_PrestamoBean->setSaldoPrestamo(round(($monto_capital)*(1+$interes_porcentaje/100),1));
											$o_PrestamoBean->setInteresPorcentaje($interes_porcentaje);
											$o_PrestamoBean->setGastoAdministrativo($gasto_administrativo);																									
											$o_PrestamoBean->setPeriodicidadPago($forma_pago);
											$o_PrestamoBean->setDuracion($duracion); 
										
											switch ($forma_pago){
												case "D" : 
														switch ($duracion){
															/**********************/
															case 7 :  $MontoCuota = round($montoTotal/5,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +7 days'));
																	  $NroCuotas=5; break;
															/*********************/ 
															case 15 : $MontoCuota = round($montoTotal/13,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +15 days'));
																	  $NroCuotas=13; break;
															case 30 : $MontoCuota = round($montoTotal/26,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +30 days'));
																	  $NroCuotas=26; break;
															case 45 : $MontoCuota = round($montoTotal/39,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +45 days'));
																	  $NroCuotas=39; break;
															case 60 : $MontoCuota = round($montoTotal/52,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +60 days'));
																	  $NroCuotas=52; break;
															case 75 : $MontoCuota = round($montoTotal/65,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +75 days'));
																	  $NroCuotas=65; break;
															case 90 : $MontoCuota = round($montoTotal/88,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +90 days'));
																	  $NroCuotas=88; break;
														}
														break;
												case "S":
														switch ($duracion){
															/**********************/
															case 7 :  $MontoCuota = round($montoTotal/1,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +7 days'));
																	  $NroCuotas=1; break;
															/*********************/
															case 15 : $MontoCuota = round($montoTotal/2,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +15 days'));
																	  $NroCuotas=2; break;
															case 30 : $MontoCuota = round($montoTotal/4,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +30 days'));
																	  $NroCuotas=4; break;
															case 45 : $MontoCuota = round($montoTotal/6,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +45 days'));
																	  $NroCuotas=6; break;
															case 60 : $MontoCuota = round($montoTotal/8,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +60 days'));
																	  $NroCuotas=8; break;
															case 75 : $MontoCuota = round($montoTotal/10,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +75 days'));
																	  $NroCuotas=10; break;
															case 90 : $MontoCuota = round($montoTotal/12,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +90 days'));
																	  $NroCuotas=12; break;
														}
														break;
												case "Q":
														switch ($duracion){	
															case 15 : $MontoCuota = round($montoTotal/1,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +15 days')); 
																	  $NroCuotas=1; break;
															case 30 : $MontoCuota = round($montoTotal/2,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +30 days'));  				
																	  $NroCuotas=2; break;
															case 45 : $MontoCuota = round($montoTotal/3,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +45 days'));
																	  $NroCuotas=3; break;
															case 60 : $MontoCuota = round($montoTotal/4,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +60 days'));
																	  $NroCuotas=4; break;
															case 75 : $MontoCuota = round($montoTotal/5,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +75 days'));  				
																	  $NroCuotas=5; break;
															case 90 : $MontoCuota = round($montoTotal/6,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +90 days'));
																	  $NroCuotas=6; break;
														}
														break;
												case "M":
														switch ($duracion){	
															
															case 30 : $MontoCuota = round($montoTotal/1,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +30 days'));
																	  $NroCuotas=1; break;
															case 60 : $MontoCuota = round($montoTotal/2,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +60 days'));
																	  $NroCuotas=2; break;
															case 90 : $MontoCuota = round($montoTotal/3,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +90 days'));
																	  $NroCuotas=3; break;
														}
														break;
											}
										
											if($duracion){
												
												$o_PagoBean = new PagoBean();
												$o_PagoBean->setIdPrestamo($idprestamo);
												$o_PagoBL 		= new PagoBL();
												$a_o_pago 		= $o_PagoBL->busquedaPago($o_PagoBean);
												
												if(is_array($a_o_pago) && count($a_o_pago)){//Update del Pago
													foreach ($a_o_pago as $key => $o_pago) {
														if($o_pago->getTipoPago() == "1"){
															$sumaPagos = $o_pago->getMontoPago();
														}
													}
												}
												$nuevoSaldo = $montoTotal - $sumaPagos;
												
												$o_PrestamoBean->setSaldoPrestamo($nuevoSaldo);
												$o_PrestamoBean->setIdPrestamo($idprestamo);
												$o_PrestamoBean->setCuotaPago($MontoCuota);
												$o_PrestamoBean->setFechaVencimiento($fechaVencimiento);
												$InteresMonto = (round($monto_capital)*$interes_porcentaje)/100;
												$o_PrestamoBean->setInteresMonto($InteresMonto);
												$o_PrestamoBean->setNroCuotas($NroCuotas);
												 
												$o_PrestamoBean->setFechaModificacion(date("Y-m-d H:i:s"));
												$o_PrestamoBean->setUsuarioModificacion($idusuario);
												
												//print_r($o_PrestamoBean);
												
												$o_PrestamoBL = new PrestamoBL();
												$bResult = $o_PrestamoBL->modificarPrestamo($o_PrestamoBean);
												
																									
												if($bResult){
													$bResult = $idprestamo;
													$o_newPrestamoBean = new PrestamoBean();
													$o_newPrestamoBean->setIdPrestamo($bResult);
													
													$o_newPrestamoDP = new PrestamoDP($o_newPrestamoBean);
													$a_newPrestamoBean =$o_newPrestamoDP->select();
													$o_newPrestamo = $a_newPrestamoBean[0];
													
													$a_prestamoNuevo['idprestamo'] 	= $o_newPrestamo->getIdPrestamo();
													$a_prestamoNuevo['monto_total']	= (float)$o_newPrestamo->getMontoTotal();
													$a_prestamoNuevo['capital']	= 	(float)$o_newPrestamo->getMontoPrestado();
													$a_prestamoNuevo['monto_interes']	= (float)$o_newPrestamo->getInteresMonto();
													$a_prestamoNuevo['saldo']	= (float)$o_newPrestamo->getSaldoPrestamo();
													$a_prestamoNuevo['interes']	= (float)$o_newPrestamo->getInteresPorcentaje();
													$a_prestamoNuevo['gastos_administrativos']	= (float)$o_newPrestamo->getGastoAdministrativo();
													$a_prestamoNuevo['fecha_prestamo']	= $o_newPrestamo->getFechaInicio();
													$a_prestamoNuevo['fecha_vencimiento']	= $o_newPrestamo->getFechaVencimiento();
													$a_prestamoNuevo['estado']	= $o_newPrestamo->getEstado();
													
													$a_resultado['modificado_prestamo'] = $a_prestamoNuevo;
																													
													$a_resultado['estado'] = "1";
													$a_resultado['mensaje'] = "Se modifico satisfactoriamente el prestamo";	
												}
											}
										}else{
											if(!$monto_capital){
												$a_resultado['estado'] = "6";
												$a_resultado['mensaje'] = "Debe ingresar el monto del capital";
											}else{
												$a_resultado['estado'] = "6";
												$a_resultado['mensaje'] = "No esta permitido hacer la modificacion porque esta cerrado la fecha";
											}
										}
								}else{
									$a_resultado['estado'] = "3";
									$a_resultado['mensaje'] = "No existe Prestamo";
								}
							}else{
								$a_resultado['estado'] = "3";
								$a_resultado['mensaje'] = "Token No valido";	
							}
						}else{
							if(!$idprestamo){
								$a_resultado['estado'] = "5";
								$a_resultado['mensaje'] = "Debe ingresar el id del prestamo";
							}else{
								$a_resultado['estado'] = "4";
								$a_resultado['mensaje'] = "No existe el usuario";
							}
						}
						break;
					case "eliminar_huella":
											
						$idusuario 			= $o_datos['idusuario'];
						$idcliente	 		=  $o_datos['idcliente'];

						if($idusuario && $idcliente){
							$fechaDiaAbierto = fechaDiaAbierto($idusuario);
							$o_user 		= new user_class();
							if ($o_user->findUser($idusuario)){
								
								$o_clienteBean = new ClienteBean();	
								$o_clienteBean->setFlagConHuella("N");
								$o_clienteBean->setFlagHuellaConProblema("N");
								$o_clienteBean->setIdCliente($idcliente);
								$o_clienteDP = new ClienteDP($o_clienteBean);
								$bResult = $o_clienteDP->update();	
								unlink ($_SERVER['DOCUMENT_ROOT']."/images/huella/cliente/".$idcliente.".txt" );	
								
								$a_resultado['estado'] = "1";
								$a_resultado['mensaje'] = "Se elimino la huella del cliente";	
								
							}else{
								$a_resultado['estado'] = "3";
								$a_resultado['mensaje'] = "Token No valido";	
							}
						}else{
							if(!$idcliente){
								$a_resultado['estado'] = "5";
								$a_resultado['mensaje'] = "Debe ingresar el cliente";
							}else{
								$a_resultado['estado'] = "4";
								$a_resultado['mensaje'] = "No existe el usuario";
							}
						}

						break;
					
					//Las cobranzas la realizara el supervisor de sucursal o el operador
					case "listar_editar_prestamo":
						
						$idusuario 			= $o_datos['idusuario'];
						$idcliente	 		=  $o_datos['idcliente'];

						if($idusuario && $idcliente){
							$fechaDiaAbierto = fechaDiaAbierto($idusuario);
							$o_user 		= new user_class();
							if ($o_user->findUser($idusuario)){
								$a_SucursalMercado 	= sucursalMercado($o_user);
								//print_r($a_SucursalMercado);
								if(!$idmercado) $a_resultado["idmercado"] 	= (string)$a_SucursalMercado["idmercado"];
								elseif($idmercado) $a_resultado["idmercado"] = $idmercado ;
								$a_resultado["idsucursal"] 	= $a_SucursalMercado["idsucursal"];
								
								//Saldran todos los prestamos Pendientes y que no son marcados con Mora
								$o_ObjectBean = new PrestamoBean();
								$o_ObjectBean->setEstado("P");
								$o_ObjectBean->setIdCliente($idcliente);
								if($a_resultado["idsmercados"]   	!="") 	$o_ObjectBean->setFiltroMercado($a_resultado["idsmercados"]);
								
								
								$a_filtroCobranza 							= getFiltroCobranza($o_user,$fechaDiaAbierto,$idmercado);
								
								if($codigo_cliente   			!="")		$o_ObjectBean->setIdCliente($codigo_cliente); 
								if($apellido_paterno 			!="")		$o_ObjectBean->setApellidoPaterno($apellido_paterno);
								
								$o_ObjectBean->setFlagReporte('2');
								if($a_resultado["idmercado"]   	!="") 		$o_ObjectBean->setIdMercado($a_resultado["idmercado"]);
								$o_class = new PrestamoBL();
								$a_ObjectBean = $o_class->busquedaPrestamo($o_ObjectBean);
								
									if(count($a_ObjectBean)>0){
										$i = 1;
										foreach ($a_ObjectBean as $iKey => $o_objBean){

											$fechaven = "";	
											$vencido = "";	
											$moroso = "";	
											$estadoO = "";
											$fecha_tope = date('Y-m-d',strtotime($o_objBean->getFechaVencimiento().' +7 day'));
	  
											if($o_objBean->getFechaVencimiento() >= $fechaDiaAbierto){
												if($o_objBean->getFlagReporte() == '1'){
													$estadoO = "M";
												}
											}elseif($fecha_tope <= $fechaDiaAbierto){
												$estadoO = "M";
											}else{
												$estadoO = "V";
											}
									
										  	  
											  if($estadoO  == "V"){
												$color_fv = "morado";
											  }elseif($estadoO  == "M"){
												$color_fv = "rojo";
											  }else{
												$color_fv = "negro";
											  }
											
											
											
											$o_PrestamoDPT = new PrestamoDP(new PrestamoBean());
											$ultimo_pago 		= $o_PrestamoDPT->getUtimoPagoPrestamo($o_objBean->getIdPrestamo(),$fechaDiaAbierto);
											
											$a_prestamo[$o_objBean->getIdPrestamo()]['idprestamo'] 				= (int)$o_objBean->getIdPrestamo();	
											$a_prestamo[$o_objBean->getIdPrestamo()]["idcliente"] 				= $o_objBean->getIdCliente();
											$a_prestamo[$o_objBean->getIdPrestamo()]['monto_capital'] 			= (float)$o_objBean->getMontoPrestado();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['monto_total'] 			= (float)$o_objBean->getMontoTotal();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['interes_porcentaje'] 			= (float)$o_objBean->getInteresPorcentaje();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['saldo']					= (float)$o_objBean->getSaldoPrestamo();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['fecha_prestamo']			= (string)$o_objBean->getFechaInicio();																							
											$a_prestamo[$o_objBean->getIdPrestamo()]['fecha_vencimiento']		= (string)$o_objBean->getFechaVencimiento();																							
											$a_prestamo[$o_objBean->getIdPrestamo()]['estado']					= (string)$o_objBean->getEstado();																							
											$a_prestamo[$o_objBean->getIdPrestamo()]['gasto_administrativo']	= (string)$o_objBean->getGastoAdministrativo();																							
											$a_prestamo[$o_objBean->getIdPrestamo()]['forma_pago']				= (string)$o_objBean->getPeriodicidadPago();																							
											$a_prestamo[$o_objBean->getIdPrestamo()]['duracion']				= (string)$o_objBean->getDuracion();																							
											
											$a_prestamo[$o_objBean->getIdPrestamo()]["nombre_completo"] 		= (string)ucwords(mb_strtolower ($o_objBean->getObjectCliente()->getNombres()." ".$o_objBean->getObjectCliente()->getApellidoPaterno()." ".$o_objBean->getObjectCliente()->getApellidoMaterno()));
											
											$i++;
											
										}
										
										/*
										echo "<pre>";
										
										print_r($a_prestamo);
										echo "</pre>";*/
										$a_resultado['estado'] 					= "1";
										$a_resultado['mensaje'] 				= "Exito";
										$a_resultado['total_registros'] 		= count($a_prestamo);		
										$a_resultado['prestamos'] 				= $a_prestamo;		
									}else{
										$a_resultado = mostrar_error("NO_EXISTEN_PRESTAMOS",$mensaje);
										$a_resultado['prestamos'] 				= "";		
									}
								}else{
									$a_resultado['estado'] = "3";
									$a_resultado['mensaje'] = "Token No valido";	
								}
						}else{
							if(!$idcliente){
								$a_resultado['estado'] = "1";
								$a_resultado['mensaje'] = "Debe ingresar el cliente";
							}else{
								$a_resultado['estado'] = "4";
								$a_resultado['mensaje'] = "No existe el usuario";
							}
						}

						break;
					//Las cobranzas la realizara el supervisor de sucursal o el operador
					case "reporte_cobranzas":
						
						$idusuario 			= $o_datos['idusuario'];
						$idsucursal 		=  $o_datos['idsucursal'];
						$idmercado	 		=  $o_datos['idmercado'];
						$idcliente	 		=  $o_datos['idcliente'];
						$apellido_paterno 	= $o_datos['apellido_paterno'];
						
						//echo $idcliente."---";					
						if($idusuario){
							$fechaDiaAbierto = fechaDiaAbierto($idusuario);
							$o_user 		= new user_class();
							if ($o_user->findUser($idusuario)){
								$a_SucursalMercado 	= sucursalMercado($o_user);
								//print_r($a_SucursalMercado);
								if(!$idmercado) $a_resultado["idmercado"] 	= (string)$a_SucursalMercado["idmercado"];
								elseif($idmercado) $a_resultado["idmercado"] = $idmercado ;
								$a_resultado["idsucursal"] 	= $a_SucursalMercado["idsucursal"];
								
								//Saldran todos los prestamos Pendientes y que no son marcados con Mora
								$o_ObjectBean = new PrestamoBean();
								$o_ObjectBean->setEstado("P");
								if($a_resultado["idsmercados"]   	!="") 	$o_ObjectBean->setFiltroMercado($a_resultado["idsmercados"]);
								
								
								$a_filtroCobranza 							= getFiltroCobranza($o_user,$fechaDiaAbierto,$idmercado);
								
								if($codigo_cliente   			!="")		$o_ObjectBean->setIdCliente($codigo_cliente); 
								if($apellido_paterno 			!="")		$o_ObjectBean->setApellidoPaterno($apellido_paterno);
								
								$o_ObjectBean->setFlagReporte('2');
								$o_ObjectBean->setIdCliente($idcliente);
								if($a_resultado["idmercado"]   	!="") 		$o_ObjectBean->setIdMercado($a_resultado["idmercado"]);
								$o_class = new PrestamoBL();
								$a_ObjectBean = $o_class->busquedaPrestamo($o_ObjectBean);
								
									if(count($a_ObjectBean)>0){
										$i = 1;
										foreach ($a_ObjectBean as $iKey => $o_objBean){

											$fechaven = "";	
											$vencido = "";	
											$moroso = "";	
											$estadoO = "";
											$fecha_tope = date('Y-m-d',strtotime($o_objBean->getFechaVencimiento().' +7 day'));
	  
											if($o_objBean->getFechaVencimiento() >= $fechaDiaAbierto){
												if($o_objBean->getFlagReporte() == '1'){
													$estadoO = "M";
												}
											}elseif($fecha_tope <= $fechaDiaAbierto){
												$estadoO = "M";
											}else{
												$estadoO = "V";
											}
									
										  	  
											  if($estadoO  == "V"){
												$color_fv = "morado";
											  }elseif($estadoO  == "M"){
												$color_fv = "rojo";
											  }else{
												$color_fv = "negro";
											  }
											
											
											
											$o_PrestamoDPT = new PrestamoDP(new PrestamoBean());
											$ultimo_pago 		= $o_PrestamoDPT->getUtimoPagoPrestamo($o_objBean->getIdPrestamo(),$fechaDiaAbierto);
											$a_colorcodigo 					= $o_PrestamoDPT->getColorCategoria($o_objBean->getIdCategoria());

											$codigo = $a_colorcodigo['codigo'];
											$color = $a_colorcodigo['color'];
											
											$a_numero_pagos 		= $o_PrestamoDPT->getNumeroPagosPrestamo($o_objBean->getIdPrestamo());
											
											$a_prestamo[$o_objBean->getIdPrestamo()]['idprestamo'] 				= (int)$o_objBean->getIdPrestamo();	
											$a_prestamo[$o_objBean->getIdPrestamo()]["idcliente"] 				= $o_objBean->getIdCliente();
											$a_prestamo[$o_objBean->getIdPrestamo()]['monto_total'] 			= (float)$o_objBean->getMontoTotal();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['saldo']					= (float)$o_objBean->getSaldoPrestamo();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['fecha_prestamo']			= (string)$o_objBean->getFechaInicio();																							
											$a_prestamo[$o_objBean->getIdPrestamo()]['numero_pagos']			= (float)$a_numero_pagos["pago_mayor_cero"];	//Suma de los cobros del dia del prestamo
											$a_prestamo[$o_objBean->getIdPrestamo()]['numero_no_pagos']			= (float)$a_numero_pagos["pago_cero"];	//Suma de los cobros del dia del prestamo
											$a_prestamo[$o_objBean->getIdPrestamo()]['ultimo_pago']				= (String)$ultimo_pago;	//Suma de los cobros del dia del prestamo
											$a_prestamo[$o_objBean->getIdPrestamo()]['color_fecha_vencimiento']	= (String)$color_fv;	//Suma de los cobros del dia del prestamo
											$a_prestamo[$o_objBean->getIdPrestamo()]["nombre_completo"] 		= (string)ucwords(mb_strtolower ($o_objBean->getObjectCliente()->getNombres()." ".$o_objBean->getObjectCliente()->getApellidoPaterno()." ".$o_objBean->getObjectCliente()->getApellidoMaterno()));
											$a_prestamo[$o_objBean->getIdPrestamo()]["central_riesgo"] 			= (String)$o_objBean->getObjectCliente()->getFlagCentralRiesgo();
											$a_prestamo[$o_objBean->getIdPrestamo()]["color_categ"] 			= (String)$color;//"rojo"; //Categoria del prestamo con respecto a la efectividad del pago
											$a_prestamo[$o_objBean->getIdPrestamo()]["descripcion_categoria"] 	= (String)$codigo;//$o_objBean->getNombreCategoria();//"Bueno";//$o_objBean->getObjectCliente()->getCelular();
											
											$i++;
											
										}
										
										/*
										echo "<pre>";
										
										print_r($a_prestamo);
										echo "</pre>";*/
										$a_resultado['estado'] 					= "1";
										$a_resultado['mensaje'] 				= "Exito";
										$a_resultado['total_registros'] 		= count($a_prestamo);		
										$a_resultado['prestamos'] 				= $a_prestamo;		
									}else{
										$a_resultado = mostrar_error("NO_EXISTEN_PRESTAMOS",$mensaje);
									}
								}else{
									$a_resultado['estado'] = "3";
									$a_resultado['mensaje'] = "Token No valido";	
								}
						}else{
							$a_resultado['estado'] = "4";
							$a_resultado['mensaje'] = "No existe el usuario";
						}

						break;
					case "resumen_pagos":
						$idusuario 			= $o_datos['idusuario'];
						$idsucursal 		=  $o_datos['idsucursal'];
						$idmercado	 		=  $o_datos['idmercado'];
						$idcliente	 		=  $o_datos['idcliente'];
						$apellido_paterno 	= $o_datos['apellido_paterno'];

											
						if($idusuario){
							$fechaDiaAbierto = fechaDiaAbierto($idusuario);
							$o_user 		= new user_class();
							if ($o_user->findUser($idusuario)){
								$a_SucursalMercado 	= sucursalMercado($o_user);
								if(!$idmercado) $a_resultado["idmercado"] 	= (string)$a_SucursalMercado["idmercado"];
								elseif($idmercado) $a_resultado["idmercado"] = $idmercado ;
								$a_resultado["idsucursal"] 	= $a_SucursalMercado["idsucursal"];
								
								//Saldran todos los prestamos Pendientes y que no son marcados con Mora
								$o_ObjectBean = new PrestamoBean();
								$o_ObjectBean->setEstado("P");
								if($a_resultado["idsmercados"]   	!="") 	$o_ObjectBean->setFiltroMercado($a_resultado["idsmercados"]);
								if($a_resultado["idmercado"]   	!="") 		$o_ObjectBean->setIdMercado($a_resultado["idmercado"]);
								
								$a_filtroCobranza 							= getFiltroCobranza($o_user,$fechaDiaAbierto,$idmercado);
								
								if($codigo_cliente   			!="")		$o_ObjectBean->setIdCliente($codigo_cliente); 
								if($apellido_paterno 			!="")		$o_ObjectBean->setApellidoPaterno($apellido_paterno);
								
								$o_ObjectBean->setFlagReporte('2');
								$o_ObjectBean->setIdCliente($idcliente);
								$o_class = new PrestamoBL();
								$a_ObjectBean = $o_class->busquedaPrestamo($o_ObjectBean);
								
									if(count($a_ObjectBean)>0){
										$i = 1;
										foreach ($a_ObjectBean as $iKey => $o_objBean){
										
											
											$o_PrestamoDPT = new PrestamoDP(new PrestamoBean());
											$a_numero_pagos 		= $o_PrestamoDPT->getNumeroPagosPrestamo($o_objBean->getIdPrestamo());
											$a_colorcodigo 					= $o_PrestamoDPT->getColorCategoria($o_objBean->getIdCategoria());
											$codigo = $a_colorcodigo['codigo'];
											$color = $a_colorcodigo['color'];
											
											if($o_objBean->getObjectCliente()->getFlagCentralRiesgo() == "S") $cr = "Si"; else $cr="No";
											
											$a_prestamo[$o_objBean->getIdPrestamo()]['idprestamo'] 				= (int)$o_objBean->getIdPrestamo();	
											$a_prestamo[$o_objBean->getIdPrestamo()]["idcliente"] 				= $o_objBean->getIdCliente();
											$a_prestamo[$o_objBean->getIdPrestamo()]['monto_total'] 			= (float)$o_objBean->getMontoTotal();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['saldo']					= (float)$o_objBean->getSaldoPrestamo();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['fecha_prestamo']			= (string)$o_objBean->getFechaInicio();																							
											$a_prestamo[$o_objBean->getIdPrestamo()]['numero_pagos']			= (float)$a_numero_pagos["pago_mayor_cero"];	//Suma de los cobros del dia del prestamo
											$a_prestamo[$o_objBean->getIdPrestamo()]['numero_no_pagos']			= (float)$a_numero_pagos["pago_cero"];	//Suma de los cobros del dia del prestamo
											$a_prestamo[$o_objBean->getIdPrestamo()]["nombre_completo"] 		= (string)ucwords(mb_strtolower ($o_objBean->getObjectCliente()->getNombres()." ".$o_objBean->getObjectCliente()->getApellidoPaterno()." ".$o_objBean->getObjectCliente()->getApellidoMaterno()));
											$a_prestamo[$o_objBean->getIdPrestamo()]["color_categ"] 			= (String)$color;//"rojo"; //Categoria del prestamo con respecto a la efectividad del pago
											$a_prestamo[$o_objBean->getIdPrestamo()]["descripcion_categoria"] 	= (String)$codigo;//$o_objBean->getNombreCategoria();//"Bueno";//$o_objBean->getObjectCliente()->getCelular();
											$a_prestamo[$o_objBean->getIdPrestamo()]["central_riesgo"] 			= (String)$cr;
											$i++;
											
										}
										
										/*
										echo "<pre>";
										
										print_r($a_prestamo);
										echo "</pre>";*/
										$a_resultado['estado'] 					= "1";
										$a_resultado['mensaje'] 				= "Exito";
										$a_resultado['total_registros'] 		= count($a_prestamo);		
										$a_resultado['prestamos'] 				= $a_prestamo;		
									}else{
										$a_resultado = mostrar_error("NO_EXISTEN_PRESTAMOS",$mensaje);
									}
								}else{
									$a_resultado['estado'] = "3";
									$a_resultado['mensaje'] = "Token No valido";	
								}
						}else{
							$a_resultado['estado'] = "4";
							$a_resultado['mensaje'] = "No existe el usuario";
						}
						
						break;
					//Las cobranzas la realizara el supervisor de sucursal o el operador
					case "listado_cobranzas": 
							$ruta = "/images/uploadFiles/";
							
							
							$codigo_cliente 	= $o_datos['idcliente'];
							/*
							 // Foto de Negocio
							 $i_IdTipoFile = "8";
							
							 $o_ObjectFN_TN = new Cr_cliente_fileFN();
							 $o_ObjectFN_TN->setIdCliente($codigo_cliente);
							 $o_ObjectFN_TN->setEliminado( -1 );
							 $o_ObjectFN_TN->setIdtipofile($i_IdTipoFile);
							 $o_ObjectFN_TN->addOrderBy(Cr_cliente_fileFN::IdClienteFile ,false);
							 $o_ObjectBN_TN = $o_ObjectFN_TN->select( 0, 1);
							 
							 if( is_array($o_ObjectBN_TN))
							{
								$s_NombreFile = $o_ObjectBN_TN[0]->getNombreFile();
								$s_Destino_Negocio = $url_base.$ruta.$s_NombreFile;
							}
							
							 // Foto de Negocio
							 $i_IdTipoFile = "6";
							
							 $o_ObjectFN_TC = new Cr_cliente_fileFN();
							 $o_ObjectFN_TC->setIdCliente($codigo_cliente);
							 $o_ObjectFN_TC->setEliminado( -1 );
							 $o_ObjectFN_TC->setIdtipofile($i_IdTipoFile);
							 $o_ObjectFN_TC->addOrderBy(Cr_cliente_fileFN::IdClienteFile ,false);
							 $o_ObjectBN_TC = $o_ObjectFN_TC->select( 0, 1);
							 
							 if( is_array($o_ObjectBN_TC) )
							{
								$s_NombreFile = $o_ObjectBN_TC[0]->getNombreFile();
								$s_Destino_Domicilio = $url_base.$ruta.$s_NombreFile;
							}
							
							*/
							
							$idusuario 			= $o_datos['idusuario'];
							
							$idsucursal 		=  $o_datos['idsucursal'];
							$idmercado	 		=  $o_datos['idmercado'];
						
							
							//$codigo_cliente 	= $o_datos['idcliente']; Solo para que no se caiga
							$apellido_paterno 	= $o_datos['apellido_paterno'];

												
							if($idusuario){
								$fechaDiaAbierto = fechaDiaAbierto($idusuario);
								
								$o_user 		= new user_class();
								if ($o_user->findUser($idusuario)){
									
									
									$a_SucursalMercado 	= sucursalMercado($o_user);								
									/*
									echo "<pre>";
									
									print_r($a_SucursalMercado);
									echo "</pre>";
									*/
									
									if(!$idmercado) $a_resultado["idmercado"] 	= (string)$a_SucursalMercado["idmercado"];
									//$a_resultado["idsmercados"] = $a_SucursalMercado["idsmercados"];
									$a_resultado["idsucursal"] 	= $a_SucursalMercado["idsucursal"];	 						
									
									
											
									//Saldran todos los prestamos Pendientes y que no son marcados con Mora
									$o_ObjectBean = new PrestamoBean();
									$o_ObjectBean->setEstado("P");
									if($a_resultado["idsmercados"]   	!="") 	$o_ObjectBean->setFiltroMercado($a_resultado["idsmercados"]);
									if($a_resultado["idmercado"]   	!="") 	$o_ObjectBean->setIdMercado($a_resultado["idmercado"]);
									
									$a_filtroCobranza = getFiltroCobranza($o_user,$fechaDiaAbierto,$idmercado);
									
									/*echo "<pre>";
									
									print_r($a_filtroCobranza);
									echo "</pre>";
										*/						
									if($a_filtroCobranza["idcolaborador"]){
										$o_ObjectBean->setIdColaboradorPrestamo($a_filtroCobranza["idcolaborador"]);
										if(($o_user->getUserRoleId() == "sys.ope" && $a_resultado["idmercado"]) && !$idsucursal){ 
											$dia = date('N',strtotime($fechaDiaAbierto));
											if($dia != 7){
												inicializarPagos($a_resultado["idmercado"],$fechaDiaAbierto, $a_filtroCobranza["idcolaborador"],$idusuario);
											}
										}
										
									}
									if($a_filtroCobranza["idprestamos"]){
										$o_ObjectBean->setIdsPrestamos($a_filtroCobranza["idprestamos"]);
									}else{
										if($o_user->getUserRoleId() == "sys.sup"){
											$a_filtroCobranza["idprestamos"] = array('9999'=>9999999);
											$o_ObjectBean->setIdsPrestamos($a_filtroCobranza["idprestamos"]);
										}
									}
									
									//if($codigo_cliente   			!="")	$o_ObjectBean->setIdCliente($codigo_cliente);
									if($codigo_cliente   			!="")	$o_ObjectBean->setIdPrestamo($codigo_cliente); 
									if($apellido_paterno 			!="")	$o_ObjectBean->setApellidoPaterno($apellido_paterno);
									
									//$o_ObjectBean->setFlagReporte('2');
									
									$o_class = new PrestamoBL();
									$a_ObjectBean = $o_class->busquedaPrestamo($o_ObjectBean);
								
									if(count($a_ObjectBean)>0){
										$i = 1;
										foreach ($a_ObjectBean as $iKey => $o_objBean){
										
											// Foto de Negocio
											$i_IdTipoFile = "8";
											$s_Destino_Negocio = getClienteFile($o_objBean->getIdCliente(),$i_IdTipoFile,$url_base.$ruta);
												
											// Foto de Domicilio
											$i_IdTipoFile = "6";
											$s_Destino_Domicilio = getClienteFile($o_objBean->getIdCliente(),$i_IdTipoFile,$url_base.$ruta);
										
											
											
											
											$o_PrestamoDPT = new PrestamoDP(new PrestamoBean());
											$cobro_realizado = $o_PrestamoDPT->getTotalDiaAbierto($o_objBean->getIdPrestamo(),$fechaDiaAbierto);
											$numero_pagos = $o_PrestamoDPT->getNumeroPagosDiaAbierto($o_objBean->getIdPrestamo(),$fechaDiaAbierto);
											
											$a_prestamo[$o_objBean->getIdPrestamo()]['idprestamo'] 			= (int)$o_objBean->getIdPrestamo();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['amortizo'] 			= (float)sumaAmortizo($fechaDiaAbierto,$o_objBean->getIdPrestamo());	
											$a_prestamo[$o_objBean->getIdPrestamo()]['monto_total'] 		= (float)$o_objBean->getMontoTotal();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['capital'] 			= (float)$o_objBean->getMontoPrestado();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['monto_interes']		= (float)$o_objBean->getInteresMonto();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['saldo']				= (float)$o_objBean->getSaldoPrestamo();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['monto_interes']		= (float)$o_objBean->getInteresPorcentaje();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['gasto_administrativo_prestamo']= (float)$o_objBean->getGastoAdministrativo();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['fecha_prestamo']		= (string)$o_objBean->getFechaInicio();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['fecha_vencimiento']	= (string)$o_objBean->getFechaVencimiento();	
											$a_prestamo[$o_objBean->getIdPrestamo()]['estado']				= (string)$o_objBean->getEstado();	
											
											//Pagos realizados en la fecha abierta
											
											if($o_objBean->getOrigen() == "R"){
												$cadena_origen = "Nuevo";
											}elseif($o_objBean->getOrigen() == "F" && $o_objBean->getMontoExtra() >0){
												$cadena_origen = "Renovado"; 
											}elseif($o_objBean->getOrigen() == "F"){
												$cadena_origen = "Refinanciado"; 
											}
											
											$a_prestamo[$o_objBean->getIdPrestamo()]['origen']				= (string)$cadena_origen;	
											
											$a_prestamo[$o_objBean->getIdPrestamo()]['cobro_realizado']		= (float)$cobro_realizado;	//Suma de los cobros del dia del prestamo
											$a_prestamo[$o_objBean->getIdPrestamo()]['numero_pagos']		= (float)$numero_pagos;	//Suma de los cobros del dia del prestamo
											
											//$a_prestamo[$o_objBean->getIdPrestamo()]["nombre_completo"] 	= (string)ucwords(mb_strtolower ($o_objBean->getObjectCliente()->getNombres()." ".$o_objBean->getObjectCliente()->getApellidoPaterno()." ".$o_objBean->getObjectCliente()->getApellidoMaterno()));
											$a_prestamo[$o_objBean->getIdPrestamo()]["nombre_completo"] 	= (string)$o_objBean->getObjectCliente()->getNombreCompleto();
											$a_prestamo[$o_objBean->getIdPrestamo()]["sexo"] 				= (string)$o_objBean->getObjectCliente()->getSexo();
											
											$a_prestamo[$o_objBean->getIdPrestamo()]["flag_huella_con_problema"]	= (string)$o_objBean->getObjectCliente()->getFlagHuellaConProblema();
											$a_prestamo[$o_objBean->getIdPrestamo()]["huella"] 				= (string)$o_objBean->getObjectCliente()->getFlagConHuella();
											
											$a_prestamo[$o_objBean->getIdPrestamo()]["telefono"] 			= (string)$o_objBean->getObjectCliente()->getTelefono();
											$a_prestamo[$o_objBean->getIdPrestamo()]["celular"] 			= (String)$o_objBean->getObjectCliente()->getCelular();
											$a_prestamo[$o_objBean->getIdPrestamo()]["direccion"] 			= (string)utf8_encode($o_objBean->getObjectCliente()->getDireccion());
											$a_prestamo[$o_objBean->getIdPrestamo()]["gasto_administrativo"] 	= (float)$o_objBean->getObjectCliente()->getGastoAdministrativoPorcentaje();
											$a_prestamo[$o_objBean->getIdPrestamo()]["ruta_foto_negocio"]	= (string)$s_Destino_Negocio;
											$a_prestamo[$o_objBean->getIdPrestamo()]["ruta_foto_domicilio"]	= (string)$s_Destino_Domicilio;
											$a_prestamo[$o_objBean->getIdPrestamo()]["ubicacion_domicilio_longitud"]	= (string)$o_objBean->getObjectCliente()->getLongitudDomicilio();
											$a_prestamo[$o_objBean->getIdPrestamo()]["ubicacion_domicilio_latitud"]	= (string)$o_objBean->getObjectCliente()->getLatitudDomicilio();;
											$a_prestamo[$o_objBean->getIdPrestamo()]["ubicacion_negocio_longitud"]	= (string)$o_objBean->getObjectCliente()->getLongitudNegocio();;
											$a_prestamo[$o_objBean->getIdPrestamo()]["ubicacion_negocio_latitud"]	= (string)$o_objBean->getObjectCliente()->getLatitudNegocio();
											//$a_prestamo[$o_objBean->getIdPrestamo()]["idcliente"] 		= $o_objBean->getIdCliente();
											$a_prestamo[$o_objBean->getIdPrestamo()]["idcliente"] 		= $o_objBean->getIdPrestamo();
											$a_prestamo[$o_objBean->getIdPrestamo()]["semaforo"] 		= (string)$o_objBean->getSemaforo();
											
											
											$i++;
											
										}
										
										
										
										
										/*
										echo "<pre>";
										
										print_r($a_prestamo);
										echo "</pre>";*/
										$a_resultado['total_registros'] 		= count($a_prestamo);		
										$a_resultado['prestamos'] 				= $a_prestamo;		
									}else{
										$a_resultado = mostrar_error("NO_EXISTEN_PRESTAMOS",$mensaje);
									}
									
								}else{
									$a_resultado['estado'] = "3";
									$a_resultado['mensaje'] = "Token No valido";	
								}
		
							}else{
								$a_resultado['estado'] = "4";
								$a_resultado['mensaje'] = "No existe el usuario";
							}
					 
					 break;
					//Las cobranzas la realizara el supervisor de sucursal o el operador
					case "cobranzas": 
							$ruta = "/images/uploadFiles/";
							
							
							$codigo_cliente 	= $o_datos['idcliente'];
							/*
							 // Foto de Negocio
							 $i_IdTipoFile = "8";
							
							 $o_ObjectFN_TN = new Cr_cliente_fileFN();
							 $o_ObjectFN_TN->setIdCliente($codigo_cliente);
							 $o_ObjectFN_TN->setEliminado( -1 );
							 $o_ObjectFN_TN->setIdtipofile($i_IdTipoFile);
							 $o_ObjectFN_TN->addOrderBy(Cr_cliente_fileFN::IdClienteFile ,false);
							 $o_ObjectBN_TN = $o_ObjectFN_TN->select( 0, 1);
							 
							 if( is_array($o_ObjectBN_TN))
							{
								$s_NombreFile = $o_ObjectBN_TN[0]->getNombreFile();
								$s_Destino_Negocio = $url_base.$ruta.$s_NombreFile;
							}
							
							 // Foto de Negocio
							 $i_IdTipoFile = "6";
							
							 $o_ObjectFN_TC = new Cr_cliente_fileFN();
							 $o_ObjectFN_TC->setIdCliente($codigo_cliente);
							 $o_ObjectFN_TC->setEliminado( -1 );
							 $o_ObjectFN_TC->setIdtipofile($i_IdTipoFile);
							 $o_ObjectFN_TC->addOrderBy(Cr_cliente_fileFN::IdClienteFile ,false);
							 $o_ObjectBN_TC = $o_ObjectFN_TC->select( 0, 1);
							 
							 if( is_array($o_ObjectBN_TC) )
							{
								$s_NombreFile = $o_ObjectBN_TC[0]->getNombreFile();
								$s_Destino_Domicilio = $url_base.$ruta.$s_NombreFile;
							}
							
							*/
							
							$idusuario 			= $o_datos['idusuario'];
							
							$idsucursal 		=  $o_datos['idsucursal'];
							$idmercado	 		=  $o_datos['idmercado'];
						
							
							//$codigo_cliente 	= $o_datos['idcliente']; Solo para que no se caiga
							$apellido_paterno 	= $o_datos['apellido_paterno'];

												
							if($idusuario){
								$fechaDiaAbierto = fechaDiaAbierto($idusuario);
								
								$o_user 		= new user_class();
								if ($o_user->findUser($idusuario)){
									
									
									$a_SucursalMercado 	= sucursalMercado($o_user);								
									/*
									echo "<pre>";
									
									print_r($a_SucursalMercado);
									echo "</pre>";
									*/
									
									if(!$idmercado) $a_resultado["idmercado"] 	= (string)$a_SucursalMercado["idmercado"];
									//$a_resultado["idsmercados"] = $a_SucursalMercado["idsmercados"];
									$a_resultado["idsucursal"] 	= $a_SucursalMercado["idsucursal"];	 						
									
									
											
									//Saldran todos los prestamos Pendientes y que no son marcados con Mora
									$o_ObjectBean = new PrestamoBean();
									$o_ObjectBean->setEstado("P");
									if($a_resultado["idsmercados"]   	!="") 	$o_ObjectBean->setFiltroMercado($a_resultado["idsmercados"]);
									if($a_resultado["idmercado"]   	!="") 	$o_ObjectBean->setIdMercado($a_resultado["idmercado"]);
									
									$a_filtroCobranza = getFiltroCobranza($o_user,$fechaDiaAbierto,$idmercado);
									
									/*echo "<pre>";
									
									print_r($a_filtroCobranza);
									echo "</pre>";
										*/						
									if($a_filtroCobranza["idcolaborador"]){
										$o_ObjectBean->setIdColaboradorPrestamo($a_filtroCobranza["idcolaborador"]);
										if(($o_user->getUserRoleId() == "sys.ope" && $a_resultado["idmercado"]) && !$idsucursal){ 
											$dia = date('N',strtotime($fechaDiaAbierto));
											if($dia != 7){
												inicializarPagos($a_resultado["idmercado"],$fechaDiaAbierto, $a_filtroCobranza["idcolaborador"],$idusuario);
											}
										}
										
									}
									if($a_filtroCobranza["idprestamos"]){
										$o_ObjectBean->setIdsPrestamos($a_filtroCobranza["idprestamos"]);
									}else{
										if($o_user->getUserRoleId() == "sys.sup"){
											$a_filtroCobranza["idprestamos"] = array('9999'=>9999999);
											$o_ObjectBean->setIdsPrestamos($a_filtroCobranza["idprestamos"]);
										}
									}
									
									if($codigo_cliente   			!="")	$o_ObjectBean->setIdCliente($codigo_cliente); 
									if($apellido_paterno 			!="")	$o_ObjectBean->setApellidoPaterno($apellido_paterno);
									
									//$o_ObjectBean->setFlagReporte('2');
									
									$o_class = new PrestamoBL();
									$a_ObjectBean = $o_class->busquedaPrestamo($o_ObjectBean);
								
									if(count($a_ObjectBean)>0){
										$i = 1;
										foreach ($a_ObjectBean as $iKey => $o_objBean){
										
											// Foto de Negocio
											$i_IdTipoFile = "8";
											$s_Destino_Negocio = getClienteFile($o_objBean->getIdCliente(),$i_IdTipoFile,$url_base.$ruta);
												
											// Foto de Domicilio
											$i_IdTipoFile = "6";
											$s_Destino_Domicilio = getClienteFile($o_objBean->getIdCliente(),$i_IdTipoFile,$url_base.$ruta);
											//$a_clientes[$o_objBean->getIdCliente()]["nombre_completo"] 	= (string)utf8_encode(ucwords(mb_strtolower ($o_objBean->getObjectCliente()->getNombres()." ".$o_objBean->getObjectCliente()->getApellidoPaterno()." ".$o_objBean->getObjectCliente()->getApellidoMaterno())));
											$a_clientes[$i]["nombre_completo"] 	= (string)mb_strtolower ($o_objBean->getIdCliente()."-".(float)$o_objBean->getMontoTotal().".".$o_objBean->getObjectCliente()->getNombres()." ".$o_objBean->getObjectCliente()->getApellidoPaterno()." ".$o_objBean->getObjectCliente()->getApellidoMaterno());
											$a_clientes[$i]["sexo"] 		= (string)$o_objBean->getObjectCliente()->getSexo();
											$a_clientes[$i]["telefono"] 		= (string)$o_objBean->getObjectCliente()->getCelular();
											$a_clientes[$i]["celular"] 			= (String)$o_objBean->getObjectCliente()->getTelefono();
											$a_clientes[$i]["direccion"] 		= (string)mb_strtolower($o_objBean->getObjectCliente()->getDireccion());
											$a_clientes[$i]["gasto_administrativo"] 	= (float)$o_objBean->getObjectCliente()->getGastoAdministrativoPorcentaje();
											$a_clientes[$i]["ruta_foto_negocio"]	= (string)$s_Destino_Negocio;
											$a_clientes[$i]["ruta_foto_domicilio"]	= (string)$s_Destino_Domicilio;
											$a_clientes[$i]["ubicacion_domicilio_longitud"]	= (string)$o_objBean->getObjectCliente()->getLongitudDomicilio();
											$a_clientes[$i]["ubicacion_domicilio_latitud"]	= (string)$o_objBean->getObjectCliente()->getLatitudDomicilio();;
											$a_clientes[$i]["ubicacion_negocio_longitud"]	= (string)$o_objBean->getObjectCliente()->getLongitudNegocio();;
											$a_clientes[$i]["ubicacion_negocio_latitud"]	= (string)$o_objBean->getObjectCliente()->getLatitudNegocio();
											$a_clientes[$i]["idcliente"] 		= $o_objBean->getIdCliente();
											$a_clientes[$i]["semaforo"] 		= (string)$o_objBean->getSemaforo();
											
											
											$o_PrestamoDPT = new PrestamoDP(new PrestamoBean());
											$cobro_realizado = $o_PrestamoDPT->getTotalDiaAbierto($o_objBean->getIdPrestamo(),$fechaDiaAbierto);
											$numero_pagos = $o_PrestamoDPT->getNumeroPagosDiaAbierto($o_objBean->getIdPrestamo(),$fechaDiaAbierto);
											
											$a_prestamo[$i][$o_objBean->getIdPrestamo()]['idprestamo'] 			= (int)$o_objBean->getIdPrestamo();	
											$a_prestamo[$i][$o_objBean->getIdPrestamo()]['amortizo'] 			= (float)sumaAmortizo($fechaDiaAbierto,$o_objBean->getIdPrestamo());	
											$a_prestamo[$i][$o_objBean->getIdPrestamo()]['monto_total'] 		= (float)$o_objBean->getMontoTotal();	
											$a_prestamo[$i][$o_objBean->getIdPrestamo()]['capital'] 			= (float)$o_objBean->getMontoPrestado();	
											$a_prestamo[$i][$o_objBean->getIdPrestamo()]['monto_interes']		= (float)$o_objBean->getInteresMonto();	
											$a_prestamo[$i][$o_objBean->getIdPrestamo()]['saldo']				= (float)$o_objBean->getSaldoPrestamo();	
											$a_prestamo[$i][$o_objBean->getIdPrestamo()]['monto_interes']		= (float)$o_objBean->getInteresPorcentaje();	
											$a_prestamo[$i][$o_objBean->getIdPrestamo()]['gasto_administrativo']= (float)$o_objBean->getGastoAdministrativo();	
											$a_prestamo[$i][$o_objBean->getIdPrestamo()]['fecha_prestamo']		= (string)$o_objBean->getFechaInicio();	
											$a_prestamo[$i][$o_objBean->getIdPrestamo()]['fecha_vencimiento']	= (string)$o_objBean->getFechaVencimiento();	
											$a_prestamo[$i][$o_objBean->getIdPrestamo()]['estado']				= (string)$o_objBean->getEstado();	
											
											$a_clientes[$i]["direccion"] = "".(float)$o_objBean->getSaldoPrestamo().".".$a_clientes[$i]["direccion"];
											//Pagos realizados en la fecha abierta
											
											if($o_objBean->getOrigen() == "R"){
												$cadena_origen = "Nuevo";
											}elseif($o_objBean->getOrigen() == "F" && $o_objBean->getMontoExtra() >0){
												$cadena_origen = "Renovado"; 
											}elseif($o_objBean->getOrigen() == "F"){
												$cadena_origen = "Refinanciado"; 
											}
											
											$a_prestamo[$i][$o_objBean->getIdPrestamo()]['origen']				= (string)$cadena_origen;	
											
											$a_prestamo[$i][$o_objBean->getIdPrestamo()]['cobro_realizado']		= (float)$cobro_realizado;	//Suma de los cobros del dia del prestamo
											$a_prestamo[$i][$o_objBean->getIdPrestamo()]['numero_pagos']		= (float)$numero_pagos;	//Suma de los cobros del dia del prestamo
											
											$a_clientes[$i]['prestamo'] = $a_prestamo[$i];
											$i++;
											
										}
										/*
										echo "<pre>";
										
										print_r($a_clientes);
										echo "</pre>";*/
										$a_resultado['total_registros'] 		= count($a_clientes);		
										$a_resultado['clientes'] 		= $a_clientes;		
									}else{
										$a_resultado = mostrar_error("NO_EXISTEN_PRESTAMOS",$mensaje);
									}
									
								}else{
									$a_resultado['estado'] = "3";
									$a_resultado['mensaje'] = "Token No valido";	
								}
		
							}else{
								$a_resultado['estado'] = "4";
								$a_resultado['mensaje'] = "No existe el usuario";
							}
					 
					 break;
					 case "pago":
						$idusuario 			= $o_datos['idusuario'];
						$idcliente 			= $o_datos['idcliente'];
						$monto 				= $o_datos['monto'];
						$idprestamo			= $o_datos['idprestamo'];
						$calificacion_u_pago= $o_datos['calificacion_u_pago'];
						
						$ubicacion_registro_latitud	= $o_datos['ubicacion_registro_latitud'];
						$ubicacion_registro_longitud	= $o_datos['ubicacion_registro_longitud'];
						
						$permitir_trx 		= 1;		 		
						if($idusuario){
							if($idcliente){
								
								//////////////////////////////////////////7
								$o_crClienteBean = new ClienteBean();
								$o_crClienteBean->setIdCliente($idcliente);
								
								$o_clienteDP = new ClienteDP($o_crClienteBean);
								$a_o_clienteDP = $o_clienteDP->select();
								
								if(is_array($a_o_clienteDP) && count($a_o_clienteDP)){
									
									$o_ClienteBN 	= $a_o_clienteDP[0];
									$Correo 		= $o_ClienteBN->getCorreo();
									
									
								}
								
								///////////////////////////////////////////////
								
								$o_crColaboradorBean = new ColaboradorBean();
								$o_crColaboradorBean->setUsuario($idusuario);
								
								$o_crColaboradorDP = new ColaboradorDP($o_crColaboradorBean);
								$a_o_crColaboradorDP = $o_crColaboradorDP->select();
								
								if(is_array($a_o_crColaboradorDP) && count($a_o_crColaboradorDP)){
									
									$o_crColaboradorBN 	= $a_o_crColaboradorDP[0];
									$idColaborador 		= $o_crColaboradorBN->getIdColaborador();
									
									$fechaDiaAbierto = fechaDiaAbierto($idusuario);
									
									$o_PrestamoBeanTemp = new PrestamoBean();
									$o_PrestamoBeanTemp->setIdPrestamo($idprestamo);
									
									$o_PrestamoDP = new PrestamoDP($o_PrestamoBeanTemp);
									$a_o_Prestamo = $o_PrestamoDP->select();
									if(is_array($a_o_Prestamo)){
										foreach ($a_o_Prestamo as $key =>$o_Prestamo){
											$SaldoAnterior 			= $o_Prestamo->getSaldoPrestamo();
											$IdColaboradorPrestamo 	= $o_Prestamo->getIdColaborador();
											$EstadoPrestamo 		= $o_Prestamo->getEstado();
										}
									}else{
										$a_resultado['estado'] = "5";
										$msg = "Fallo, el codigo del prestamo no existe";					
										$permitir_trx = 0; 
									}
																	
									if($EstadoPrestamo == "C"){
										$a_resultado['estado'] = "2";
										$msg = "Fallo, no se puede ingresar un pago al prestamo ".$idprestamo." porque esta Cancelado.";
										$permitir_trx = 0;
									}elseif($monto > $SaldoAnterior){
										$a_resultado['estado'] = "4";
										$msg = "Fallo, el monto ingresado es mayor al Saldo";				
										$permitir_trx = 0; 
									}
									
									$NuevoSaldo = $SaldoAnterior - $monto;

									if($NuevoSaldo < 0){//Se cancelo con un monto mayor
										$permitir_trx = 0;
										$msg = "Pago tiene monto superior al saldo";

									}
									
									if($NuevoSaldo == 0){
										
										if(!$calificacion_u_pago){
											//$permitir_trx = 0;
											//$msg = "Debe seleccionar por ser ultimo pago la calificacion.";
										}
										
									}
									
									if($permitir_trx){
										$id_pago_update = "";
										$o_PagoBean = new PagoBean();
										$o_PagoBean->setIdPrestamo($idprestamo);
										$o_PagoBean->setTipo("1");
										$o_PagoBean->setFechaPago($fechaDiaAbierto);
										$o_PagoBean->setFechaFinal($fechaDiaAbierto);
										$o_PagoBL 		= new PagoBL();
										$a_o_pago 		= $o_PagoBL->busquedaPago($o_PagoBean);
										$permitir_mas_1_pago = 1;
										if(is_array($a_o_pago) && count($a_o_pago)){//Update del Pago
											foreach ($a_o_pago as $key => $o_pago) {
												if($o_pago->getTipo() == 2) $permitir_mas_1_pago = 0; 
												if($o_pago->getMontoPago()== 0){
													$id_pago_update = $o_pago->getIdPago();
												}elseif($o_pago->getMontoPago() > 0){
													$permitir_mas_1_pago = 0; 
												}
											}
										}
										
										if($permitir_mas_1_pago){
											$o_PagoBean = new PagoBean();
											$o_PagoBean->setIdPrestamo($idprestamo);
											$o_PagoBean->setRegistroLatitud($ubicacion_registro_latitud);
											$o_PagoBean->setRegistroLongitud($ubicacion_registro_longitud);
											$o_PagoBean->setMontoPago($monto);
											$o_PagoBean->setFechaPago($fechaDiaAbierto);
											$o_PagoBean->setUsuarioCreacion($idusuario);
											$o_PagoBean->setIdColaborador($IdColaboradorPrestamo);
											$o_PagoBean->setFechaCreacion(date('Y-m-d H:i:s'));
											$o_PagoBL = new PagoBL();
														
											if($id_pago_update){
												$o_PagoBean->setIdPago($id_pago_update);
												$o_PagoBL->modificarPago($o_PagoBean);
											}else{
												$o_PagoBL->insertarPago($o_PagoBean);
											}
											
											//Actualizar el Saldo del Prestamo-----------------------
																			
											
											$o_PrestamoBean = new PrestamoBean();
											$o_PrestamoBean->setIdPrestamo($idprestamo);
											$NuevoSaldo = $SaldoAnterior - $monto;
											
											if($NuevoSaldo == 0){
												$o_PrestamoBean->setSaldoPrestamo("0.00");
												$o_PrestamoBean->setEstado("C");
												$o_PrestamoBean->setFechaCancelacion(date('Y-m-d H:i:s'));
												
												if($calificacion_u_pago){
													$o_PrestamoBean->setCalificacionUP($calificacion_u_pago);
													$con = Conexion::getConexion();
													$sql = "select	idestadoupago, Descripcion, color
															from	cr_estadoultimopago
															where   estado = 'A' 
																	and idestadoupago = '".$calificacion_u_pago."'  
															order   by Descripcion asc  ";
										
										            
										
										            $result = mysql_db_query(Conexion::getNameDb(), $sql, $con);
										
										            if(isset($result)){
														$num_rows = mysql_num_rows($result);
										                if($num_rows > 0){
										                    while ($o_valor = mysql_fetch_object($result)) {
										                        $descripcionUP = $o_valor->Descripcion;
										                        $colorUP = $o_valor->color;
										                    }
										                    $o_PrestamoBean->setColorUP($colorUP);
										                    $o_PrestamoBean->setDescripcionUP($descripcionUP);
										                }
										            }
												}
												
											}elseif($NuevoSaldo < 0){//Se cancelo con un monto mayor
												$NuevoSaldo = "0";
												$o_PrestamoBean->setSaldoPrestamo("0.00");
												if($SaldoMoraAnterior == 0){
													$o_PrestamoBean->setEstado("C");
													$o_PrestamoBean->setFechaCancelacion(date('Y-m-d H:i:s'));
												}
												
												
											}else{//Descuento de saldo Normal
												$o_PrestamoBean->setSaldoPrestamo($NuevoSaldo);	
											}
											
											$o_PrestamoBL = new PrestamoBL();
											$bResult = $o_PrestamoBL->modificarPrestamo($o_PrestamoBean);		
											if($bResult){
												/***/
												if($Correo){
												
													
													$mail = new PHPMailer();
												
													//Luego tenemos que iniciar la validacion por SMTP:
													$mail->CharSet = "UTF-8";
													//$mail->isSMTP();
													$mail->SMTPAuth = false;
													//$mail->Host = "mail.sinergiaperu.com"; // A RELLENAR. Aquí pondremos el SMTP a utilizar. Por ej. mail.midominio.com
													//$mail->Username = "sistemas@sinergiaperu.com"; // A RELLENAR. Email de la cuenta de correo. ej.info@midominio.com La cuenta de correo debe ser creada previamente. 
													//$mail->Password = "py[58RZuqVIj"; // A RELLENAR. Aqui pondremos la contraseña de la cuenta de correo
													//$mail->Port = 465; // Puerto de conexion al servidor de envio. 
													$mail->From = "no-reply@credito-union.com"; // A RELLENARDesde donde enviamos (Para mostrar). Puede ser el mismo que el email creado previamente.
													$mail->FromName = "Credito Union"; //A RELLENAR Nombre a mostrar del remitente. 
													$mail->AddAddress("msotomayor@dataexe.com"); // Esta es la direccion a donde enviamos 
													if(is_valid_email($Correo)){
														$mail->AddAddress($Correo); // Esta es la direccion a donde enviamos 
													}else{
														$msg = "Correo no valido";
													}
													$mail->isHTML(true); // El correo se envía como HTML 
													$mail->Subject = "Credito Union :: Pago del Prestamo # ".$idprestamo; // Este es el titulo del email. 
													$body = "Se realizo el pago del monto: ".$monto; 
													$body .= "<br>Nuevo saldo: ".$NuevoSaldo; 
													$body .= "<br><br>Muchas gracias.  "; 
													//$body .= "Aquí continuamos el mensaje"; 
													$mail->Body = $body; // Mensaje a enviar. 
													//$attachment = chunk_split($attachment);
													//$mail->AddStringAttachment($attachment, 'filename.pdf','base64', "application/pdf");
													//$mail->AddStringAttachment($attachment, 'some_filename.pdf');
													
													//$mail->AddAttachment($archivo); 
													$exito = $mail->Send(); // Envía el correo.
													
													if($exito)
													{ 
														//echo "El correo fue enviado correctamente."; 
													}else{ 
														//echo "Hubo un problema. Contacta a un administrador."; 
													} 
												}
												$a_resultado['estado'] = "1";
												$a_resultado['mensaje'] = "Exito";
											 }
										}else{
											$a_resultado['estado'] = "5";
											$a_resultado['mensaje'] = "Ya ingreso el pago en la fecha ".$fechaDiaAbierto;
										}
									}else{
										$a_resultado['estado'] = "5";
										$a_resultado['mensaje'] = $msg;
									}
								}else{
									$a_resultado['estado'] = "2";
									$a_resultado['mensaje'] = "Fallo, no se encontro el usuario";
								}
							}else{
								$a_resultado['estado'] = "2";
								$a_resultado['mensaje'] = "Fallo, no hay codigo de cliente";
							}
						}else{
							$a_resultado['estado'] = "2";
							$a_resultado['mensaje'] = "Fallo, debe de ingresar el usuario";
						}
					 
					 break;
					 case "renovacion"		:
					 case "refinanciacion"	:	
							$idusuario 						=  $o_datos['idusuario'];
							$idcliente 						=  $o_datos['idcliente'];
							$idprestamo 					=  $o_datos['idprestamo'];
							$monto	 						=  str_replace(",", ".", $o_datos['monto']);
							$interes	 					=  str_replace(",", ".", $o_datos['interes']);
							$mora		 					=  str_replace(",", ".", $o_datos['mora']);
							$montoextra	 					=  str_replace(",", ".", $o_datos['monto']); //Monto Extra
							$periodo	 					=  $o_datos['periodo'];
							$duracion	 					=  $o_datos['duracion'];
							
							$incluir_en_monto				=  $o_datos['incluir_en_monto'];
							
							$gastos_administrativos	 		=  $o_datos['gastos_administrativos'];
							$ubicacion_registro_latitud		=  $o_datos['ubicacion_registro_latitud'];
							$ubicacion_registro_longitud	=  $o_datos['ubicacion_registro_longitud'];
							
							if($idusuario){
								if($idcliente){
								
									if($incluir_en_monto == 'S'){
										$moraNP						=	$mora;	
										$gastos_administrativosNP	=	$gastos_administrativos;	
										$mora						=	0;
										$gastos_administrativos		=	0;
									}
									
								
									
									//////////////////////////////////////////7
									$o_crClienteBean = new ClienteBean();
									$o_crClienteBean->setIdCliente($idcliente);
									
									///////////////////////////////////////////////
									
									$o_crColaboradorBean = new ColaboradorBean();
									$o_crColaboradorBean->setUsuario($idusuario);
									
									$o_crColaboradorDP = new ColaboradorDP($o_crColaboradorBean);
									$a_o_crColaboradorDP = $o_crColaboradorDP->select();
									
									if(is_array($a_o_crColaboradorDP) && count($a_o_crColaboradorDP)){
										
										$o_crColaboradorBN 	= $a_o_crColaboradorDP[0];
										$idColaborador 		= $o_crColaboradorBN->getIdColaborador();
										
										$fechatransaccion 	= $o_crColaboradorDP->getFechaTransaccion($idColaborador);
										
										if($idprestamo){
								
											$o_PrestamoBeanAnt = new PrestamoBean();
											$o_PrestamoBeanAnt->setIdPrestamo($idprestamo);
											$o_class = new PrestamoBL();
											$a_ObjectBeanAnt = $o_class->busquedaPrestamo($o_PrestamoBeanAnt);
										}
										
										
										if(is_array($a_ObjectBeanAnt)){
											 while(list($key,$o_ObjectBean) = each($a_ObjectBeanAnt)){
												$SaldoPrestamo = $o_ObjectBean->getSaldoPrestamo();
												$Estado = $o_ObjectBean->getEstado();
												$IdCliente = $o_ObjectBean->getIdCliente();
												$IdColaboradorP = $o_ObjectBean->getIdColaborador();
											 }
										}
										
										
										if($monto) $montoextra = $monto - $SaldoPrestamo;
														
										if($Estado == "C"){
											$a_resultado['estado'] = "2";
											$a_resultado['mensaje'] = "Fallo, el prestamo ".$idprestamo." a refinanciar esta cancelado";
										}
										/*elseif($idcliente != $IdCliente){
											$a_resultado['estado'] = "2";
											$a_resultado['mensaje'] = "Fallo, el Prestamo no ".$idprestamo." corresponde al cliente ".$idcliente;
										}*/
										else{
											//VALIDAR LA HUELLA DEL CLIENTE------------------------------------------
											
											//-----------------------------------------------------------------------
										
											/**/	
											$o_PrestamoBean = new PrestamoBean();
											$o_PrestamoBean->setIdCliente($IdCliente);
											$o_PrestamoBean->setMontoExtra(round($montoextra,2));
											$montoPrestado = $SaldoPrestamo + $montoextra + $moraNP + $gastos_administrativosNP;
											
											$montoTotal 	= round(($montoPrestado)*(1+$interes/100),2);
											$o_PrestamoBean->setMontoPrestado($montoPrestado);
											$o_PrestamoBean->setMontoTotal(round($montoTotal,2));
											$o_PrestamoBean->setSaldoPrestamo(round($montoTotal,2));
											$o_PrestamoBean->setInteresPorcentaje($interes);
											
											$o_PrestamoBean->setFechaInicio($fechatransaccion);
											
											$o_PrestamoBean->setPeriodicidadPago($periodo);
											$o_PrestamoBean->setDuracion($duracion); 
											$o_PrestamoBean->setOrigen("F");
											$o_PrestamoBean->setFlagReporte('2');
											$o_PrestamoBean->setIdPrestamoReferencia($idprestamo);
											
											
											$fecha_ini = date('Y-m-d',strtotime($fechatransaccion.' +0 days'));
											
											switch ($periodo){
												case "D" : 
												        $fechaPago  =  date('Y-m-d',strtotime($fecha_ini.' +1 days'));
														switch ($duracion){
															/**********************/
															case 7 :  $MontoCuota = round($montoTotal/5,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +7 days'));
																	  $NroCuotas=5; break;
															/*********************/ 
															case 15 : $MontoCuota = round($montoTotal/13,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +15 days'));
																	  $NroCuotas=13; break;
															case 30 : $MontoCuota = round($montoTotal/26,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +30 days'));
																	  $NroCuotas=26; break;
															case 45 : $MontoCuota = round($montoTotal/39,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +45 days'));
																	  $NroCuotas=39; break;
															case 60 : $MontoCuota = round($montoTotal/52,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +60 days'));
																	  $NroCuotas=52; break;
															case 75 : $MontoCuota = round($montoTotal/65,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +75 days'));
																	  $NroCuotas=65; break;
															case 90 : $MontoCuota = round($montoTotal/88,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +90 days'));
																	  $NroCuotas=88; break;
														}
														break;
												case "S":
												        $fechaPago  =  date('Y-m-d',strtotime($fecha_ini.' +7 days'));
														switch ($duracion){
															/**********************/
															case 7 :  $MontoCuota = round($montoTotal/1,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +7 days'));
																	  $NroCuotas=1; break;
															/*********************/
															case 15 : $MontoCuota = round($montoTotal/2,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +15 days'));
																	  $NroCuotas=2; break;
															case 30 : $MontoCuota = round($montoTotal/4,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +30 days'));
																	  $NroCuotas=4; break;
															case 45 : $MontoCuota = round($montoTotal/6,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +45 days'));
																	  $NroCuotas=6; break;
															case 60 : $MontoCuota = round($montoTotal/8,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +60 days'));
																	  $NroCuotas=8; break;
															case 75 : $MontoCuota = round($montoTotal/10,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +75 days'));
																	  $NroCuotas=10; break;
															case 90 : $MontoCuota = round($montoTotal/12,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +90 days'));
																	  $NroCuotas=12; break;
														}
														break;
												case "Q":
												        $fechaPago  =  date('Y-m-d',strtotime($fecha_ini.' +15 days'));
														switch ($duracion){	
															case 15 : $MontoCuota = round($montoTotal/1,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +15 days')); 
																	  $NroCuotas=1; break;
															case 30 : $MontoCuota = round($montoTotal/2,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +30 days'));  				
																	  $NroCuotas=2; break;
															case 45 : $MontoCuota = round($montoTotal/3,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +45 days'));
																	  $NroCuotas=3; break;
															case 60 : $MontoCuota = round($montoTotal/4,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +60 days'));
																	  $NroCuotas=4; break;
															case 75 : $MontoCuota = round($montoTotal/5,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +75 days'));  				
																	  $NroCuotas=5; break;
															case 90 : $MontoCuota = round($montoTotal/6,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +90 days'));
																	  $NroCuotas=6; break;
														}
														break;
												case "M":
												        $fechaPago  =  date('Y-m-d',strtotime($fecha_ini.' +30 days'));
														switch ($duracion){	
															
															case 30 : $MontoCuota = round($montoTotal/1,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +30 days'));
																	  $NroCuotas=1; break;
															case 60 : $MontoCuota = round($montoTotal/2,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +60 days'));
																	  $NroCuotas=2; break;
															case 90 : $MontoCuota = round($montoTotal/3,2);
																	  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +90 days'));
																	  $NroCuotas=3; break;
														}
														break;
											}
											if($duracion){
												$o_PrestamoBean->setCuotaPago($MontoCuota);
												$o_PrestamoBean->setFechaInicioPago($fechaPago);
												$o_PrestamoBean->setFechaVencimiento($fechaVencimiento);
												$InteresMonto = round((($montoPrestado)*$interes)/100,2);
												$o_PrestamoBean->setInteresMonto($InteresMonto);
												$o_PrestamoBean->setNroCuotas($NroCuotas);
												$o_PrestamoBean->setEstado("P");
												$o_PrestamoBean->setFechaCreacion(date("Y-m-d H:i:s"));
												$o_PrestamoBean->setUsuarioCreacion($idusuario);
												$o_PrestamoBean->setIdColaborador($IdColaboradorP);
												$gastos_administrativos = ceil($montoPrestado*(0.02));
												$o_PrestamoBean->setGastoAdministrativo($gastos_administrativos);
												$o_PrestamoBean->setGastoAdministrativoNP($gastos_administrativosNP);
												$o_PrestamoBean->setMoraNP($moraNP);
												$o_PrestamoBean->setRegistroLatitud($ubicacion_registro_latitud);
												$o_PrestamoBean->setRegistroLongitud($ubicacion_registro_longitud);
												 
																						
												 
												 
												$o_PrestamoBL = new PrestamoBL();
												$bResult = $o_PrestamoBL->insertarPrestamo($o_PrestamoBean);
												procesoCalculoCronograma($bResult,1);
												if($bResult){
													$o_PrestamoBeanAnt = new PrestamoBean();
													$o_PrestamoBeanAnt->setIdPrestamo($idprestamo);
													$o_PrestamoBeanAnt->setEstado("C");
													$o_PrestamoBeanAnt->setFechaCancelacion($fechatransaccion." ".date('H:i:s'));
													$o_PrestamoBeanAnt->setFechaModificacion(date("Y-m-d H:i:s"));
													$o_PrestamoBeanAnt->setUsuarioModificacion($idusuario);
													$o_class = new PrestamoBL();
													$a_ObjectBeanAnt = $o_class->modificarPrestamo($o_PrestamoBeanAnt);
													if(!$mora) $mora ="0.00";
													if((float)$mora >= 0){
														
														$o_PagoBean = new PagoBean();
														$o_PagoBean->setIdPrestamo($idprestamo);
														$o_PagoBean->setFechaPago($fechatransaccion);
														$o_PagoBean->setTipopago('2');
														$o_PagoBean->setMontoPago($mora);
														$o_PagoBean->setIdColaborador($IdColaboradorP);
														$o_PagoBean->setRegistroLatitud($ubicacion_registro_latitud);
														$o_PagoBean->setRegistroLongitud($ubicacion_registro_longitud);
														$o_PagoBean->setFechaCreacion(date("Y-m-d H:i:s"));
														$o_PagoBean->setUsuarioCreacion($idusuario);
														$o_PagoDP = new PagoDP($o_PagoBean);
														$o_PagoDP->save();
													}
												
													$o_newPrestamoBean = new PrestamoBean();
													$o_newPrestamoBean->setIdPrestamo($bResult);
													
													$o_newPrestamoDP = new PrestamoDP($o_newPrestamoBean);
													$a_newPrestamoBean =$o_newPrestamoDP->select();
													$o_newPrestamo = $a_newPrestamoBean[0];
													
													$a_prestamoNuevo['idprestamo'] 	= $o_newPrestamo->getIdPrestamo();
													$a_prestamoNuevo['monto_total']	= (float)$o_newPrestamo->getMontoTotal();
													$a_prestamoNuevo['capital']	= (float)$o_newPrestamo->getMontoPrestado();
													$a_prestamoNuevo['monto_interes']	= (float)$o_newPrestamo->getInteresMonto();
													$a_prestamoNuevo['saldo']	= (float)$o_newPrestamo->getSaldoPrestamo();
													$a_prestamoNuevo['interes']	= (float)$o_newPrestamo->getInteresPorcentaje();
													$a_prestamoNuevo['gastos_administrativos']	= (float)$o_newPrestamo->getGastoAdministrativo();
													$a_prestamoNuevo['fecha_prestamo']	= (String)$o_newPrestamo->getFechaInicio();
													$a_prestamoNuevo['fecha_vencimiento']	= (String)$o_newPrestamo->getFechaVencimiento();
													$a_prestamoNuevo['estado']	= $o_newPrestamo->getEstado();
													$a_prestamoNuevo['monto_extra']	= (float)$o_newPrestamo->getMontoExtra();
													
												
													$a_resultado['estado'] = "1";
													$a_resultado['mensaje'] = "Exito";
													$a_resultado['nuevo_prestamo'] = $a_prestamoNuevo;
												
												}else{
													$a_resultado['estado'] = "2";
													$a_resultado['mensaje'] = "Fallo, no se registro el prestamo a renovar";
												}
											}else{
												$a_resultado['estado'] = "2";
												$a_resultado['mensaje'] = "Fallo, el Prestamo no tiene duracion ".$idprestamo.".";
											}
										}
									
									}else{
										$a_resultado['estado'] = "2";
										$a_resultado['mensaje'] = "Fallo, no se encontro el usuario";
									}
								}else{
									
								}
							}else{
								$a_resultado['estado'] = "2";
								$a_resultado['mensaje'] = "Fallo, debe de ingresar el usuario";
							}
						
					 break;
					 
					 case "prestamo":
						$idusuario 						=  $o_datos['idusuario'];
						$idcliente 						=  $o_datos['idcliente'];
						$idprestamo 					=  $o_datos['idprestamo'];
						$monto			 				=  $o_datos['monto'];
						$interes	 					=  $o_datos['interes'];
						$mora		 					=  $o_datos['mora'];
						$monto	 						=  $o_datos['monto']; //Monto Extra
						$periodo	 					=  $o_datos['periodo'];
						$duracion	 					=  $o_datos['duracion'];
						
						$gastos_administrativos	 		=  $o_datos['gastos_administrativos'];
						$ubicacion_registro_latitud		=  $o_datos['ubicacion_registro_latitud'];
						$ubicacion_registro_longitud	=  $o_datos['ubicacion_registro_longitud'];
						
						$idusuario = 0;
						
						if($idusuario){
							if($idcliente){
								
								$o_ClienteBean = new ClienteBean();
								$o_ClienteBean->setIdCliente($idcliente);
																
								$o_ClienteDP = new ClienteDP($o_ClienteBean);
								$a_o_ClienteDP = $o_ClienteDP->select();
								
								
								if(is_array($a_o_ClienteDP)){
									// Si ya tiene prestamos debe sacrse el valor de GA del perfil del cliente
									$o_newPrestamoBean = new PrestamoBean();
									$o_newPrestamoBean->setIdCliente($idcliente);
									
									$o_newPrestamoDP = new PrestamoDP($o_newPrestamoBean);
									$a_newPrestamos = $o_newPrestamoDP->select();
									
							    	if(is_array($a_newPrestamos) && count($a_newPrestamos) > 0){
									
										$gastos_administrativos_cliente = $a_o_ClienteDP[0]->getGastoAdministrativoPorcentaje();
										$gastos_administrativos = $monto * ($gastos_administrativos_cliente/100);
									}
									//--------------------------------------------------------------------------------
								}
											
								$o_crColaboradorBean = new ColaboradorBean();
								$o_crColaboradorBean->setUsuario($idusuario);
								
								$o_crColaboradorDP = new ColaboradorDP($o_crColaboradorBean);
								$a_o_crColaboradorDP = $o_crColaboradorDP->select();
								
								if(is_array($a_o_crColaboradorDP) && count($a_o_crColaboradorDP)){
									
									$o_crColaboradorBN 	= $a_o_crColaboradorDP[0];
									$idColaborador 		= $o_crColaboradorBN->getIdColaborador();
									
									$fechatransaccion 	= $o_crColaboradorDP->getFechaTransaccion($idColaborador);
					
									//VALIDAR LA HUELLA DEL CLIENTE------------------------------------------
									
										
									//-----------------------------------------------------------------------
								
									/**/	
									$o_PrestamoBean = new PrestamoBean();
									$o_PrestamoBean->setIdCliente($idcliente);
									$montoTotal 	= round(($monto)*(1+$interes/100),1);
									$o_PrestamoBean->setMontoPrestado($monto);
									$o_PrestamoBean->setMontoTotal(round(($monto)*(1+$interes/100),1));
									$o_PrestamoBean->setSaldoPrestamo(round(($monto)*(1+$interes/100),1));
									$o_PrestamoBean->setInteresPorcentaje($interes);
									
									$o_PrestamoBean->setFechaInicio($fechatransaccion);
									
									$o_PrestamoBean->setPeriodicidadPago($periodo);
									$o_PrestamoBean->setDuracion($duracion); 
									$o_PrestamoBean->setOrigen("R");
									$o_PrestamoBean->setFlagReporte('2');
									
									
									$fecha_ini = date('Y-m-d',strtotime($fechatransaccion.' +0 days'));
									
									switch ($periodo){
										case "D" : 
										        $fechaPago = date('Y-m-d',strtotime($fechatransaccion.' +1 days'));
												switch ($duracion){
													/**********************/
													case 7 :  $MontoCuota = round($montoTotal/5,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +7 days'));
															  $NroCuotas=5; break;
													/*********************/ 
													case 15 : $MontoCuota = round($montoTotal/13,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +15 days'));
															  $NroCuotas=13; break;
													case 30 : $MontoCuota = round($montoTotal/26,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +30 days'));
															  $NroCuotas=26; break;
													case 45 : $MontoCuota = round($montoTotal/39,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +45 days'));
															  $NroCuotas=39; break;
													case 60 : $MontoCuota = round($montoTotal/52,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +60 days'));
															  $NroCuotas=52; break;
													case 75 : $MontoCuota = round($montoTotal/65,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +75 days'));
															  $NroCuotas=65; break;
													case 90 : $MontoCuota = round($montoTotal/88,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +90 days'));
															  $NroCuotas=88; break;
												}
												break;
										case "S":
										        $fechaPago = date('Y-m-d',strtotime($fechatransaccion.' +7 days'));
												switch ($duracion){
													/**********************/
													case 7 :  $MontoCuota = round($montoTotal/1,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +7 days'));
															  $NroCuotas=1; break;
													/*********************/
													case 15 : $MontoCuota = round($montoTotal/2,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +15 days'));
															  $NroCuotas=2; break;
													case 30 : $MontoCuota = round($montoTotal/4,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +30 days'));
															  $NroCuotas=4; break;
													case 45 : $MontoCuota = round($montoTotal/6,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +45 days'));
															  $NroCuotas=6; break;
													case 60 : $MontoCuota = round($montoTotal/8,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +60 days'));
															  $NroCuotas=8; break;
													case 75 : $MontoCuota = round($montoTotal/10,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +75 days'));
															  $NroCuotas=10; break;
													case 90 : $MontoCuota = round($montoTotal/12,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +90 days'));
															  $NroCuotas=12; break;
												}
												break;
										case "Q":
										        $fechaPago = date('Y-m-d',strtotime($fechatransaccion.' +15 days'));
												switch ($duracion){	
													case 15 : $MontoCuota = round($montoTotal/1,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +15 days')); 
															  $NroCuotas=1; break;
													case 30 : $MontoCuota = round($montoTotal/2,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +30 days'));  				
															  $NroCuotas=2; break;
													case 45 : $MontoCuota = round($montoTotal/3,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +45 days'));
															  $NroCuotas=3; break;
													case 60 : $MontoCuota = round($montoTotal/4,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +60 days'));
															  $NroCuotas=4; break;
													case 75 : $MontoCuota = round($montoTotal/5,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +75 days'));  				
															  $NroCuotas=5; break;
													case 90 : $MontoCuota = round($montoTotal/6,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +90 days'));
															  $NroCuotas=6; break;
												}
												break;
										case "M":
										        $fechaPago = date('Y-m-d',strtotime($fechatransaccion.' +30 days'));
												switch ($duracion){	
													
													case 30 : $MontoCuota = round($montoTotal/1,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +30 days'));
															  $NroCuotas=1; break;
													case 60 : $MontoCuota = round($montoTotal/2,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +60 days'));
															  $NroCuotas=2; break;
													case 90 : $MontoCuota = round($montoTotal/3,2);
															  $fechaVencimiento = date('Y-m-d',strtotime($fecha_ini.' +90 days'));
															  $NroCuotas=3; break;
												}
												break;
									}
									
									if($duracion){
										$o_PrestamoBean->setCuotaPago($MontoCuota);
										$o_PrestamoBean->setFechaInicioPago($fechaPago);
										$o_PrestamoBean->setFechaVencimiento($fechaVencimiento);
										$InteresMonto = (round($monto)*$interes)/100;
										$o_PrestamoBean->setInteresMonto($InteresMonto);
										$o_PrestamoBean->setNroCuotas($NroCuotas);
										 
										$o_PrestamoBean->setEstado("P");
										$o_PrestamoBean->setFechaCreacion(date("Y-m-d H:i:s"));
										$o_PrestamoBean->setUsuarioCreacion($idusuario);
										
										$idColaboradorP = getColaboradorxCliente($idcliente);  	
										
										
										
											$o_PrestamoBean->setIdColaborador($idColaboradorP);
											$o_PrestamoBean->setIdColaboradorOrigen($idColaboradorP);
											//
											$o_PrestamoBean->setGastoAdministrativo($gastos_administrativos);
											$o_PrestamoBean->setRegistroLatitud($ubicacion_registro_latitud);
											$o_PrestamoBean->setRegistroLongitud($ubicacion_registro_longitud);
											 
											$o_PrestamoBL = new PrestamoBL();
											$bResult = $o_PrestamoBL->insertarPrestamo($o_PrestamoBean);
											procesoCalculoCronograma($bResult,1);
											if($bResult){
																
												$o_newPrestamoBean = new PrestamoBean();
												$o_newPrestamoBean->setIdPrestamo($bResult);
												
												$o_newPrestamoDP = new PrestamoDP($o_newPrestamoBean);
												$a_newPrestamoBean =$o_newPrestamoDP->select();
												$o_newPrestamo = $a_newPrestamoBean[0];
												
												$a_prestamoNuevo['idprestamo'] 	= $o_newPrestamo->getIdPrestamo();
												$a_prestamoNuevo['monto_total']	= (float)$o_newPrestamo->getMontoTotal();
												$a_prestamoNuevo['capital']	= 	(float)$o_newPrestamo->getMontoPrestado();
												$a_prestamoNuevo['monto_interes']	= (float)$o_newPrestamo->getInteresMonto();
												$a_prestamoNuevo['saldo']	= (float)$o_newPrestamo->getSaldoPrestamo();
												$a_prestamoNuevo['interes']	= (float)$o_newPrestamo->getInteresPorcentaje();
												$a_prestamoNuevo['gastos_administrativos']	= (float)$o_newPrestamo->getGastoAdministrativo();
												$a_prestamoNuevo['fecha_prestamo']	= $o_newPrestamo->getFechaInicio();
												$a_prestamoNuevo['fecha_vencimiento']	= $o_newPrestamo->getFechaVencimiento();
												$a_prestamoNuevo['estado']	= $o_newPrestamo->getEstado();
												
												//Nuevo G.A. Cliente si es un cliente nuevo (es su primer prestamo establece un G.A.)
												
												$o_newPrestamoBean = new PrestamoBean();
												$o_newPrestamoBean->setIdCliente($idcliente);
												
												$o_newPrestamoDP = new PrestamoDP($o_newPrestamoBean);
												$a_newPrestamos =$o_newPrestamoDP->select();
												
												if(is_array($a_newPrestamos) && count($a_newPrestamos) == 1){
													$gastos_administrativos_cliente = ($gastos_administrativos/$monto)*100;
													
													if($gastos_administrativos_cliente == 0) $gastos_administrativos_cliente = "0.000";
																										
													$o_ClienteBean = new ClienteBean();
													$o_ClienteBean->setIdCliente($idcliente);
													//$o_ClienteBean->setGastoAdministrativoPorcentaje($gastos_administrativos_cliente);
													
													//$o_ClienteDP = new ClienteDP($o_ClienteBean);
													//$o_ClienteDP->update();
												}
												
												//-------------------------------------------------
											
												$a_resultado['estado'] = "1";
												$a_resultado['mensaje'] = "Exito";
												$a_resultado['nuevo_prestamo'] = $a_prestamoNuevo;
											}
										
									}
								
								}else{
									$a_resultado['estado'] = "2";
									$a_resultado['mensaje'] = "Fallo, no se encontro el usuario";
								}
							}else{
								
							}
						}else{
					    	$a_resultado['estado'] = "1";
							$a_resultado['mensaje'] = "Esta opcion no se permite realizar. Debe de ingresar pedidos.";
							$a_resultado['nuevo_prestamo'] = $a_prestamoNuevo;
						    /*
							$a_resultado['estado'] = "2";
							$a_resultado['mensaje'] = "Fallo, debe de ingresar el usuario";*/
						}
						break;
						
					 case "historial_prestamos":
						$idusuario 						=  $o_datos['idusuario'];
						$idcliente 						=  $o_datos['idcliente'];
						
						/*
						$o_ClienteBean = new ClienteBean();
						$o_ClienteBean->setIdCliente($idcliente);
						
						$o_ClienteDP = new ClienteDP($o_ClienteBean);
						$a_clientes = $o_ClienteDP->select();
						if(is_array($a_clientes)){
							foreach ($a_clientes as $key => $o_cliente){
								$idMercado = $o_cliente->getIdMercado();
								$o_MercadoBean = new MercadoBean();
								$o_MercadoBean->setIdMercado($idMercado);
								$o_MercadoDP = new MercadoDP($o_MercadoBean);
								$a_MercadoDP = $o_MercadoDP->select();
								foreach ($a_MercadoDP as $key => $o_MercadoDP){
									$nombre_mercado		= $o_MercadoDP->getDescripcion();	
								}
								$nombre_completo = $o_cliente->getNombres()." ".$o_cliente->getApellidoPaterno()." ".$o_cliente->getApellidoMaterno();
							}
						}
						$a_cliente[]
						*/
						$o_ObjectBean = new PrestamoBean();				
						if($idcliente){
							$o_ObjectBean->setIdCliente($idcliente); 
						}
						$o_ObjectBean->page 	= 1;
						$o_ObjectBean->tamPag 	= 8;
						
						$o_classDP = new PrestamoDP($o_ObjectBean);
						
						$a_ObjectBean = $o_classDP->select(); 
						if(count($a_ObjectBean)>0){
							$i = 1;
							foreach ($a_ObjectBean as $iKey => $o_objBean){ 	
								if(!$o_objBean->getSemaforo()) $semaforo = "verde";
								else $semaforo = $o_objBean->getSemaforo();
								$a_prestamos[$i]['idprestamo'] = $o_objBean->getIdPrestamo();
								$a_prestamos[$i]['monto_total'] = (float)$o_objBean->getMontoTotal();
								$a_prestamos[$i]['capital'] = (float)$o_objBean->getMontoPrestado();
								$a_prestamos[$i]['estado'] = (string)$o_objBean->getEstado();
								$a_prestamos[$i]['saldo'] = (float)$o_objBean->getSaldoPrestamo();
								$a_prestamos[$i]['interes'] = (float)$o_objBean->getInteresPorcentaje();
								$o_PagoBean = new PagoBean();
								$o_PagoBean->setIdPrestamo($o_objBean->getIdPrestamo());
								$o_PagoBean->setTipo('2');
								$o_PagoDP = new PagoDP($o_PagoBean);
								$MontoPago = '0';
								$a_o_PagoDP = $o_PagoDP->select();
								if(is_array($a_o_PagoDP)){
									foreach ($a_o_PagoDP as $key => $o_PagoDP){
										$MontoPago += $o_PagoDP->getMontoPago();
									}
									
								}
								$a_prestamos[$i]['mora'] = (float)$MontoPago;
								$a_prestamos[$i]['gastos_administrativos'] = (float)$o_objBean->getGastoAdministrativo();
								$a_prestamos[$i]['fecha_prestamo'] 		= (String)$o_objBean->getFechaInicio();
								$a_prestamos[$i]['semaforo'] 			= (String)$o_objBean->getSemaforo();;
								$a_prestamos[$i]['fecha_vencimiento'] 	= $o_objBean->getFechaVencimiento();
								$a_prestamos[$i]['calificacion_u_pago'] = (String)$o_objBean->getDescripcionUP();
								$a_prestamos[$i]['calificacion_pago'] 	= (String)$o_objBean->getColorUP();
								$i++;
							}
							$a_resultado['estado'] = "1";
							$a_resultado['mensaje'] = "Exito";
							$a_resultado['prestamos'] = $a_prestamos;
						}
						
						
						break;	 	 
					
					case "registrar_presencia":
						$idusuario 						=  $o_datos['usuario'];
						$idcliente 						=  $o_datos['idcliente'];
						$idprestamo 					=  $o_datos['idprestamo'];
						$ubicacion_registro_latitud		=  $o_datos['ubicacion_registro_latitud'];
						$ubicacion_registro_longitud	=  $o_datos['ubicacion_registro_longitud'];
						$huella							=  $o_datos['huella'];
						
						$fechatransaccion 	= fechaDiaAbierto($idusuario);
						
						$o_ObjectBean = new PagoBean();
						$o_ObjectBean->setIdPrestamo($idprestamo);
						$o_ObjectBean->setFechaPago($fechatransaccion);
						$o_ObjectBean->setFechaFinal($fechatransaccion);
						
						$o_ObjectDP = new PagoDP($o_ObjectBean);
						$a_o_ObjectDP = $o_ObjectDP->select();
						
						if(is_array($a_o_ObjectDP) && count($a_o_ObjectDP)){
							$j=1;
							foreach ($a_o_ObjectDP as $key => $o_ObjectDP) {
						
								if($o_ObjectDP->getMontoPago() == 0){
									
									$o_PrestamoPresenciaBean = new PrestamoPresenciaBean();					
									$o_PrestamoPresenciaBean->setFecha($fechatransaccion);
									$o_PrestamoPresenciaBean->setIdCliente($idcliente);
									$o_PrestamoPresenciaBean->setIdPrestamo($idprestamo);		
									$o_PrestamoPresenciaDP = new PrestamoPresenciaDP($o_PrestamoPresenciaBean);
									$a_o_PrestamoPresencia = $o_PrestamoPresenciaDP->select();
										
									if(!is_array($a_o_PrestamoPresencia)){
										$o_PrestamoPresenciaBean = new PrestamoPresenciaBean();					
										$o_PrestamoPresenciaBean->setFecha($fechatransaccion);
										$o_PrestamoPresenciaBean->setFechaCreacion(date('Y-m-d H:i:s'));
										$o_PrestamoPresenciaBean->setUsuarioCreacion($idusuario);
										$o_PrestamoPresenciaBean->setIdCliente($idcliente);
										$o_PrestamoPresenciaBean->setIdPrestamo($idprestamo);
										$o_PrestamoPresenciaBean->setRegistroLatitud($ubicacion_registro_latitud);
										$o_PrestamoPresenciaBean->setRegistroLongitud($ubicacion_registro_longitud);
										$o_PrestamoPresenciaDP = new PrestamoPresenciaDP($o_PrestamoPresenciaBean);
										$o_PrestamoPresenciaDP->save();
										
										$a_resultado['estado'] = "1";
										$a_resultado['mensaje'] = "Exito";
									}else{
										$a_resultado['estado'] 		= "0";
										$a_resultado['mensaje'] 	= "Ya tiene un pago o presencia registrado para el prestamo ".$idprestamo;
									}
								}else{
									$a_resultado['estado'] 		= "0";
									$a_resultado['mensaje'] 	= "Ya tiene un pago mayor a cero o presencia registrado para el prestamo ".$idprestamo;
								}
							}
						}else{
							$a_resultado['estado'] 		= "0";
							$a_resultado['mensaje'] 	= "No puede ingresar presencia a este prestamo ".$idprestamo." porque no hay pago registrado";
						}
						break;	 	
					 case "consulta_deudores" 	:
						
						$ruta = "/images/uploadFiles/";
						$idusuario 		=  $o_datos['idusuario'];
						$dni 			=  $o_datos['dni'];
						
										 
						$o_user 		= new user_class();
						if ($o_user->findUser($idusuario)){	
							
							
							
							$o_ObjectBean = new ClienteBean();
											
								
							
							if($idusuario){
								
								$o_ObjectBean->tamPag 	= 1;
												
								$o_ObjectBean->setDni($dni);
															
								$o_class 					= new ClienteDP($o_ObjectBean);
								$a_ObjectBean 				= $o_class->select();
														
								
								if(count($a_ObjectBean)>0){

									foreach ($a_ObjectBean as $iKey => $o_objBean){
										$a_datos["IdCliente"] 		= $o_objBean->getIdCliente();
										$codigo_cliente 			= $a_datos["IdCliente"];
										
										// Foto de Negocio
										$i_IdTipoFile = "8";
										$s_Destino_Negocio = getClienteFile($codigo_cliente,$i_IdTipoFile,$url_base.$ruta);
											
										 // Foto de Domicilio
										$i_IdTipoFile = "6";
										$s_Destino_Domicilio = getClienteFile($codigo_cliente,$i_IdTipoFile,$url_base.$ruta);
										
										
										$a_datos["NombreCompleto"] 	= (string)ucwords(utf8_encode(mb_strtolower ($o_objBean->getNombreCompleto())));
										$a_datos["Dni"] 			= (string)$o_objBean->getDni();
										$a_datos["Telefono"] 		= (string)$o_objBean->getTelefono();
										$a_datos["Celular"] 		= (string)$o_objBean->getCelular();
										$a_datos["ruta_foto_negocio"]	= (string)$s_Destino_Negocio;
										$a_datos["ruta_foto_domicilio"]	= (string)$s_Destino_Domicilio;
										$a_datos["ubicacion_domicilio_longitud"] = (string)$o_objBean->getLongitudDomicilio();
										$a_datos["ubicacion_domicilio_latitud"] = (string)$o_objBean->getLatitudDomicilio();
										
										$a_datos["ubicacion_negocio_longitud"] = (string)$o_objBean->getLongitudNegocio();
										$a_datos["ubicacion_negocio_latitud"] = (string)$o_objBean->getLatitudNegocio();
										
										$a_loadPrestamoDeudor		= loadPrestamoDeudor($o_objBean->getIdCliente());
										$a_datos["Tipo"] 			= $a_loadPrestamoDeudor['Tipo'];
										$a_datos["SaldoDeuda"] 		= $a_loadPrestamoDeudor['SaldoPrestamo'];
										$a_datos["FechaInicio"] 	= $a_loadPrestamoDeudor['FechaInicio'];
										$a_datos["FechaVencimiento"]= $a_loadPrestamoDeudor['FechaVencimiento'];
										$a_datos["Interes"] 		= $a_loadPrestamoDeudor['InteresPorcentaje'];
										$a_datos["Mora"] 			= $a_loadPrestamoDeudor['Mora'];
										
										
										
										
									}
									$a_resultado['datos'] 		= $a_datos;
									$a_resultado['estado'] = "1";
									$a_resultado['mensaje'] = "Exito";
								}else{
									
									$a_datos["IdCliente"] 		= "";
									$a_datos["NombreCompleto"] 	= "";
									$a_datos["Dni"] 			= "";
									$a_datos["Telefono"] 		= "";
									$a_datos["Celular"] 		= "";
									$a_datos["ruta_foto_negocio"]	= "";
									$a_datos["ruta_foto_domicilio"]	= "";
									$a_datos["ubicacion_domicilio_longitud"] = "";
									$a_datos["ubicacion_domicilio_latitud"] = "";
									$a_datos["ubicacion_negocio_longitud"] = "";
									$a_datos["ubicacion_negocio_latitud"] = "";
									$a_datos["Tipo"] 			= "No es cliente de sinergia";
									$a_datos["SaldoDeuda"] 		= "";
									$a_datos["FechaInicio"] 	= "";
									$a_datos["FechaVencimiento"]= "";
									$a_datos["Interes"] 		= "";
									$a_datos["Mora"] 			= "";
									
									$a_resultado['datos'] 		= $a_datos;
									$a_resultado['estado'] = "1";
									$a_resultado['mensaje'] = "Exito";
								}
								
							}
							
						}else{
							$a_resultado['estado'] 		= "0";
							$a_resultado['mensaje'] 	= "Usuario no permitido".$idusuario;	
						}
						
							
						
						break; 
					 case "clientes":
						
						$ruta = "/images/uploadFiles/";
						$idusuario 						=  $o_datos['idusuario'];
						
						$idsucursal 					=  $o_datos['idsucursal'];
						$idmercado	 					=  $o_datos['idmercado'];
						
						
						$codigo_cliente 				=  $o_datos['idcliente'];
						$apellido_paterno 				=  $o_datos['apellido_paterno'];
						
						
						 
						$o_user 		= new user_class();
						if ($o_user->findUser($idusuario)){	
							
							/*
							// Foto de Negocio
							 $i_IdTipoFile = "8";
							
							 $o_ObjectFN_TN = new Cr_cliente_fileFN();
							 $o_ObjectFN_TN->setIdCliente($codigo_cliente);
							 $o_ObjectFN_TN->setEliminado( -1 );
							 $o_ObjectFN_TN->setIdtipofile($i_IdTipoFile);
							 $o_ObjectFN_TN->addOrderBy(Cr_cliente_fileFN::IdClienteFile ,false);
							 $o_ObjectBN_TN = $o_ObjectFN_TN->select( 0, 1);
							 
							 if( is_array($o_ObjectBN_TN))
							{
								$s_NombreFile = $o_ObjectBN_TN[0]->getNombreFile();
								$s_Destino_Negocio = $url_base.$ruta.$s_NombreFile;
							}
							
													
							 // Foto de Domicilio
							 $i_IdTipoFile = "6";
							
							 $o_ObjectFN_TC = new Cr_cliente_fileFN();
							 $o_ObjectFN_TC->setIdCliente($codigo_cliente);
							 $o_ObjectFN_TC->setEliminado( -1 );
							 $o_ObjectFN_TC->setIdtipofile($i_IdTipoFile);
							 $o_ObjectFN_TC->addOrderBy(Cr_cliente_fileFN::IdClienteFile ,false);
							 $o_ObjectBN_TC = $o_ObjectFN_TC->select( 0, 1);
							 
							 if( is_array($o_ObjectBN_TC) )
							{
								$s_NombreFile = $o_ObjectBN_TC[0]->getNombreFile();
								$s_Destino_Domicilio = $url_base.$ruta.$s_NombreFile;
							}
							 */						
							
							 
							$o_ObjectBean = new ClienteBean();
							
							
							
								
							
							if($idusuario){
								sucursalMercado($o_user);
								$a_SucursalMercado 			= sucursalMercado($o_user);
								/*
								echo "<pre>";
								
								print_r($a_SucursalMercado);
								echo "</pre>";
								*/
								
								
								if(($o_user->getUserRoleId() == "sys.sup" || $o_user->getUserRoleId() == "sys.res" ) && !$idmercado){
									if($codigo_cliente !="" || $apellido_paterno !="")		{ 
										$o_ObjectBean->setIdCliente($codigo_cliente); 
										$o_ObjectBean->setApellidoPaterno($apellido_paterno);
									}
								}
								
								$a_resultado["idmercado"] 	= (string)$a_SucursalMercado["idmercado"];
								//$a_resultado["idsmercados"]	= $a_SucursalMercado["idsmercados"];
								$a_resultado["idsucursal"] 	= (string)$a_SucursalMercado["idsucursal"];	 						
								
								
								
								$o_ObjectBean->tamPag 	= 20;
								
								if($codigo_cliente !="")		{ $o_ObjectBean->setIdCliente($codigo_cliente); }
								if($apellido_paterno !="")		{ $o_ObjectBean->setNombreCompletoLike($apellido_paterno); }
													
								$o_ObjectBean->setFiltroMercado($a_SucursalMercado["idsmercados"]);
								
								if($o_user->getUserRoleId() == "sys.ope"){
									$o_ObjectBean->setIdMercado($a_SucursalMercado["idmercado"]);
								}else{
									$o_ObjectBean->setIdMercado($idmercado);
								}
								
								
								
								
								$o_class 					= new ClienteDP($o_ObjectBean);
								$a_ObjectBean 				= $o_class->select();
								
								/*
								echo "<pre>";
								print_r($a_ObjectBean);
								echo "</pre>";
								*/
								if(count($a_ObjectBean)>0){
									$i = 1;
									foreach ($a_ObjectBean as $iKey => $o_objBean){
										
										// Foto de Negocio
										$i_IdTipoFile = "8";
										$s_Destino_Negocio = getClienteFile($o_objBean->getIdCliente(),$i_IdTipoFile,$url_base.$ruta);
											
										// Foto de Domicilio
										$i_IdTipoFile = "6";
										$s_Destino_Domicilio = getClienteFile($o_objBean->getIdCliente(),$i_IdTipoFile,$url_base.$ruta);
										
										$a_datos[$i]["IdCliente"] 		= $o_objBean->getIdCliente();
										$a_datos[$i]["NombreCompleto"] 	= (string)$o_objBean->getNombreCompleto();
										$a_datos[$i]["Sexo"] 			= (string)$o_objBean->getSexo();
										$a_datos[$i]["Dni"] 			= (string)$o_objBean->getDni();
										$a_datos[$i]["EstadoCivil"] 	= (string)$o_objBean->getEstadoCivil();
										$a_datos[$i]["IdMercado"] 		= $o_objBean->getIdMercado();
										$a_datos[$i]["Telefono"] 		= (string)$o_objBean->getCelular();
										$a_datos[$i]["Celular"] 		= (string)$o_objBean->getTelefono();
										$a_datos[$i]["gasto_administrativo"] = (float)$o_objBean->getGastoAdministrativoPorcentaje();
										$a_datos[$i]["flag_huella_con_problema"] = (string)$o_objBean->getFlagHuellaConProblema();
										
										$a_datos[$i]["ruta_foto_negocio"]	= (string)$s_Destino_Negocio;
										$a_datos[$i]["ruta_foto_domicilio"]	= (string)$s_Destino_Domicilio;
										
										$a_datos[$i]["ubicacion_domicilio_longitud"] = (string)$o_objBean->getLongitudDomicilio();
										$a_datos[$i]["ubicacion_domicilio_latitud"] = (string)$o_objBean->getLatitudDomicilio();
										
										$a_datos[$i]["ubicacion_negocio_longitud"] = (string)$o_objBean->getLongitudNegocio();
										$a_datos[$i]["ubicacion_negocio_latitud"] = (string)$o_objBean->getLatitudNegocio();
										
										$a_datos[$i]["huella"] 					= (string)$o_objBean->getFlagConHuella();
										
										
										$i++;
									}
									$a_resultado['datos'] 		= $a_datos;
									$a_resultado['estado'] = "1";
									$a_resultado['mensaje'] = "Exito";
								}else{
									$a_resultado['datos'] 		= "0";
									$a_resultado['estado'] = "40";
									$a_resultado['mensaje'] = "No hay clientes que mostrar";
								}
								
							}else{
								$a_resultado['estado'] 		= "0";
								$a_resultado['mensaje'] 	= "La huella digital no corresponde al usuario ".$idusuario;	
							}
							
						}else{
							$a_resultado['estado'] = "4";
							$a_resultado['mensaje'] = "No existe el usuario";
						}
					break;
					case "pedido":
						$idusuario 						=  $o_datos['idusuario'];
						$idcliente 						=  $o_datos['idcliente'];
						$idprestamo 					=  $o_datos['idprestamo'];
						$monto			 				=  $o_datos['monto'];
						$interes	 					=  $o_datos['interes'];
						$mora		 					=  $o_datos['mora'];
						
						$fecha_pedido	 				=  $o_datos['fecha_pedido'];
						
						$periodo	 					=  $o_datos['periodo'];
						$duracion	 					=  $o_datos['duracion'];
						$hora		 					=  $o_datos['hora'];
						$observacion 					=  $o_datos['comentario'];
						$telefono_contacto				=  $o_datos['telefono_contacto'];
						$hora_atencion	 				=  $o_datos['hora_atencion'];
						
						
						$gastos_administrativos	 		=  $o_datos['gastos_administrativos'];
						$ubicacion_registro_latitud		=  $o_datos['ubicacion_registro_latitud'];
						$ubicacion_registro_longitud	=  $o_datos['ubicacion_registro_longitud'];
						
						
					    $o_ClienteBean = new ClienteBean();
                        $o_ClienteBean->setIdCliente($idcliente);
                        $o_class = new ClienteDP($o_ClienteBean);
                        $a_ObjectBean = $o_class->select();
                        //print_r($a_ObjectBean);
                        if( is_array($a_ObjectBean) )
                        {
                           while( list( $key, $o_ObjectBean ) = each( $a_ObjectBean ) )
                          {
                                $IdMercado = $o_ObjectBean->getIdMercado();
                                $Nombre = $o_ObjectBean->getNombreCompleto();
                                $Telefono = $o_ObjectBean->getTelefono();
                                $Celular = $o_ObjectBean->getCelular();
                                $InteresPorcentaje = $o_ObjectBean->getInteresPorcentaje();
                                $GastoAdministrativoPorcentaje = $o_ObjectBean->getGastoAdministrativoPorcentaje();
                               
                          }
                          if($InteresPorcentaje <= $interes){
    						    $o_user 		= new user_class();
        						if ($o_user->findUser($idusuario)){
        							
        							$fechaDiaAbierto = fechaDiaAbierto($idusuario);
        							
        							if($fecha_pedido && $fecha_pedido < $fechaDiaAbierto){
        								
        								$a_resultado['estado'] = "100";
        								$a_resultado['mensaje'] = "La Fecha ".$fecha_pedido." de Pedido fuera de rango de fecha  dia abierto ".$fechaDiaAbierto;
        								
        							}else{
        								if($fecha_pedido){
        								    
        									if(existePedido($fecha_pedido,$idcliente)){
        										$a_resultado['estado'] = "101";
        										$a_resultado['mensaje'] = "Ya se registro el pedido para esta fecha";
        										
        									}else{
        												
        								
        										$a_SucursalMercado 	= sucursalMercado($o_user);
        							
        										$fecha			 	= fechaDiaAbierto($idusuario);
        										$idColaboradorP 	= getColaboradorxCliente($idcliente);
        										
        										$o_ClienteBean = new ClienteBean();
        										$o_ClienteBean->setIdCliente($idcliente);
        										
        										$o_ClienteDP = new ClienteDP($o_ClienteBean);
        										$a_clientes = $o_ClienteDP->select();
        										if(is_array($a_clientes)){
        											foreach ($a_clientes as $key => $o_cliente){
        												$idMercado = $o_cliente->getIdMercado();
        											}
        										}
        										
        										
        										//$dia = date('w',strtotime($fecha));
        										//if($dia  == '6') $FechaTransaccion = date('Y-m-d', strtotime($fecha ." +2 days"));
        										//else  $FechaTransaccion = date('Y-m-d', strtotime($fecha ." +1 days"));
        										
        										
        										$o_Cr_pedido_prestamoDP = new Cr_pedido_prestamoDP();
        										$o_Cr_pedido_prestamoDP->setIdCliente( ( int ) $idcliente );
        										
        										$o_Cr_pedido_prestamoDP->setIidMercado( ( int ) $idMercado );
        										
        										$o_Cr_pedido_prestamoDP->setIdColaborador( (int) $idColaboradorP );
        										
        										$o_Cr_pedido_prestamoDP->setMonto( floatval( $monto ) );
        										$o_Cr_pedido_prestamoDP->setTelefonoContacto( $TelefonoContacto );
        										$o_Cr_pedido_prestamoDP->setInteresPorcentaje( ( float ) $interes );
        										$o_Cr_pedido_prestamoDP->setDuracion	( ( int ) $duracion );
        										$o_Cr_pedido_prestamoDP->setPeridiocidadPago( $periodo );
        										$o_Cr_pedido_prestamoDP->setTelefonoContacto( $telefono_contacto );
        										$o_Cr_pedido_prestamoDP->setHoraAtencion	( $hora_atencion );
        										$o_Cr_pedido_prestamoDP->setGastoAdministrativo((float)$gastos_administrativos);
        										$o_Cr_pedido_prestamoDP->setEliminado( -1 );
        										$o_Cr_pedido_prestamoDP->setObservacion( $observacion,false );
        									
        										
        										//SAVE
        										$o_Cr_pedido_prestamoDP->setFechaTransaccion( $fecha_pedido );
        										//$o_Cr_pedido_prestamoDP->setFechaEntrega( $fecha_pedido );
        										$o_Cr_pedido_prestamoDP->setEstado( "P" );
        										$i_IdPedido = Cr_pedido_prestamoDP::getNextId();
        										$o_Cr_pedido_prestamoDP->setIdpedido( ( int ) $i_IdPedido );
        										$o_Cr_pedido_prestamoDP->setFechaCreacion( date( "Y-m-d H:i:s" ) );
        										$o_Cr_pedido_prestamoDP->setUsuarioCreacion( $idusuario );
        										$o_Cr_pedido_prestamoDP->setRegistroLongitud( (string)$ubicacion_registro_longitud );
        										$o_Cr_pedido_prestamoDP->setRegistroLatitud( (string)$ubicacion_registro_latitud );
        										$b_Result = $o_Cr_pedido_prestamoDP->save();
        										
        										if($b_Result){
        											
        											$o_Cr_pedido_prestamoFN = new Cr_pedido_prestamoFN();
        											$o_Cr_pedido_prestamoBN = $o_Cr_pedido_prestamoFN->selectByPK($i_IdPedido);
        											
        											$a_pedidoNuevo['idpedido'] 	= $o_Cr_pedido_prestamoBN->getIdpedido();
        											$a_pedidoNuevo['capital'] 	= $o_Cr_pedido_prestamoBN->getMonto();
        											$a_pedidoNuevo['interes'] 	= $o_Cr_pedido_prestamoBN->getInteresPorcentaje();
        											$a_pedidoNuevo['estado'] 	= $o_Cr_pedido_prestamoBN->getEstado();
        											
        											if($TelefonoContacto != $Celular){
                                                		//Actualizar en llamadas cliente-telefono
                                                		$CrClienteTelefonoDP = new CrClienteTelefonoDP();
                                                		$CrClienteTelefonoDP->setIdCliente(( int ) $i_IdClie );
                                                		$CrClienteTelefonoDP->setIdOperador( 1 );
                                                		$CrClienteTelefonoDP->setPertenece("CLIENTE");
                                                		$CrClienteTelefonoDP->setIdTipoTelefono( 1 );
                                                		$CrClienteTelefonoDP->setNombreOperador("-");
                                                		$CrClienteTelefonoDP->setNumero( $TelefonoContacto);
                                                		$CrClienteTelefonoDP->setFechaRegistro(date( "Y-m-d H:i:s" ));
                                                		$CrClienteTelefonoDP->setUsuarioRegistro($idusuario);
                                                		$CrClienteTelefonoDP->save();
                                               		}
        														
        											$a_resultado['estado'] = "1";
        											$a_resultado['mensaje'] = "Exito";
        											$a_resultado['nuevo_prestamo'] = $a_pedidoNuevo;
        											
        										}else{
        											$a_resultado['estado'] = "2";
        											$a_resultado['mensaje'] = "No se registro el pedido";
        										}
        									}
        								}else{
        									$a_resultado['estado'] = "2";
        									$a_resultado['mensaje'] = "No hay fecha para registrar el pedido";
        								}
        							}
        							
        						}else{
        							$a_resultado['estado'] = "4";
        							$a_resultado['mensaje'] = "No existe el usuario";
        						}
    						}else{
    					    	$a_resultado['estado'] = "40";
    							$a_resultado['mensaje'] = "El Interes ".$interes." es menor ".$InteresPorcentaje;
    						}
                        }else{
                            $a_resultado['estado'] = "300";
    						$a_resultado['mensaje'] = "No existe cliente";  
                        }
						
						
						
						
						
						
						
					break;
					case "registrar_cliente":
						
						
						$idusuario 						= $o_datos['idusuario'];
						$tipo_documento 				= $o_datos['tipo_documento'];
						$sexo 							= $o_datos['sexo'];
						
						$idmercado 						= $o_datos['idmercado'];
						
						$nombres 						= unicodeToutf8($o_datos['nombres']);
						$apellido_paterno 				= unicodeToutf8($o_datos['apellido_paterno']);
						$apellido_materno 				= unicodeToutf8($o_datos['apellido_materno']);
						$fecha_nacimiento				= $o_datos['fecha_nacimiento'];
						$dni			 				= $o_datos['dni'];
						$estado_civil			 		= $o_datos['estado_civil'];
						$direccion		 				= unicodeToutf8($o_datos['direccion']);
						$direccion_domicilio		 	= unicodeToutf8($o_datos['direccion_domicilio']);
						$telefono		 				= $o_datos['telefono'];
						$celular		 				= $o_datos['celular'];
						$huella		 					= $o_datos['huella'];
						$tipo_negocio 					= $o_datos['tipo_negocio'];
						$correo      					= $o_datos['correo'];
						$otrotipo_negocio 				= $o_datos['otrotipo_negocio'];
						$direccion_negocio 				= $o_datos['direccion_negocio'];
						$referencia_direccion_negocio	= $o_datos['referencia_direccion_negocio'];
						$direccion_real 				= $o_datos['direccion_real'];
						$referencia_direccion 				= $o_datos['referencia_direccion'];
						
						/*
						if($tipo_documento == "DNI"){
					    	$nombres 						= unicodeToutf8($o_datos['nombres_reniec']);
    						$apellido_paterno 				= unicodeToutf8($o_datos['apellido_paterno_reniec']);
    						$apellido_materno 				= unicodeToutf8($o_datos['apellido_materno_reniec']);
    						$fecha_nacimiento				= $o_datos['fecha_nacimiento_reniec'];
    						$sexo			 				= $o_datos['sexo_reniec'];
    						$estado_civil			 		= $o_datos['estado_civil_reniec'];
    						$direccion_domicilio		 				= unicodeToutf8($o_datos['direccion_reniec']);
    						
						}
						*/
						$ubicacion_registro_latitud 	= $o_datos['ubicacion_registro_latitud'];
						$ubicacion_registro_longitud 	= $o_datos['ubicacion_registro_longitud'];
						
						$o_user = new user_class();
						if ($o_user->findUser($idusuario)){	
							if(!$idmercado){
								
								$a_SucursalMercado 			= sucursalMercado($o_user);
								$idmercado 	= $a_SucursalMercado["idmercado"];
							}
							
							$o_ClienteBeanT = new ClienteBean();
							$o_ClienteBeanT->setDni($dni);
							$o_ClienteBeanDPT = new ClienteDP($o_ClienteBeanT);
							$a_o_ClienteBeanDPT = $o_ClienteBeanDPT->select();

							if(!is_array($a_o_ClienteBeanDPT)){
							
							    $o_CrBusquedaFN = new CrBusquedaFN();
		
                        		$o_CrBusquedaFN->setTipobusqueda("RENIEC");
                        		$o_CrBusquedaFN->setDocumento($dni);
                        		$o_CrBusquedaFN->setEstado("P");
                        		$a_o_CrBusquedaFN = $o_CrBusquedaFN->select();
                        		
                        		if(is_array($a_o_CrBusquedaFN) && count($a_o_CrBusquedaFN)){
                        			$o_CrBusquedaBN = $a_o_CrBusquedaFN[0];
                        			$idbusqueda = $o_CrBusquedaBN->getIdbusqueda();
                        		}
							   
								$o_ClienteBean = new ClienteBean();
								
								$o_ClienteBean->setIdMercado($idmercado);
								$o_ClienteBean->setIdTipoNegocio($tipo_negocio);
								$o_ClienteBean->setDni($dni);
								$o_ClienteBean->setJsonReniec($idbusqueda);
								$o_ClienteBean->setCelular($celular);
								$o_ClienteBean->setNombres($nombres);
								$o_ClienteBean->setApellidoPaterno($apellido_paterno);
								$o_ClienteBean->setApellidoMaterno($apellido_materno);
								$nombrecompleto = $apellido_paterno." ".$apellido_materno.", ".$nombres;
								$o_ClienteBean->setNombreCompleto($nombrecompleto);
								$o_ClienteBean->setTelefono($telefono);
								$o_ClienteBean->setDireccionNegocio($direccion_negocio);
								$o_ClienteBean->setDireccion($direccion_domicilio);
								$o_ClienteBean->setDireccionViviendaReal($direccion_real);
                        		$o_ClienteBean->setReferenciaViviendaReal($referencia_direccion);
                        		$o_ClienteBean->setReferenciaNegocio($referencia_direccion_negocio);
								
								$o_ClienteBean->setLongitudNegocio($ubicacion_registro_longitud);
								$o_ClienteBean->setLatitudNegocio($ubicacion_registro_latitud);
								
								$o_ClienteBean->setFechaNacimiento($fecha_nacimiento);
								$o_ClienteBean->setFechaCaducidadDoc($fecha_caducidad);
								
								$o_ClienteBean->setSexo($sexo); 
								$o_ClienteBean->setEstadoCivil($estado_civil);
								$o_ClienteBean->setEstado("A");   
								$o_ClienteBean->setCorreo($correo);
								$o_ClienteBean->setFechaCreacion(date("Y-m-d H:i:s"));
								$o_ClienteBean->setOtroTipoNegocio($otrotipo_negocio);
								$o_ClienteBean->setUsuarioCreacion($idusuario);
								$o_ClienteBean->setFlagConHuella('S');
								$o_ClienteSystemClass = new ClienteSystemClass($o_ClienteBean);
										  
								
								
								$bResult = $o_ClienteSystemClass->insertCliente($chek_documento);
								
								if($bResult && $idbusqueda){
                            		$o_CrBusquedaDP = new CrBusquedaDP();
                            		$o_CrBusquedaDP->setIdBusqueda($idbusqueda);
                            		$o_CrBusquedaDP->setEstado("E"); //Ejecutado
                            		$o_CrBusquedaDP->setIdcliente($bResult); 
                            	    $o_CrBusquedaDP->update();
                            	}
								if($bResult){
									//Registrar Huella
									registrarHuella($bResult,$idusuario);
									//--------------------------
									$a_resultado['estado'] = "1";
									$a_resultado['mensaje'] = "Exito";
									$a_resultado['idcliente'] = $bResult;
								 }else{
									$a_resultado['estado'] 		= "0";
									$a_resultado['mensaje'] 	= "La huella digital no corresponde al usuario ".$idusuario;		
								 }
							}else{
								$a_resultado['estado'] = "40";
								$a_resultado['mensaje'] = "Ya esta registrado este DNI";
							}	
						}else{
							$a_resultado['estado'] = "40";
							$a_resultado['mensaje'] = "No existe el usuario";
						}					
					break;
					
					case "cierre_caja":
						
						$idusuario 				= $o_datos['idusuario'];
						$idmercado 				= $o_datos['idmercado'];
						
						$o_user 		= new user_class();
						if ($o_user->findUser($idusuario)){
							
							if( ($o_user->getUserRoleId() == "sys.sup" || $o_user->getUserRoleId() == "sys.res" ) && !$idmercado){
								$a_resultado['estado'] = "0";
								$a_resultado['mensaje'] = "Seleccione un mercado";
								$a_respuesta["resultado"] = $a_resultado;
							}else{
						
								$a_SucursalMercado 	= sucursalMercado($o_user);
								
								$a_idColaborador 	= $a_SucursalMercado["idcolaboradores"];	
								$a_idsmercados 		= $a_SucursalMercado["idsmercados"];	
								
								
								if($idmercado){
									$o_MercadoRepresentante = new MercadoRepresentanteBean();
									$o_MercadoRepresentante->setIdMercado($idmercado);
									$o_MercadoRepresentanteBL = new MercadoRepresentanteBL();
									$a_o_repmer = $o_MercadoRepresentanteBL->busquedaMercadoRepresentanteDetalle($o_MercadoRepresentante);
									
									
									
									foreach ($a_o_repmer as $key => $o_repmer){
										
										$o_ColaboradorBean = new ColaboradorBean();
										$o_ColaboradorBean->setIdColaborador($o_repmer->getIdColaborador());
										$o_ColabradorDP = new ColaboradorDP($o_ColaboradorBean);
										$a_o_ColabradorDP = $o_ColabradorDP->select();
										
										foreach ($a_o_ColabradorDP as $key => $o_ColabradorDP){
									
											
											$idColaborador 		= $o_ColabradorDP->getIdColaborador();
											$Asesor 			= $o_ColabradorDP->getNombres()." ".$o_ColabradorDP->getApellidoPaterno()." ".$o_ColabradorDP->getApellidoMaterno();
									
										}
									}
								}else{
									
									$o_MercadoRepresentante = new MercadoRepresentanteBean();
									$o_MercadoRepresentante->setIdColaborador($o_user->getIdColaborador());
									$o_MercadoRepresentanteBL = new MercadoRepresentanteBL();
									$a_o_repmer = $o_MercadoRepresentanteBL->busquedaMercadoRepresentanteDetalle($o_MercadoRepresentante);
									foreach ($a_o_repmer as $key => $o_repmer){
										$idmercado = $o_repmer->getIdMercado();
										
									}
								
									$o_ColaboradorBean = new ColaboradorBean();
									$o_ColaboradorBean->setIdColaboradores($a_idColaborador);
									$o_ColabradorDP = new ColaboradorDP($o_ColaboradorBean);
									
									$sumaGasto = $o_ColaboradorBean->getPagoRpm();
									
									$a_o_ColabradorDP = $o_ColabradorDP->select();
									foreach ($a_o_ColabradorDP as $key => $o_ColabradorDP){
									
										$idColaborador 		= $o_ColabradorDP->getIdColaborador();
										$Asesor 			= $o_ColabradorDP->getNombres()." ".$o_ColabradorDP->getApellidoPaterno()." ".$o_ColabradorDP->getApellidoMaterno();
									}
								}
								
								//print_r($a_idColaborador);
								
								
								$fechaDiaAbierto = fechaDiaAbierto($idusuario);
								
								//echo $fechaDiaAbierto;
								
								$o_crMercadoBean = new MercadoBean();
								$o_crMercadoBean->setIdMercado($idmercado);
								$o_crMercadoBean->setIdMercados($a_idsmercados);
								
								$o_MercadoDP = new MercadoDP($o_crMercadoBean);
								$a_o_MercadoDP = $o_MercadoDP->select();
								
								if(is_array($a_o_MercadoDP) && count($a_o_MercadoDP)){
									$o_crMercadoBN 	= $a_o_MercadoDP[0];
									$nombreMercado 	= $o_crMercadoBN->getDescripcion();
								}
								
								
								
								//Sumar el capital inicial
								
								$o_ObjectBean = new CapitalInicialBean();
								$o_ObjectBean->setFecha($fechaDiaAbierto);
								$o_ObjectBean->setIdColaborador($idColaborador);
								$o_ObjectBean->tamPag = 10;
								
								$o_class = new CapitalInicialBL();
								$a_ObjectBean = $o_class->busquedaCapitalInicial($o_ObjectBean);
								$sumaCapitalIncial = 0;
								if(count($a_ObjectBean)>0){
									foreach ($a_ObjectBean as $iKey => $o_objBean){
										$sumaCapitalIncial += $o_objBean->getMonto();
									}
								}
								
								//Detalle y suma de los prestamos registrados por el colaborador
								$o_ObjectBean = new PrestamoBean();
								$o_ObjectBean->setFechaInicio($fechaDiaAbierto);
								$o_ObjectBean->setFechaFinal($fechaDiaAbierto);
								$o_ObjectBean->setIdColaboradorPrestamo($idColaborador);
								$o_ObjectBean->setEstado('P');
								$o_ObjectBean->tamPag = 9999;		 			
								$o_ObjectDP = new PrestamoDP($o_ObjectBean);
								$a_o_ObjectDP = $o_ObjectDP->select();
								
								//echo "count".count($a_o_ObjectDP);
								
								if(is_array($a_o_ObjectDP) && count($a_o_ObjectDP)){
									$j=1;
									foreach ($a_o_ObjectDP as $key => $o_ObjectDP) {
										$idCliente = $o_ObjectDP->getIdCliente();
										$o_ClienteBean = new ClienteBean();
										$o_ClienteBean->setIdCliente($idCliente);
										$o_clieneteDP = new ClienteDP($o_ClienteBean);
										$a_cliente = $o_clieneteDP->selectByPk();
										$o_cliente = $a_cliente[0];
										$nombrecompleto = $o_cliente->getNombreCompleto();
										$a_transacciones[$j]['tipo_transaccion'] = "Prestamo";
										
										if($o_ObjectDP->getOrigen()=="F"){
											if($o_ObjectDP->getMontoExtra() > 0 ){
												$a_transacciones[$j]['tipo_transaccion'] .="-renovacion";
												$sumaMontoPrestado += $o_ObjectDP->getMontoExtra();
											}else{
												$a_transacciones[$j]['tipo_transaccion'] .="-refinanciacion";
											}
										}else{
											$sumaMontoPrestado += $o_ObjectDP->getMontoPrestado();
										}
										$a_transacciones[$j]['idcliente'] 		= (string)$idCliente;
										$a_transacciones[$j]['nombrecompleto'] 		= (string)$nombrecompleto;
										$a_transacciones[$j]['gastoadministrativo'] = (float)$o_ObjectDP->getGastoAdministrativo();
										
										$a_transacciones[$j]['monto'] 				= (float)$o_ObjectDP->getMontoPrestado();
										$a_transacciones[$j]['hora_registro'] 		= (string)$o_ObjectDP->getFechaCreacion();
										
										$sumaMontoGA 								+= $o_ObjectDP->getGastoAdministrativo();
										$j++;
									}
								}
								
								//Detalle y Suma de Pagos
								
								$o_ObjectBean = new PagoBean();
								$o_ObjectBean->setFechaPago($fechaDiaAbierto);
								$o_ObjectBean->setFechaFinal($fechaDiaAbierto);
								$o_ObjectBean->setIdColaborador($idColaborador);
								$o_ObjectBean->tamPag = 9999;		 			
								
								$o_ObjectDP = new PagoDP($o_ObjectBean);
								$a_o_ObjectDP = $o_ObjectDP->select();
								
																
								if(is_array($a_o_ObjectDP) && count($a_o_ObjectDP)){
									$i = $j;
									foreach ($a_o_ObjectDP as $key => $o_ObjectDP) {
										if($o_ObjectDP->getMontoPago() > 0){
											
											$idprestamo = $o_ObjectDP->getIdPrestamo();
											$o_PrestamoBean = new PrestamoBean();
											$o_PrestamoBean->setIdPrestamo($idprestamo);
											$o_PrestamoDP = new PrestamoDP($o_PrestamoBean);
											$a_o_PrestamoDP = $o_PrestamoDP->select();
											$o_Prestamo = $a_o_PrestamoDP[0];
											$idcliente = $o_Prestamo->getIdCliente();
											
											$idCliente = $o_ObjectDP->getIdCliente();
											$o_ClienteBean = new ClienteBean();
											$o_ClienteBean->setIdCliente($idcliente);
											$o_clieneteDP = new ClienteDP($o_ClienteBean);
											$a_cliente = $o_clieneteDP->selectByPk();
											$o_cliente = $a_cliente[0];
											$nombrecompleto = $o_cliente->getNombreCompleto();
											$a_transacciones[$i]['tipo_transaccion'] = "pago";
											
											if($o_ObjectDP->getTipoPago() == "2"){
												$a_transacciones[$i]['tipo_transaccion'] .="-mora";
												$sumaPagoMora 	+= $o_ObjectDP->getMontoPago();
											}else{
												$sumaMontoPagado 		+= $o_ObjectDP->getMontoPago();
											}
											
											$a_transacciones[$i]['idcliente'] 	= (string)$idcliente;
											$a_transacciones[$i]['nombrecompleto'] 	= (string)addslashes($nombrecompleto);
											$a_transacciones[$i]['monto'] 			= (float)$o_ObjectDP->getMontoPago();
											$a_transacciones[$i]['hora_registro'] 	= $o_ObjectDP->getFechaCreacion();
											$i++;
										}
									}
								}
								
								//$o_user = new user_class();
								//if ($o_user->findUser($idusuario)){
								
								//sort by parent_id in descending order
								if(is_array($a_transacciones)){
									$a_transacciones = multi_sort($a_transacciones, "hora_registro", false);
								}else{
									$a_transacciones = 0;
								}
								
								$a_resultado["nombre_mercado"] 	= $nombreMercado;
								$a_resultado["asesor"]			= (string)$Asesor;
								
								$a_resultado["caja_asignada"]	= (float)$sumaCapitalIncial;
								
								$a_resultado["total_pagos"]	= (float)$sumaMontoPagado;
								$a_resultado["total_mora"]			= (float)$sumaPagoMora;
								$a_resultado["total_gastos_administrativos"]	= (float)$sumaMontoGA;
								$a_resultado["total_gastos"]					= (float)getGastoOperativo($fechaDiaAbierto,$idColaborador);
								$a_resultado["total_prestamos"]					= (float)$sumaMontoPrestado;
														
								
								$a_resultado["total_registros"] = (int)count($a_transacciones);
								
								$a_resultado["registros"]  		= $a_transacciones;
								
								$a_resultado['estado'] = "1";
								$a_resultado['mensaje'] = "Exito";
								
							}
						}
						
					break;
					case "estado_cuenta":	
						$idusuario 				= $o_datos['idusuario'];
						$idprestamo 			= $o_datos['idprestamo'];		
						
						if($idprestamo){
							
							$o_Pago = new PagoBean();
							$o_Pago->setIdPrestamo($idprestamo);
							
							$o_PagoBL = new PagoBL();
							$a_o_pagos = $o_PagoBL->busquedaPago($o_Pago);
							if(is_array($a_o_pagos)){
								foreach ($a_o_pagos as $key => $o_pago){
									if($o_pago->getMontoPago() > 0){
										$a_cuota['idcuota'] 	= $o_pago->getIdPago();
										$a_cuota['tipopago'] 	= $o_pago->getTipo();
										$a_cuota['monto'] 		= $o_pago->getMontoPago();
										$a_cuota['fecha'] 		= substr($o_pago->getFechaPago(),0,10);
										$a_listapagos[] 		= $a_cuota;
										$cont_cuotas_pagadas[$a_cuota['fecha']]++;
									}else{
										$cont_cuotas_no_pagadas++;
									}
								}
							}
							if(!is_array($a_listapagos)) $a_listapagos = [];
							$a_resultado['CP'] = (int)count($cont_cuotas_pagadas);
							$a_resultado['CNP'] = (int)$cont_cuotas_no_pagadas;
							$a_resultado['cuota'] = $a_listapagos;
							$a_resultado['estado'] = "1";
							$a_resultado['mensaje'] = "Exito";
						}else{
							$a_resultado['estado'] = "40";
							$a_resultado['mensaje'] = "No existe el prestamo";
						}					
					break;
					case "caja_tiempo_real":	
						$idusuario 				= $o_datos['idusuario'];
						$idsucursal				= $o_datos['idsucursal'];		
						$idmercado				= $o_datos['idmercado'];	
						//Minimo debe pasar una sucursal
						
						if(!$idsucursal){
							$a_resultado = mostrar_error("SUCURSAL_OBLIGATORIO",$mensaje);
						}else{
						
							$o_user 		= new user_class();
							if ($o_user->findUser($idusuario)){
								$o_ObjectBean 		= new SucursalBean();
								if($idsucursal)		$o_ObjectBean->setIdSucursal($idsucursal);
								
								$o_class 					= new SucursalBL();
								$a_ObjectBean 				= $o_class->busquedaSucursal($o_ObjectBean);
								
								if(count($a_ObjectBean)>0){
									
									foreach ($a_ObjectBean as $iKey => $o_objBean){
										$idsucursal 		= $o_objBean->getIdSucursal();
										$idadministrador 	= $o_objBean->getIdAdministrador();
										$descripcionsucursal= $o_objBean->getDescripcion();
										$a_Colaborador 		= null;
										$o_ColaboradorBean = new ColaboradorBean();
										$o_ColaboradorBean->setIdPadre($idadministrador);
										$o_ColaboradorBL = new ColaboradorBL();	
										
										
										if($idmercado){
											$o_MercadoRepresentanteBean = new MercadoRepresentanteBean();
											$o_MercadoRepresentanteBean->setIdMercado($idmercado);
											$o_MercadoRepresentanteDP = new MercadoRepresentanteDP($o_MercadoRepresentanteBean);
											$a_o_MercadoRepresentanteDP = $o_MercadoRepresentanteDP->select();
											if(is_array($a_o_MercadoRepresentanteDP)){
												foreach ($a_o_MercadoRepresentanteDP as $key => $o_MercadoRepresentanteBean){
													$a_Colaborador[] = $o_MercadoRepresentanteBean->getIdColaborador();
												}
											}
											
										}else{
											$a_o_Colaborador = $o_ColaboradorBL->busquedaColaborador($o_ColaboradorBean);
										
											if(is_array($a_o_Colaborador)){
												foreach ($a_o_Colaborador as $key => $o_colaborador){
													$a_Colaborador[] = $o_colaborador->getIdColaborador();
												}
											}
										}
										
										$o_BalanceDiaNew = new BalanceDiaBean();
										$o_BalanceDiaNew->setIdColaboradorPermitido($a_Colaborador); 
										$o_BalanceDiaNew->setIdAdministrador($idadministrador); 
										$o_BalanceDiaNew->setIdSucursal($idsucursal); 
										
										
										
										$o_BalanceDiaNewDP 		= new BalanceDiaDP($o_BalanceDiaNew);
										$fechaBalanceAbierto  	= $o_BalanceDiaNewDP->ObtenerDiaAbierto();
										$a_ResumenColaborador 	= $o_BalanceDiaNewDP->ObtenerColaboradoresNewBalance($fechaBalanceAbierto);	
										
										if(is_array($a_ResumenColaborador)){
											$Total = 0;
											$a_caja_real = null;
											foreach ($a_ResumenColaborador as $key => $a_ResesumenDiario) {
												$o_MercadoRepresentante = new MercadoRepresentanteBean();
												$o_MercadoRepresentante->setIdColaborador($a_ResesumenDiario['IdColaborador']);
												$o_MercadoRepresentanteBL = new MercadoRepresentanteBL();
												$a_o_repmer = $o_MercadoRepresentanteBL->busquedaMercadoRepresentanteDetalle($o_MercadoRepresentante);
												foreach ($a_o_repmer as $key => $o_repmer){
													$o_MercadoBean = new MercadoBean();
													$o_MercadoBean->setIdMercado($o_repmer->getIdMercado());
													$o_MercadoDP = new MercadoDP($o_MercadoBean);
													$a_MercadoDP = $o_MercadoDP->select();
													foreach ($a_MercadoDP as $key => $o_MercadoDP){
														$idmercado 				= $o_MercadoDP->getIdMercado();	
														$descripcionmercado 	= $o_MercadoDP->getDescripcion();	
													}
												}
												
												
												//$a_ResesumenDiario['NombreCompleto'];
													
												$a_caja_real[$idmercado]['descripcion_sucursal'] 	= (string)$descripcionsucursal; 
												$a_caja_real[$idmercado]['descripcion_mercado'] 	= (string)$descripcionmercado; 
												$a_caja_real[$idmercado]['balance'] 				+= round($a_ResesumenDiario['TotalCaja'],2) + round($a_ResesumenDiario['TotalPago']['PA'],2)+ round($a_ResesumenDiario['TotalPago']['PAM'],2) - round($a_ResesumenDiario['TotalPrestamo'],2) + round($a_ResesumenDiario['TotalGastoAdmin'],2)+round($a_ResesumenDiario['TotalSobrantes'],2)-round($a_ResesumenDiario['TotalFaltantes'],2)-round($a_ResesumenDiario['TotalGastoMovilidad'],2);
												$Total 												+= round($a_ResesumenDiario['TotalCaja'],2) + round($a_ResesumenDiario['TotalPago']['PA'],2)+ round($a_ResesumenDiario['TotalPago']['PAM'],2) - round($a_ResesumenDiario['TotalPrestamo'],2) + round($a_ResesumenDiario['TotalGastoAdmin'],2)+round($a_ResesumenDiario['TotalSobrantes'],2)-round($a_ResesumenDiario['TotalFaltantes'],2)-round($a_ResesumenDiario['TotalGastoMovilidad'],2);
											}
											
										}
										
										$a_resulta_pre[$idsucursal]['totalsucursal']	= $Total;
										$a_resulta_pre[$idsucursal]['mercados'] 		= $a_caja_real;
										
									}
									$a_resultado['caja_tiempo_real'] = $a_resulta_pre;
									$a_resultado['estado'] = "1";
									$a_resultado['mensaje'] = "Exito";
								}
							}else{
								$a_resultado['estado'] = "40";
								$a_resultado['mensaje'] = "No existe el usuario";
							}			
						}		
					break;
					
					case "lista_pedidos":	
						$ruta = "/images/uploadFiles/";
						$idusuario 			= $o_datos['idusuario'];
						
						$idsucursal 		=  $o_datos['idsucursal'];
						$idmercado	 		=  $o_datos['idmercado'];
						
						$idcliente 			= $o_datos['idcliente'];
						$apellido_paterno	= $o_datos['apellido_paterno'];
						
						
						
						$o_user 		= new user_class();
						if ($o_user->findUser($idusuario)){
							$a_SucursalMercado 	= sucursalMercado($o_user);
							/*
							echo "<pre>";
							
							print_r($a_SucursalMercado);
							echo "</pre>";
							*/
							$a_idColaborador 	= $a_SucursalMercado["idcolaboradores"];	
							
							$o_class = new Cr_pedido_prestamoFN(); 
							
							
							 
													
							if(is_array($a_idColaborador)){
								$o_class->addCondition( Cr_pedido_prestamoFN::IdColaborador, "in", "('".implode("','",$a_idColaborador)."')" );
							}
							if( $idColaborador != "" )  { $o_class->setIdColaborador( $idColaborador );}
							
							if($idsucursal){
								$o_ObjectBeanSuc = new SucursalMercadoBean();
								
								$cboSucursal = (int)$idsucursal;
								$o_ObjectBeanSuc->setIdSucursal($idsucursal);
							  
								$o_classS = new SucursalMercadoBL();
								$a_ObjectSucursalMercadoBean = $o_classS->busquedaSucursalMercadoDetalle($o_ObjectBeanSuc);
								
								
								if(array($a_ObjectSucursalMercadoBean)){
									foreach ($a_ObjectSucursalMercadoBean as $key => $ObjectSucursalMercadoBean){
										$a_IdMercados[] = $ObjectSucursalMercadoBean->getIdMercado();
									}
									$o_class->addCondition( Cr_pedido_prestamoFN::IidMercado, "in", "('".implode("','",$a_IdMercados)."')" );
								}
							}
							if($idcliente)$o_class->setIdCliente($idcliente);
							
							if($idmercado) $o_class->setIidMercado($idmercado);
							
							$o_class->setEstado("A"); 
							
							$a_pedidos = $o_class->select();
							if(is_array($a_pedidos)){
								
								
								
								foreach ($a_pedidos as $key => $pedido){
									
									// Foto de Negocio
									 $i_IdTipoFile = "8";
									 $s_Destino_Negocio = getClienteFile($pedido->getIdCliente(),$i_IdTipoFile,$url_base.$ruta);
										
									 // Foto de Domicilio
									 $i_IdTipoFile = "6";
									 $s_Destino_Domicilio = getClienteFile($pedido->getIdCliente(),$i_IdTipoFile,$url_base.$ruta);
									
							
									$o_ClienteBeantemp = new ClienteBean();
									$o_ClienteBeantemp->setIdCliente($pedido->getIdCliente());
									$o_ClienteBLtemp = new ClienteBL();
									$o_ClienteBean = $o_ClienteBLtemp->busquedaCliente( $o_ClienteBeantemp );
																	
									
									$IdCliente 		= $o_ClienteBean[0]->getIdCliente();
									$Semaforo 		= $o_ClienteBean[0]->getSemaforo();
									
									$NombreCompleto = $o_ClienteBean[0]->getNombreCompleto();
									$Telefono	 	= $o_ClienteBean[0]->getCelular();
									$Celular	 	= $o_ClienteBean[0]->getTelefono();
									$Direccion	 	= $o_ClienteBean[0]->getDireccion();
									$huella		 	= $o_ClienteBean[0]->getFlagConHuella();
									$GastoAdministrativo 	= $o_ClienteBean[0]->getGastoAdministrativoPorcentaje();
									$flag_huella_con_problema 	= $o_ClienteBean[0]->getFlagHuellaConProblema();
									
									$LongitudDomicilio	 	= $o_ClienteBean[0]->getLongitudDomicilio();
									$LatitudDomicilio	 	= $o_ClienteBean[0]->getLatitudDomicilio();
									$LongitudNegocio	 	= $o_ClienteBean[0]->getLongitudNegocio();
									$LatitudNegocio		 	= $o_ClienteBean[0]->getLatitudNegocio();
									
									$a_clientes[$pedido->getIdCliente()]["nombre_completo"] 	= (string)$NombreCompleto;
									$a_clientes[$pedido->getIdCliente()]["telefono"] 			= (string)$Telefono;
									$a_clientes[$pedido->getIdCliente()]["celular"] 			= (string)$Celular;
									$a_clientes[$pedido->getIdCliente()]["direccion"] 			= (string)$Direccion;
									$a_clientes[$pedido->getIdCliente()]["gasto_administrativo"] 	= $GastoAdministrativo;
									$a_clientes[$pedido->getIdCliente()]["huella"] 					= $huella;
									$a_clientes[$pedido->getIdCliente()]["flag_huella_con_problema"] = (string)$flag_huella_con_problema;
									
									$a_clientes[$pedido->getIdCliente()]["ruta_foto_negocio"]	= (string) $s_Destino_Negocio;
									$a_clientes[$pedido->getIdCliente()]["ruta_foto_domicilio"]	= (string) $s_Destino_Domicilio;
									$a_clientes[$pedido->getIdCliente()]["ubicacion_domicilio_longitud"]= (string)$LongitudDomicilio;
									$a_clientes[$pedido->getIdCliente()]["ubicacion_domicilio_latitud"]	= (string)$LatitudDomicilio;
									$a_clientes[$pedido->getIdCliente()]["ubicacion_negocio_longitud"]	= (string)$LongitudNegocio;
									$a_clientes[$pedido->getIdCliente()]["ubicacion_negocio_latitud"]	= (string)$LatitudNegocio;
									$a_clientes[$pedido->getIdCliente()]["idcliente"] 		= $IdCliente;
									$a_clientes[$pedido->getIdCliente()]["semaforo"] 		= $Semaforo;
									
									
									
									$a_pedido[$pedido->getIdCliente()][$pedido->getidpedido()]['idpedido'] 	= $pedido->getidpedido();	
									
									$a_pedido[$pedido->getIdCliente()][$pedido->getidpedido()]['monto_pedido'] 	= $pedido->getMontoFinal();	
									$a_pedido[$pedido->getIdCliente()][$pedido->getidpedido()]['mora'] 			= (float)$pedido->getMoraFinal();	
									
									$a_pedido[$pedido->getIdCliente()][$pedido->getidpedido()]['saldo'] 		= (float)$pedido->getSaldoAnterior();	
									$a_pedido[$pedido->getIdCliente()][$pedido->getidpedido()]['monto_extra']	= (float)$pedido->getMontoExtraFinal();	
									$a_pedido[$pedido->getIdCliente()][$pedido->getidpedido()]['interes']	= $pedido->getInteresPorcentajeFinal()."%";	
									
									$a_pedido[$pedido->getIdCliente()][$pedido->getidpedido()]['duracion']			= $pedido->getDuracionFinal()." "."dias";	
									
									$a_pedido[$pedido->getIdCliente()][$pedido->getidpedido()]['monto_a_dejar']	= (float)(($pedido->getMontoFinal() -  $pedido->getSaldoAnterior()) - $pedido->getGastoAdministrativoFinal() - $pedido->getMoraFinal());	
									if($pedido->getPeridiocidadPagoFinal()){
										switch ($pedido->getPeridiocidadPagoFinal()){
											case "D": $periodofinal = "Diario";break;
											case "S": $periodofinal = "Semanal";break;
											case "M": $periodofinal = "Mensual";break;
										}
									}
									$a_pedido[$pedido->getIdCliente()][$pedido->getidpedido()]['periodo']				= (string)$periodofinal;	
									$a_pedido[$pedido->getIdCliente()][$pedido->getidpedido()]['gastos_administrativos']= (float)$pedido->getGastoAdministrativoFinal();	
									$a_pedido[$pedido->getIdCliente()][$pedido->getidpedido()]['fecha_pedido']= $pedido->getFechaTransaccion();	
									
									$a_pedido[$pedido->getIdCliente()][$pedido->getidpedido()]['estado']			= (string)$pedido->getEstado();	
									$a_pedido[$pedido->getIdCliente()][$pedido->getidpedido()]['tipo']			= (string)$pedido->getTipo();	
									
									$a_clientes[$pedido->getIdCliente()]['pedido'] 						= $a_pedido[$pedido->getIdCliente()];		    			
							
								}
								
								$a_resultado['clientes'] 		= $a_clientes;		
								$a_resultado['estado'] = "1";
								$a_resultado['mensaje'] = "Exito";
							}else{
								$a_resultado['estado'] = "40";
								$a_resultado['mensaje'] = "No hay pedidos";
							}
						}else{
							$a_resultado['estado'] = "40";
							$a_resultado['mensaje'] = "No existe el usuario";
						}
					break;
					case "pedido_renovacion":	
						$idusuario 						=  $o_datos['idusuario'];
						$idprestamo 					=  $o_datos['idprestamo'];
						
						$idcliente 						=  $o_datos['idcliente'];
						$idprestamo 					=  $o_datos['idprestamo'];
						
						
						$interes	 					=  $o_datos['interes'];
						$mora		 					=  $o_datos['mora'];
						
						$monto			 				=  $o_datos['monto'];
						
						$saldo			 				=  $o_datos['saldo'];
						
						$monto_extra	 				=  $o_datos['monto_extra'];
						
						$fecha_pedido 					=  $o_datos['fecha_pedido'];
						$interes	 					=  $o_datos['interes'];
						
						$periodo	 					=  $o_datos['periodo'];
						$duracion	 					=  $o_datos['duracion'];
						$hora		 					=  $o_datos['hora'];
						$minuto		 					=  $o_datos['minuto'];
						$observacion 					=  $o_datos['comentario'];
						$telefono_contacto 				=  $o_datos['telefono_contacto'];
						$hora_atencion	 				=  $o_datos['hora_atencion'];
						
						
						$gastos_administrativos	 		=  $o_datos['gastos_administrativos'];
						
						$ubicacion_registro_latitud		=  $o_datos['ubicacion_registro_latitud'];
						$ubicacion_registro_longitud	=  $o_datos['ubicacion_registro_longitud'];
						
						$o_user 		= new user_class();
						if ($o_user->findUser($idusuario)){
							
							//Consultar el prestamo si cumple la el pedido de renovacion
							$o_PrestamoBean = new PrestamoBean();
							$o_PrestamoBean->setIdPrestamo($idprestamo);
							
							$o_PrestamoDP = new PrestamoDP($o_PrestamoBean);
							$a_o_PrestamoDP = $o_PrestamoDP->select();
							
							if(is_array($a_o_PrestamoDP)){
								
								foreach ($a_o_PrestamoDP as $key => $o_Prestamo){
									$SaldoPrestamo 	= $o_Prestamo->getSaldoPrestamo();
									$Estado 		= $o_Prestamo->getEstado();
									$IdPedidoReferencia = $o_Prestamo->getIdPedidoReferencia();
									
									if(!$IdPedidoReferencia){
										$permitirProceso = 1;
									}else{
										
										$a_pedido = loadPedido($IdPedidoReferencia);
										
										$estadoPedido 		= $a_pedido['estado'];
										$eliminadoPedido 	= $a_pedido['eliminado'];
										
										
										$permitirProceso = 0;
										if($eliminadoPedido == -1 && $estadoPedido == "G"){
											$permitirProceso = 1;
										}
									}
									if($permitirProceso){
										if($Estado == "P"){
											$saldo = $SaldoPrestamo;
											$monto = $saldo + $monto_extra;
									
											$fechaDiaAbierto 	= fechaDiaAbierto($idusuario);
											   
											if($fecha_pedido == "" || ($fecha_pedido && $fecha_pedido <= $fechaDiaAbierto)){
												if($fecha_pedido == ""){
													$a_resultado['estado'] = "90";
													$a_resultado['mensaje'] = "Debe de ingresar la fecha de pedido";
												}else{
													$a_resultado['estado'] = "100";
													$a_resultado['mensaje'] = "La Fecha ".$fecha_pedido." de Pedido fuera de rango de fecha dia abierto ".$fechaDiaAbierto;
												}
											}else{
												
												$a_SucursalMercado 	= sucursalMercado($o_user);
																
												$idColaboradorP 	= getColaboradorxCliente($idcliente);
												
												$o_ClienteBean = new ClienteBean();
												$o_ClienteBean->setIdCliente($idcliente);
												
												$o_ClienteDP = new ClienteDP($o_ClienteBean);
												$a_clientes = $o_ClienteDP->select();
												if(is_array($a_clientes)){
													foreach ($a_clientes as $key => $o_cliente){
														$idMercado = $o_cliente->getIdMercado();
													}
												}
																	
												$o_Cr_pedido_prestamoDP = new Cr_pedido_prestamoDP();
												$o_Cr_pedido_prestamoDP->setTipo('R' );
												$o_Cr_pedido_prestamoDP->setMontoExtra((float)$monto_extra );
												$o_Cr_pedido_prestamoDP->setSaldoAnterior((float)$saldo);
												$o_Cr_pedido_prestamoDP->setIdCliente( ( int ) $idcliente );
												
												$o_Cr_pedido_prestamoDP->setIdPrestamo( ( int ) $idprestamo);
												
												$o_Cr_pedido_prestamoDP->setIidMercado( ( int ) $idMercado );
												
												$o_Cr_pedido_prestamoDP->setIdColaborador( (int) $idColaboradorP );
												
												$o_Cr_pedido_prestamoDP->setMonto( floatval( $monto ) );
												$o_Cr_pedido_prestamoDP->setMora( floatval( $mora ) );
												$o_Cr_pedido_prestamoDP->setTelefonoContacto( $telefono_contacto );
												$o_Cr_pedido_prestamoDP->setInteresPorcentaje( ( int ) $interes );
												$o_Cr_pedido_prestamoDP->setDuracion	( ( int ) $duracion );
												$o_Cr_pedido_prestamoDP->setPeridiocidadPago( $periodo );
												$o_Cr_pedido_prestamoDP->setHoraAtencion	( $hora_atencion );
												$o_Cr_pedido_prestamoDP->setRegistroLatitud	( (string)$ubicacion_registro_latitud );
												$o_Cr_pedido_prestamoDP->setRegistroLongitud	( (string)$ubicacion_registro_longitud );
												$o_Cr_pedido_prestamoDP->setEliminado( -1 );
												$o_Cr_pedido_prestamoDP->setObservacion( $observacion );
												$o_Cr_pedido_prestamoDP->setGastoAdministrativo((float)$gastos_administrativos);
												$o_Cr_pedido_prestamoDP->setInteresPorcentaje((float)$interes);
												
												
												//SAVE
												$o_Cr_pedido_prestamoDP->setFechaTransaccion( $fecha_pedido );
												//$o_Cr_pedido_prestamoDP->setFechaEntrega(  );
												$o_Cr_pedido_prestamoDP->setEstado( "P" );
												$i_IdPedido = Cr_pedido_prestamoDP::getNextId();
												$o_Cr_pedido_prestamoDP->setIdpedido( ( int ) $i_IdPedido );
												$o_Cr_pedido_prestamoDP->setFechaCreacion( date( "Y-m-d H:i:s" ) );
												$o_Cr_pedido_prestamoDP->setUsuarioCreacion( $idusuario );
												$b_Result = $o_Cr_pedido_prestamoDP->save();
												
												if($b_Result){
													
													//Actualizar el prestamo con el idpedidoreferencia
													$o_PrestamoBean = new PrestamoBean();
													$o_PrestamoBean->setIdPrestamo($idprestamo);
													$o_PrestamoBean->setIdPedidoReferencia($i_IdPedido);
													
													$o_PrestamoDP = new PrestamoDP($o_PrestamoBean);
													$o_PrestamoDP->update();
													
													$o_Cr_pedido_prestamoFN = new Cr_pedido_prestamoFN();
													$o_Cr_pedido_prestamoBN = $o_Cr_pedido_prestamoFN->selectByPK($i_IdPedido);
													
													$a_pedidoNuevo['idpedido'] 	= $o_Cr_pedido_prestamoBN->getIdpedido();
													$a_pedidoNuevo['capital'] 	= (float)$o_Cr_pedido_prestamoBN->getMonto();
													$a_pedidoNuevo['interes'] 	= (float)$o_Cr_pedido_prestamoBN->getInteresPorcentaje();
													$a_pedidoNuevo['estado'] 	= $o_Cr_pedido_prestamoBN->getEstado();
																
													$a_resultado['estado'] = "1";
													$a_resultado['mensaje'] = "Exito";
													$a_resultado['nuevo_prestamo'] = $a_pedidoNuevo;
													
												}else{
													$a_resultado['estado'] = "2";
													$a_resultado['mensaje'] = "No se registro el pedido";
												}	
											
											}
										}else{
											$a_resultado['estado'] = "70";
											$a_resultado['mensaje'] = "No se permite, Prestamo no esta en estado Pendiente";
										}
									}else{
										$a_resultado['estado'] = "80";
										$a_resultado['mensaje'] = "Accion no permitida, préstamo con pedido realizado: ".$IdPedidoReferencia;
									}
								}
							
								
							}else{
								$a_resultado['estado'] = "10";
								$a_resultado['mensaje'] = "No existe el prestamo";
							}
							
						}else{
							$a_resultado['estado'] = "4";
							$a_resultado['mensaje'] = "No existe el usuario";
						}
					break;
					case "generar_prestamo_sobre_pedido":	
						$idusuario 	= $o_datos['idusuario'];
						$idpedido 	= $o_datos['idpedido'];
						$huella 	= $o_datos['huella'];
						$ubicacion_registro_latitud		=  $o_datos['ubicacion_registro_latitud'];
						$ubicacion_registro_longitud	=  $o_datos['ubicacion_registro_longitud'];
						$o_user 		= new user_class();
						if ($o_user->findUser($idusuario)){
							
							
							$o_Cr_pedido_prestamoFN = new Cr_pedido_prestamoFN();

							$o_Cr_pedido_prestamoBN = $o_Cr_pedido_prestamoFN->selectByPK( $idpedido );
							
							if( $o_Cr_pedido_prestamoBN )
							{
								
								//echo "<pre>"; print_r( $o_Cr_pedido_prestamoBN ); echo "</pre>";
								$Tipo   				= $o_Cr_pedido_prestamoBN->getTipo();
								$FechaTransaccion   	= $o_Cr_pedido_prestamoBN->getFechaTransaccion();
								$Estado   				= $o_Cr_pedido_prestamoBN->getEstado();
								$IdCliente 				= $o_Cr_pedido_prestamoBN->getIdCliente();
								
								$idColaborador 	= getColaboradorxCliente($IdCliente);
															
								$fechaDiaAbierto= fechaDiaAbierto($idusuario);
								
								$SaldoAnteriorPedido = $o_Cr_pedido_prestamoBN->getSaldoAnterior();
								
								//Verificar que el pedido este en estado A (Aprobado) para que pueda hacer todo el procedimiento 
								
								if($Estado == "A"){
									
									if($Tipo == "R"){
										
										//Verificar que prestamo le corresponde el id del pedido
										
										$o_PrestamoBean = new PrestamoBean();
										$o_PrestamoBean->setIdPedidoReferencia($idpedido);
										
										$o_PrestamoDP = new PrestamoDP($o_PrestamoBean);
										$a_o_PrestamoDP = $o_PrestamoDP->select();
										
										if(is_array($a_o_PrestamoDP)){
											foreach ($a_o_PrestamoDP as $key => $o_Prestamo){
												$IdPrestamo 	= $o_Prestamo->getIdPrestamo();	
												$SaldoPrestamoC = $o_Prestamo->getSaldoPrestamo();
												$EstadoPrestamoC= $o_Prestamo->getEstado();
												$IdCliente 		= $o_Prestamo->getIdCliente();
												
											}
										}
										
										$o_PrestamoBeanT = new PrestamoBean();
										$o_PrestamoBeanT->setIdPrestamoReferencia($IdPrestamo);
										
										$o_PrestamoDPT = new PrestamoDP($o_PrestamoBeanT);
										$a_o_PrestamoDPT = $o_PrestamoDPT->select();
										
										if(is_array($a_o_PrestamoDPT)){
											foreach ($a_o_PrestamoDPT as $key => $o_Prestamo){
												$IdPrestamoG 	= $o_Prestamo->getIdPrestamo();	
											}
										}
										
										$MontoFinal         = $SaldoPrestamoC + $o_Cr_pedido_prestamoBN->getMontoExtraFinal();
										
										if($SaldoAnteriorPedido != $SaldoPrestamoC && $EstadoPrestamoC == "P") {
											$msg_error = "No puede generar el pedido de renovacion del prestamo ".$IdPrestamo." porque vario su saldo desde que realizo el pedido.";
											$permitirTrx = "0";
											
										}else{
											if($EstadoPrestamoC == "C" && $Tipo == "R"){
												$msg_error = "No puede generar el pedido de renovacion de un prestamo que esta Cancelado";
												$permitirTrx = "0";
											}else{
												$permitirTrx = "1";
											}
											
										}
										
										
									}elseif($Tipo == "N"){
										$permitirTrx 		= "1";
										$MontoFinal         = $o_Cr_pedido_prestamoBN->getMontoFinal();	
									}
									
									
									
								
									
									if($permitirTrx){
										  if(!is_array($a_o_PrestamoDPT)){
											  
												
												
												$TelefonoContacto   = $o_Cr_pedido_prestamoBN->getTelefonoContacto();
												$IdCliente          = $o_Cr_pedido_prestamoBN->getIdCliente();
												$GastoAdministrativo = $o_Cr_pedido_prestamoBN->getGastoAdministrativoFinal();
												$cboInteres			= $o_Cr_pedido_prestamoBN->getInteresPorcentajeFinal();
												$MontoExtra			= $o_Cr_pedido_prestamoBN->getMontoExtraFinal();
												$cboFormaPago	 	= $o_Cr_pedido_prestamoBN->getPeridiocidadPagoFinal();
												$mora				= $o_Cr_pedido_prestamoBN->getMoraFinal();
												$cboDuracion		= $o_Cr_pedido_prestamoBN->getDuracionFinal();
												$Estado        		= $o_Cr_pedido_prestamoBN->getEstado();
												$HoraAtencion       = $o_Cr_pedido_prestamoBN->getHoraAtencion();
												$ObservacionFinal   = $o_Cr_pedido_prestamoBN->getObservacionFinal();
												$FechaModificacion  = $o_Cr_pedido_prestamoBN->getFechaModificacion();
												$ObservacionFinal   = $o_Cr_pedido_prestamoBN->getObservacionFinal();
												$MoraFinal  		= $o_Cr_pedido_prestamoBN->getMoraFinal();
												
																	
												$txtCapital 		= $MontoFinal;
												$o_PrestamoBean 	= new PrestamoBean();
												$o_PrestamoBean->setIdCliente($IdCliente);
												$o_PrestamoBean->setMontoPrestado($txtCapital);
												$o_PrestamoBean->setFechaInicio($fechaDiaAbierto);
												$o_PrestamoBean->setInteresPorcentaje($cboInteres);
												$montoTotal 	= round($txtCapital*($cboInteres/100+1),1);
												$SaldoPrestamo 	= $montoTotal;
												$o_PrestamoBean->setMontoTotal($montoTotal);
												$o_PrestamoBean->setGastoAdministrativo($GastoAdministrativo);
												$o_PrestamoBean->setPeriodicidadPago($cboFormaPago);
												$o_PrestamoBean->setSaldoPrestamo($SaldoPrestamo);
												$o_PrestamoBean->setDuracion($cboDuracion);
												$o_PrestamoBean->setFlagReporte("2");
												$o_PrestamoBean->setIdPedidoReferencia($i_Id);
												$o_PrestamoBean->setRegistroLatitud($ubicacion_registro_latitud);
												$o_PrestamoBean->setRegistroLongitud($ubicacion_registro_longitud);
												
												$fecha = $fechaDiaAbierto;			
												switch ($cboFormaPago){
													case "D" : 
													        $fechaPago  =  date('Y-m-d',strtotime($fecha.' +1 days'));
															switch ($cboDuracion){
																/**********************/
																case 7 :  $MontoCuota = round($montoTotal/5,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +7 days'));
																		  $NroCuotas=5; break;
																/*********************/
																case 15 : $MontoCuota = round($montoTotal/13,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +15 days'));
																		  $NroCuotas=13; break;
																case 30 : $MontoCuota = round($montoTotal/22,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +30 days'));
																		  $NroCuotas=22; break;
																case 45 : $MontoCuota = round($montoTotal/39,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +45 days'));
																		  $NroCuotas=39; break;
																case 60 : $MontoCuota = round($montoTotal/52,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +60 days'));
																		  $NroCuotas=52; break;
																case 75 : $MontoCuota = round($montoTotal/65,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +75 days'));
																		  $NroCuotas=65; break;
																case 90 : $MontoCuota = round($montoTotal/88,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +90 days'));
																		  $NroCuotas=88; break;
															}
															break;
													case "S":
													        $fechaPago  =  date('Y-m-d',strtotime($fecha.' +7 days'));
															switch ($cboDuracion){
																/**********************/
																case 7 :  $MontoCuota = round($montoTotal/1,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +7 days'));
																		  $NroCuotas=1; break;
																/*********************/
																case 15 : $MontoCuota = round($montoTotal/2,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +15 days'));
																		  $NroCuotas=2; break;
																case 30 : $MontoCuota = round($montoTotal/4,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +30 days'));
																		  $NroCuotas=4; break;
																case 45 : $MontoCuota = round($montoTotal/6,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +45 days'));
																		  $NroCuotas=6; break;
																case 60 : $MontoCuota = round($montoTotal/8,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +60 days'));
																		  $NroCuotas=8; break;
																case 75 : $MontoCuota = round($montoTotal/10,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +75 days'));
																		  $NroCuotas=10; break;
																case 90 : $MontoCuota = round($montoTotal/12,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +90 days'));
																		  $NroCuotas=12; break;
															}
															break;
													case "Q":
													        $fechaPago  =  date('Y-m-d',strtotime($fecha.' +15 days'));
															switch ($cboDuracion){	
																case 15 : $MontoCuota = round($montoTotal/1,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +15 days'));
																		  $NroCuotas=1; break;
																case 30 : $MontoCuota = round($montoTotal/2,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +30 days'));
																		  $NroCuotas=2; break;
																case 45 : $MontoCuota = round($montoTotal/3,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +45 days'));
																		  $NroCuotas=3; break;
																case 60 : $MontoCuota = round($montoTotal/4,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +60 days'));
																		  $NroCuotas=4; break;
																case 75 : $MontoCuota = round($montoTotal/5,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +75 days'));
																		  $NroCuotas=5; break;
																case 90 : $MontoCuota = round($montoTotal/6,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +90 days'));
																		  $NroCuotas=6; break;
															}
															break;
													case "M":
													        $fechaPago  =  date('Y-m-d',strtotime($fecha.' +30 days'));
															switch ($cboDuracion){	
																
																case 30 : $MontoCuota = round($montoTotal/1,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +30 days'));
																		  $NroCuotas=1; break;
																case 60 : $MontoCuota = round($montoTotal/2,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +60 days'));
																		  $NroCuotas=2; break;
																case 90 : $MontoCuota = round($montoTotal/3,2);
																		  $fechaVencimiento = date('Y-m-d',strtotime($fecha.' +90 days'));
																		  $NroCuotas=3; break;
															}
															break;
												}
												
												if($cboDuracion){
													$o_PrestamoBean->setCuotaPago($MontoCuota);
													$o_PrestamoBean->setFechaInicioPago($fechaPago);
													$o_PrestamoBean->setFechaVencimiento($fechaVencimiento);
													$InteresMonto=$montoTotal-$txtCapital;
													$o_PrestamoBean->setInteresMonto($InteresMonto);
													$o_PrestamoBean->setNroCuotas($NroCuotas);
													$o_PrestamoBean->setObservacion($txtObservacion);
													$o_PrestamoBean->setIdPedidoReferencia($idpedido);
													if($Tipo == "R"){
														$o_PrestamoBean->setOrigen("F");
														$o_PrestamoBean->setMontoExtra($MontoExtra);
														$o_PrestamoBean->setIdPrestamoReferencia($IdPrestamo);
														
														/*
														if($MoraFinal){
															$o_PagoBean = new PagoBean();
															$o_PagoBean->setIdPrestamo($IdPrestamo);
															$o_PagoBean->setFechaPago($fechaDiaAbierto);
															$o_PagoBean->setTipopago('2');
															$o_PagoBean->setMontoPago($MoraFinal);
															$o_PagoBean->setIdColaborador($idColaborador);
															$o_PagoBean->setFechaCreacion(date("Y-m-d H:i:s"));
															$o_PagoBean->setUsuarioCreacion($idusuario);
															$o_PagoDP = new PagoDP($o_PagoBean);
															$o_PagoDP->save();
														}*/
													}else{
														$o_PrestamoBean->setOrigen("R");
													}
													//$o_PrestamoBean->setLimiteCredito($LineaCredito);
													
													$o_PrestamoBean->setFechaCreacion(date("Y-m-d H:i:s"));
													$o_PrestamoBean->setUsuarioCreacion($idusuario);
													$o_PrestamoBean->setIdColaborador($idColaborador);
													
													$o_PrestamoBL = new PrestamoBL();
													$bResult = $o_PrestamoBL->insertarPrestamo($o_PrestamoBean);
													procesoCalculoCronograma($bResult,1);
													 if($bResult){
														
														$o_PrestamoBeanAnt = new PrestamoBean();
														$o_PrestamoBeanAnt->setIdPrestamo($IdPrestamo);
														$o_PrestamoBeanAnt->setEstado("C");
														$o_PrestamoBeanAnt->setFechaCancelacion($fechaDiaAbierto);
														$o_PrestamoBeanAnt->setFechaModificacion(date("Y-m-d H:i:s"));
														$o_PrestamoBeanAnt->setUsuarioModificacion($idusuario);
														$o_class = new PrestamoBL();
														$a_ObjectBeanAnt = $o_class->modificarPrestamo($o_PrestamoBeanAnt);
														
														if($mora){
															$o_PagoBean = new PagoBean();
															$o_PagoBean->setIdPrestamo($IdPrestamo);
															$o_PagoBean->setFechaPago($fechaDiaAbierto);
															$o_PagoBean->setTipopago('2');
															$o_PagoBean->setMontoPago($mora);
															$o_PagoBean->setIdColaborador($idColaborador);
															$o_PagoBean->setRegistroLatitud($ubicacion_registro_latitud);
															$o_PagoBean->setRegistroLongitud($ubicacion_registro_longitud);
															$o_PagoBean->setFechaCreacion(date("Y-m-d H:i:s"));
															$o_PagoBean->setUsuarioCreacion($idusuario);
															$o_PagoDP = new PagoDP($o_PagoBean);
															$o_PagoDP->save();
														}
																																			
														$o_newPrestamoBean = new PrestamoBean();
														$o_newPrestamoBean->setIdPrestamo($bResult);
														
														$o_newPrestamoDP = new PrestamoDP($o_newPrestamoBean);
														$a_newPrestamoBean = $o_newPrestamoDP->select();
														//echo "-----------*****-------------------";
														$cadena = $o_newPrestamoDP->updatePedidoGenerado($fechaDiaAbierto,$idpedido,$bResult,$ObservacionFinal." ".$add_observacion,$IdCliente);
														//echo "-----------*****-------------------";
														//guardar_log($cadena);
														
														
														$o_newPrestamo = $a_newPrestamoBean[0];
														
														$a_prestamoNuevo['idprestamo'] 			= $o_newPrestamo->getIdPrestamo();
														$a_prestamoNuevo['monto_total']			= (float)$o_newPrestamo->getMontoTotal();
														$a_prestamoNuevo['capital']				= (float)$o_newPrestamo->getMontoPrestado();
														$a_prestamoNuevo['monto_interes']		= (float)$o_newPrestamo->getInteresMonto();
														$a_prestamoNuevo['saldo']				= (float)$o_newPrestamo->getSaldoPrestamo();
														$a_prestamoNuevo['interes']				= (float)$o_newPrestamo->getInteresPorcentaje();
														$a_prestamoNuevo['gastos_administrativos']	= (float)$o_newPrestamo->getGastoAdministrativo();
														$a_prestamoNuevo['fecha_prestamo']		= $o_newPrestamo->getFechaInicio();
														$a_prestamoNuevo['fecha_vencimiento']	= $o_newPrestamo->getFechaVencimiento();
														$a_prestamoNuevo['estado']				= $o_newPrestamo->getEstado();
														
														
														$a_resultado['nuevo_prestamo'] = $a_prestamoNuevo;
														$a_resultado['estado'] = "1";
														$a_resultado['mensaje'] = "Exito";
													}
												
												}else{
													$a_resultado['estado'] = "140";
													$a_resultado['mensaje'] = "No hay Forma de Pago determinado para este pedido ".$idpedido;
												}
												
											}else{
												$a_resultado['estado'] = "100";
												$a_resultado['mensaje'] = "Accion no permitida, pedido ya genero prestamo: ".$IdPrestamoG;
											}
										}else{
											$a_resultado['estado'] = "101";
											$a_resultado['mensaje'] = $msg_error;
										}
								}else{
									
									$a_resultado['estado'] = "90";
									if($Estado == "R"){
										$a_resultado['mensaje'] = "Accion no permitida, el pedido fue rechazado ".$Estado;
									}elseif($Estado == "G"){
										$a_resultado['mensaje'] = "Accion no permitida, el pedido ya fue generado ".$Estado;
									}elseif($Estado == "P"){									
										$a_resultado['mensaje'] = "Accion no permitida, el pedido esta en estado Pendiente.";
									}else{
										; 	
										$a_resultado['mensaje'] = "No existe el pedido ";
									}
								}
									
							}else{
								
								$a_resultado['estado'] = "110";
								$a_resultado['mensaje'] = "No existe el pedido ";
							}
							
							
							
						}else{
							$a_resultado['estado'] = "40";
							$a_resultado['mensaje'] = "No existe el usuario";
						}
					break;
					case "actualizacion_foto_negocio":
						$idusuario 		= $o_datos['idusuario'];
						$idcliente 		= $o_datos['idcliente'];
						$foto_archivo 	= $_POST['foto_archivo'];
						$ubicacion_registro_latitud		=  $o_datos['ubicacion_registro_latitud'];
						$ubicacion_registro_longitud	=  $o_datos['ubicacion_registro_longitud'];
						$o_user 		= new user_class();
						if ($o_user->findUser($idusuario)){
							
							$CodTipoDocumento = '8';
							
							subirImagen($CodTipoDocumento,$foto_archivo,$idcliente,$idusuario,$ubicacion_registro_latitud,$ubicacion_registro_longitud);
													
							$a_resultado['estado'] = "1";
							$a_resultado['mensaje'] = "Exito";
					
							
						}else{
							$a_resultado['estado'] = "40";
							$a_resultado['mensaje'] = "No existe el usuario";
						}
					break;
					case "actualizacion_foto_domicilio":
						$idusuario 		= $o_datos['idusuario'];
						$idcliente 		= $o_datos['idcliente'];
						$foto_archivo 	= $_POST['foto_archivo'];
						$ubicacion_registro_latitud		=  $o_datos['ubicacion_registro_latitud'];
						$ubicacion_registro_longitud	=  $o_datos['ubicacion_registro_longitud'];
						$o_user 		= new user_class();
						if ($o_user->findUser($idusuario)){
							
							$CodTipoDocumento = '6';
							
							subirImagen($CodTipoDocumento,$foto_archivo,$idcliente,$idusuario,$ubicacion_registro_latitud,$ubicacion_registro_longitud);
						   
							$a_resultado['estado'] = "1";
							$a_resultado['mensaje'] = "Exito";
							
						}else{
							$a_resultado['estado'] = "40";
							$a_resultado['mensaje'] = "No existe el usuario";
						}
					break;
					case "actualizacion_gps_negocio":
						$idusuario 		= $o_datos['idusuario'];
						$idcliente 		= $o_datos['idcliente'];
						$ubicacion_registro_latitud		=  $o_datos['ubicacion_registro_latitud'];
						$ubicacion_registro_longitud	=  $o_datos['ubicacion_registro_longitud'];
						$o_user 		= new user_class();
						if ($o_user->findUser($idusuario)){
							$o_CrClienteBean = new ClienteBean();
							$o_CrClienteBean->setIdCliente($idcliente);
							$o_CrClienteBean->setLongitudNegocio($ubicacion_registro_longitud);
							$o_CrClienteBean->setLatitudNegocio($ubicacion_registro_latitud);
							$o_CrClienteBean->setUsuarioModificacion($idusuario);
							$o_CrClienteBean->setFechaModificacion(date('Y-m-d H:i:s'));
							$o_CrClienteDP = new ClienteDP($o_CrClienteBean);
							$resultado = $o_CrClienteDP->update();
							if($resultado){
								$a_resultado['estado'] = "1";
								$a_resultado['mensaje'] = "Exito";
							}else{
								$a_resultado['estado'] = "101";
								$a_resultado['mensaje'] = "No se pudo actualizar";
							}
							
							
						}else{
							$a_resultado['estado'] = "40";
							$a_resultado['mensaje'] = "No existe el usuario";
						}
					break;
					case "actualizacion_gps_domicilio":
						$idusuario 		= $o_datos['idusuario'];
						$idcliente 		= $o_datos['idcliente'];
						$ubicacion_registro_latitud		=  $o_datos['ubicacion_registro_latitud'];
						$ubicacion_registro_longitud	=  $o_datos['ubicacion_registro_longitud'];
						$o_user 		= new user_class();
						if ($o_user->findUser($idusuario)){
							$o_CrClienteBean = new ClienteBean();
							$o_CrClienteBean->setIdCliente($idcliente);
							$o_CrClienteBean->setLongitudDomicilio($ubicacion_registro_longitud);
							$o_CrClienteBean->setLatitudDomicilio($ubicacion_registro_latitud);
							$o_CrClienteBean->setUsuarioModificacion($idusuario);
							$o_CrClienteBean->setFechaModificacion(date('Y-m-d H:i:s'));
							$o_CrClienteDP = new ClienteDP($o_CrClienteBean);
							$resultado = $o_CrClienteDP->update();
							if($resultado){
								$a_resultado['estado'] = "1";
								$a_resultado['mensaje'] = "Exito";
							}else{
								$a_resultado['estado'] = "101";
								$a_resultado['mensaje'] = "No se pudo actualizar";
							}
							
						}else{
							$a_resultado['estado'] = "40";
							$a_resultado['mensaje'] = "No existe el usuario";
						}
					break;
					case "error_tarjeta":
						$idusuario 		= $o_datos['idusuario'];
						$idcliente 		= $o_datos['idcliente'];
						$foto_archivo 	= $o_datos['foto_archivo'];
						$idprestamo 	= $o_datos['idprestamo'];
						$ubicacion_registro_latitud		=  $o_datos['ubicacion_registro_latitud'];
						$ubicacion_registro_longitud	=  $o_datos['ubicacion_registro_longitud'];
						$o_user 		= new user_class();
						if ($o_user->findUser($idusuario)){
							
							$CodTipoDocumento = '9';
											
							subirImagen($CodTipoDocumento,$foto_archivo,$idcliente,$idusuario,$ubicacion_registro_latitud,$ubicacion_registro_longitud,$referencia);
												   
							$a_resultado['estado'] = "1";
							$a_resultado['mensaje'] = "Exito";
							
						}else{
							$a_resultado['estado'] = "40";
							$a_resultado['mensaje'] = "No existe el usuario";
						}
					break;
					
					case "seguimiento_personal":
						$con = Conexion::getConexion();
						mysql_db_query(Conexion::getNameDb(), "SET NAMES 'utf8'", $con);
						
						$idusuario 				= $o_datos['idusuario'];
						$idsucursal 			= $o_datos['idsucursal'];
						$idmercado 				= $o_datos['idmercado'];
						
						if(!$idsucursal){
							$a_resultado = mostrar_error("SUCURSAL_OBLIGATORIO",$mensaje);
						}else{
						
							$o_user 		= new user_class();
							if ($o_user->findUser($idusuario)){
								$idcolaborador = $o_user->getIdColaborador();
								if( $o_user->getUserRoleId() == "sys.ope" ){
									$a_resultado['estado'] = "0";
									$a_resultado['mensaje'] = "Operacion no permitida";
									$a_respuesta["resultado"] = $a_resultado;
									
								}elseif( $o_user->getUserRoleId() == "sys.gen" && !$idsucursal){
									$a_resultado['estado'] = "0";
									$a_resultado['mensaje'] = "Seleccione una sucursal";
									$a_respuesta["resultado"] = $a_resultado;
								}else{
							
									$a_SucursalMercado 	= sucursalMercado($o_user,$idmercado,$idcolaborador);
									/*
									echo "<pre>";
									
									print_r($a_SucursalMercado);
									echo "</pre>";
									*/
									$a_idColaborador 	= $a_SucursalMercado["idcolaboradores"];	
									$a_idsmercados 		= $a_SucursalMercado["idsmercados"];	
									/*
									echo "<pre>";
									print_r($a_idColaborador);
									echo "</pre>";
										*/					
									
										if($o_user->getUserRoleId() == "sys.gen"){
											
										}elseif($o_user->getUserRoleId() == "sys.res"){
											$idcolaborador = obternerColaboradorxUsuario($idusuario);
											$o_SucursalBean = new SucursalBean();
											$o_SucursalBean->setIdAdministrador($idcolaborador);
											$o_SucursalDP = new SucursalDP($o_SucursalBean);
											$a_o_SucursalDP = $o_SucursalDP->select();
											foreach ($a_o_SucursalDP as $key => $o_SucursalDP){
												$idsucursal = $o_SucursalDP->getIdSucursal();
											}
										}elseif($o_user->getUserRoleId() == "sys.sup"){
											$idcolaborador = obternerColaboradorxUsuario($idusuario);
											$o_ColaboradorBean = new ColaboradorBean();
											$o_ColaboradorBean->setIdColaborador($idcolaborador);
											$o_ColabradorDP = new ColaboradorDP($o_ColaboradorBean);
											$a_o_ColabradorDP = $o_ColabradorDP->select();
											
											foreach ($a_o_ColabradorDP as $key => $o_ColabradorDP){
										
												$idpadre = $o_ColabradorDP->getPadre();	
												$o_SucursalBean = new SucursalBean();
												$o_SucursalBean->setIdAdministrador($idpadre);
												$o_SucursalDP = new SucursalDP($o_SucursalBean);
												$a_o_SucursalDP = $o_SucursalDP->select();
												foreach ($a_o_SucursalDP as $key => $o_SucursalDP){
													$idsucursal = $o_SucursalDP->getIdSucursal();
												}
										
											}
										}
									
										if($idsucursal){
										
										
											$o_SucursalMercadoBean = new SucursalMercadoBean();
											$o_SucursalMercadoBean->setIdSucursal($idsucursal);
											$o_SucursalMercadoBean->setIdMercado($idmercado);
											$o_SucursalMercadoDP = new SucursalMercadoDP($o_SucursalMercadoBean);
											$a_o_SucursalMercadoDP = $o_SucursalMercadoDP->select();
											
											if(is_array($a_o_SucursalMercadoDP)){
												foreach ($a_o_SucursalMercadoDP as $key => $o_SucursalMercadoDP){
													$a_idsmercados[] = $o_SucursalMercadoDP->getIdMercado();
													
													$o_crMercadoBean = new MercadoBean();
													$o_crMercadoBean->setIdMercado($o_SucursalMercadoDP->getIdMercado());
													$o_MercadoDP = new MercadoDP($o_crMercadoBean);
													$a_o_MercadoDP = $o_MercadoDP->select();
													
													if(is_array($a_o_MercadoDP) && count($a_o_MercadoDP)){
														foreach ($a_o_MercadoDP as $key => $o_MercadoDP){
															$nombreMercadoT[$o_MercadoDP->getIdMercado()] = utf8_encode($o_MercadoDP->getDescripcion());
														}
													}
													
													
													$o_MercadoRepresentante = new MercadoRepresentanteBean();
													$o_MercadoRepresentante->setIdMercado($o_SucursalMercadoDP->getIdMercado());
													$o_MercadoRepresentanteBL = new MercadoRepresentanteBL();
													$a_o_repmer = $o_MercadoRepresentanteBL->busquedaMercadoRepresentanteDetalle($o_MercadoRepresentante);
													
																					
													foreach ($a_o_repmer as $key => $o_repmer){
														
														$o_ColaboradorBean = new ColaboradorBean();
														$o_ColaboradorBean->setIdColaborador($o_repmer->getIdColaborador());
														$o_ColabradorDP = new ColaboradorDP($o_ColaboradorBean);
														$a_o_ColabradorDP = $o_ColabradorDP->select();
														
														foreach ($a_o_ColabradorDP as $key => $o_ColabradorDP){
															$idusuario 									= $o_ColabradorDP->getUsuario();
															$a_idColaborador[] 							= $o_ColabradorDP->getIdColaborador();	
															$Asesor[$o_ColabradorDP->getIdColaborador()]= $o_ColabradorDP->getNombres()." ".$o_ColabradorDP->getApellidoPaterno()." ".$o_ColabradorDP->getApellidoMaterno();
															$nombreMercado[$o_ColabradorDP->getIdColaborador()]= $nombreMercadoT[$o_SucursalMercadoDP->getIdMercado()];
													
														}
													}
													
													
												}
											}else{
												$a_resultado['estado'] = "0";
												$a_resultado['mensaje'] = "No hay";
												$a_respuesta["resultado"] = $a_resultado;
											}
										
										
										}
									
									
									//print_r($a_idColaborador);
									if($o_user->getUserRoleId() == "sys.gen"){
										
									}elseif($o_user->getUserRoleId() == "sys.res"){
										
									}elseif($o_user->getUserRoleId() == "sys.sup"){
										
									}
									
									$fechaDiaAbierto = fechaDiaAbierto($idusuario);
									//$fechaDiaAbierto = "2019-01-21";
									
									
									
									
									//Detalle y suma de los prestamos registrados por el colaborador
									$o_ObjectBean = new PrestamoBean();
									$o_ObjectBean->setFechaInicio($fechaDiaAbierto);
									$o_ObjectBean->setFechaFinal($fechaDiaAbierto);
									$o_ObjectBean->setFiltroSucursal($a_idColaborador);
									$o_ObjectBean->setEstado('P');
									$o_ObjectBean->tamPag = 9999;		 			
									$o_ObjectDP = new PrestamoDP($o_ObjectBean);
									$a_o_ObjectDP = $o_ObjectDP->select();
									
									if(is_array($a_o_ObjectDP) && count($a_o_ObjectDP)){
										$j=1;
										foreach ($a_o_ObjectDP as $key => $o_ObjectDP) {
											$idCliente = $o_ObjectDP->getIdCliente();
											$o_ClienteBean = new ClienteBean();
											$o_ClienteBean->setIdCliente($idCliente);
											$o_clieneteDP = new ClienteDP($o_ClienteBean);
											$a_cliente = $o_clieneteDP->selectByPk();
											$o_cliente = $a_cliente[0];
											$nombrecompleto = $o_cliente->getNombreCompleto();
											$a_transacciones[$j]['tipo_transaccion'] = "Prestamo";
											
											if($o_ObjectDP->getOrigen()=="F"){
												if($o_ObjectDP->getMontoExtra() > 0 ){
													$a_transacciones[$j]['tipo_transaccion'] ="Renovacion";
												}else{
													$a_transacciones[$j]['tipo_transaccion'] ="Refinanciacion";
												}
											}
											$a_transacciones[$j]['registro_latitud'] 		= (string)$o_ObjectDP->getRegistroLatitud();
											$a_transacciones[$j]['registro_longitud'] 		= (string)$o_ObjectDP->getRegistroLongitud();
											$a_transacciones[$j]['idcolaborador'] 			= (string)$o_ObjectDP->getIdColaborador();
											$a_transacciones[$j]['nombre_asesor'] 			= (string)$idCliente."-".$nombrecompleto;
											
											//$a_transacciones[$j]['nombre_asesor2'] 			= (string)$Asesor[$o_ObjectDP->getIdColaborador()];
											$a_transacciones[$j]['nombre_mercado'] 			= (string)$nombreMercado[$o_ObjectDP->getIdColaborador()];
											
											$a_transacciones[$j]['monto'] 				= (float)$o_ObjectDP->getMontoPrestado();
											$a_transacciones[$j]['hora_registro'] 			= (string)$o_ObjectDP->getFechaCreacion();
											$a_transacciones[$j]['hora_ingreso'] 			= (string)substr($o_ObjectDP->getFechaCreacion(),11,5);
											$j++;
										}
									}
									
									//Detalle y Suma de Pagos
									
									//echo $idColaborador."----";
									
									$o_ObjectBean = new PagoBean();
									$o_ObjectBean->setFechaPago($fechaDiaAbierto);
									$o_ObjectBean->setFechaFinal($fechaDiaAbierto);
									$o_ObjectBean->setIdColaborador($idColaborador);
									$o_ObjectBean->setIdColaboradores($a_idColaborador);
									$o_ObjectBean->tamPag = 9999;		 			
									
									$o_ObjectDP = new PagoDP($o_ObjectBean);
									$a_o_ObjectDP = $o_ObjectDP->select();
									
									if(is_array($a_o_ObjectDP) && count($a_o_ObjectDP)){
										$i = $j;
										
										foreach ($a_o_ObjectDP as $key => $o_ObjectDP) {
											/*
											echo "<pre>";
											print_r($o_ObjectDP);
											echo "</pre>";
											*/
											if($o_ObjectDP->getMontoPago() > 0){
												//print_r($o_ObjectDP);
												$idprestamo = $o_ObjectDP->getIdPrestamo();
												$o_PrestamoBean = new PrestamoBean();
												$o_PrestamoBean->setIdPrestamo($idprestamo);
												$o_PrestamoDP = new PrestamoDP($o_PrestamoBean);
												$a_o_PrestamoDP = $o_PrestamoDP->select();
												$o_Prestamo = $a_o_PrestamoDP[0];
												$idcliente = $o_Prestamo->getIdCliente();
												
												$idCliente = $o_ObjectDP->getIdCliente();
												$o_ClienteBean = new ClienteBean();
												$o_ClienteBean->setIdCliente($idcliente);
												$o_clieneteDP = new ClienteDP($o_ClienteBean);
												$a_cliente = $o_clieneteDP->selectByPk();
												$o_cliente = $a_cliente[0];
												$nombrecompleto = $o_cliente->getNombreCompleto();
												
												$a_transacciones[$i]['tipo_transaccion'] = "Pago";
												$sumaMontoPagado 	+= $o_ObjectDP->getMontoPago();
												
												$a_transacciones[$i]['idpago'] 			= (string)$o_ObjectDP->getIdPago();
												$a_transacciones[$i]['registro_latitud'] 		= (string)$o_ObjectDP->getRegistroLatitud();
												$a_transacciones[$i]['registro_longitud'] 		= (string)$o_ObjectDP->getRegistroLongitud();
												$a_transacciones[$i]['idcolaborador'] 			= (string)$o_ObjectDP->getIdColaborador();
												$a_transacciones[$i]['nombre_mercado'] 			= (string)$nombreMercado[$o_ObjectDP->getIdColaborador()];
												$a_transacciones[$i]['nombre_asesor'] 			= (string)$idcliente."-".$nombrecompleto;
												//$a_transacciones[$i]['nombre_asesor2'] 			= (string)$Asesor[$o_ObjectDP->getIdColaborador()];
												$a_transacciones[$i]['monto'] 					= $o_ObjectDP->getMontoPago();
												
												$a_transacciones[$i]['hora_registro'] 			= $o_ObjectDP->getFechaCreacion();
												$a_transacciones[$i]['hora_ingreso'] 			= (string)substr($o_ObjectDP->getFechaCreacion(),11,5);
												$i++;
											}
										}
									}
									/*
									echo "<pre>";
									print_r($a_transacciones);
									echo "</pre>";
									*/
									//$o_user = new user_class();
									//if ($o_user->findUser($idusuario)){
									
									//sort by parent_id in descending order
									if(is_array($a_transacciones)){
										$a_transacciones = multi_sort($a_transacciones, "hora_registro", false);
									}else{
										$a_transacciones = 0;
									}
									/*
									echo "<pre>";
									print_r($a_transacciones);
									echo "</pre>";
									*/
									$a_resultado["registros"]  		= $a_transacciones;
									
									$a_resultado['estado'] = "1";
									$a_resultado['mensaje'] = "Exito";
								}
							}else{
								$a_resultado['estado'] = "40";
								$a_resultado['mensaje'] = "No existe el usuario";
							}
						}
					break;	
					default:
						$a_resultado['estado'] = "80";
						$a_resultado['mensaje'] = "jjjjjjjjj";
			}
		
	
		}else{
			$a_resultado['estado'] = "33";
			$a_resultado['mensaje'] = "Usuario no permitido";
		}		
	}
	else
	{
		$a_resultado['estado'] = "3";
		$a_resultado['mensaje'] = "Token No valido";
		
	}
}
	
if(is_array($a_resultado)){
	$a_respuesta["resultado"] = $a_resultado;
	//echo "<pre>";	
	//print_r($a_resultado);
	
	print json_encode($a_respuesta,JSON_UNESCAPED_UNICODE);
	
	$cadena_log = json_encode($a_respuesta);

	guardar_log($cadena_log,$usuario,$metodo);
	
	//echo "</pre>";
}		



?>