/**
  * Funcion que asiste en la Ministracion del Credito
  */
 function setMinistrar($recibo_fiscal, $cheque, $monto_cheque = 0, $cuenta_cheques = false, $cheque2 = 0, $cuenta_cheques2 = 0, $observaciones = "", $fecha = false, $recibo = false, $tipo_de_pago = TESORERIA_PAGO_CHEQUE)
 {
     $sucess = true;
     $monto_cheque = $monto_cheque == 0 ? $this->getMontoAutorizado() : $monto_cheque;
     $cuenta_cheques = $cuenta_cheques == false ? DEFAULT_CUENTA_BANCARIA : $cuenta_cheques;
     $cheque = setNoMenorQueCero($cheque);
     $xSocio = new cSocio($this->mNumeroSocio);
     $xSocio->init();
     //Corrige la Inicializacion del credito
     if (!isset($this->mNumeroSocio) or $this->mNumeroSocio == 1) {
         $this->init();
     }
     $DIngreso = $xSocio->getDatosDeIngreso_InArray();
     $msg = "";
     //$tipo_de_pago			= TESORERIA_PAGO_CHEQUE;
     $recibo = setNoMenorQueCero($recibo);
     $DConvenio = $this->getDatosDeProducto();
     $idsolicitud = $this->mNumeroCredito;
     $solicitud = $this->mNumeroCredito;
     /* ------------------------------ obtiene el Monto Autorizado ---------------------------------- */
     $dsol = $this->getDatosDeCredito();
     $montoaut = $this->getMontoAutorizado();
     // $dsol["monto_autorizado"];	// Monto Autorizado
     $fvcred = $dsol["fecha_vencimiento"];
     $modpagos = $this->getPeriocidadDePago();
     $tasacred = $this->getTasaDeInteres();
     $totalop = $montoaut;
     $tipoaut = $dsol["tipo_autorizacion"];
     $socio = $this->mNumeroSocio;
     $intdi = $dsol["interes_diario"];
     $diasa = $dsol["dias_autorizados"];
     $tipoconvenio = $dsol["tipo_convenio"];
     $elgrupo = $dsol["grupo_asociado"];
     $grupo = $elgrupo;
     $idsocio = $socio;
     $fecha_propuesta = $dsol["fecha_ministracion"];
     $tasa_ordinaria_de_interes = $tasacred;
     $monto_autorizado_a_ministrar = $dsol["monto_autorizado"];
     $grupo = $this->mGrupoAsociado;
     if ($fecha == false) {
         $fecha = $this->mFechaOperacion;
     }
     $socio = $this->mNumeroSocio;
     //Valores conservados
     $fechavcto = $fvcred;
     $diasaut = $diasa;
     $intdiario = $intdi;
     /**
      * Corrige la opcion de que el Cheque es Igual a Cero
      */
     if ($monto_cheque == 0) {
         $monto_cheque = $montoaut;
     }
     //Corrige el dato de recibo no valido
     if ($recibo <= 0 and setNoMenorQueCero($this->mReciboDeOperacion) > 0) {
         $recibo = $this->mReciboDeOperacion;
     }
     /*	--------------------------------------------------------------------------------------------------------- */
     $OConv = $this->getOProductoDeCredito($tipoconvenio);
     if ($this->mForceMinistracion == false) {
         // Checa si el credito ya fue Ministrado
         //Modificar
         $montomin = $this->getSumMovimiento(OPERACION_CLAVE_MINISTRACION);
         if ($montomin > 1) {
             $msg .= "ERROR\tEl credito se ha ministrado de forma parcial / Total, o se ha forzado su edicion; el Monto Ministrado es {$montomin} \r\n";
             $sucess = false;
         }
     }
     // verificar si tiene aportaciones sociales
     if ($this->mForceMinistracion == false) {
         $aportaciones = $xSocio->getAportacionesSociales();
         $cuotas = $DIngreso["parte_social"] + $DIngreso["parte_permanente"];
         if ($aportaciones < $cuotas) {
             $msg .= "ERROR\tNo ha Pagado sus Cuotas Sociales por {$cuotas}, ha pagado {$aportaciones} \r\n";
             $sucess = false;
         }
     }
     // verificar si pago su fondo de defuncion. // SI ES DIFERENTE A AUTOMATIZADO
     if ($this->mForceMinistracion == false) {
         $fondo_def_ob = $DConvenio["monto_fondo_obligatorio"];
         $fondo_def_pag = $xSocio->getFondoDeDefuncion();
         if ($fondo_def_pag < $fondo_def_pag) {
             $msg .= "ERROR\tNo ha Pagado sus Fondo de Defuncion por {$fondo_def_pag}, ha pagado {$fondo_def_pag} \r\n";
             $sucess = false;
         }
     }
     // condiciones del credito autorizado por sesion de credito.
     //si el convenio Aplica Gtos Notariales
     $aplica_gtos_not = $DConvenio["aplica_gastos_notariales"];
     if ($aplica_gtos_not == 1 and $this->mForceMinistracion == false) {
         $gastos_not_pagados = $this->getPagoDeGastosNotariales();
         if ($gastos_not_pagados < TOLERANCIA_SALDOS) {
             $msg .= "ERROR\tNo ha Pagado sus Gastos Notariales\r\n";
             $sucess = false;
         }
     }
     // verificar si tiene garantia liquida
     $porc_garantia_liquida = $OConv->getTasaDeGarantiaLiquida();
     if ($porc_garantia_liquida > 0 and $this->mForceMinistracion == false) {
         $msg .= "WARN\tLa Garantia Liquida es de {$porc_garantia_liquida} sobre el Monto Autorizado\r\n";
         if ($OConv->getEsProductoDeGrupos() == true) {
             $condicionante_de_garantia_liquida = " (`socios_general`.`grupo_solidario` = {$elgrupo}) ";
             $msg .= "WARN\tLa Garantia Liquida es valuado por GRUPO \r\n";
         } else {
             $condicionante_de_garantia_liquida = " (`socios_general`.`codigo` = {$idsocio})";
             $msg .= "WARN\tLa Garantia Liquida es valuado por SOCIO \r\n";
         }
         $tgtia = $montoaut * $porc_garantia_liquida;
         $subproducto_de_ahorro_inicial = CAPTACION_PRODUCTO_GARANTIALIQ;
         $sqlSUMDepInicial = "\n\t\t\t\t\t\t\t\t\t\t\t\tSELECT\n\t\t\t\t\t\t\t\t\t\t\t\t\t`socios_general`.`grupo_solidario`,\n\t\t\t\t\t\t\t\t\t\t\t\t\tSUM(`captacion_cuentas`.`saldo_cuenta`) AS 'sumas'\n\t\t\t\t\t\t\t\t\t\t\t\tFROM\n\t\t\t\t\t\t\t\t\t\t\t\t\t`socios_general` `socios_general`\n\t\t\t\t\t\t\t\t\t\t\t\t\t\tINNER JOIN `captacion_cuentas` `captacion_cuentas`\n\t\t\t\t\t\t\t\t\t\t\t\t\t\tON `socios_general`.`codigo` = `captacion_cuentas`.`numero_socio`\n\t\t\t\t\t\t\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t\t\t\t\t\t\t\t(`captacion_cuentas`.`tipo_subproducto` ={$subproducto_de_ahorro_inicial})\n\t\t\t\t\t\t\t\t\t\t\t\t\tAND\n\t\t\t\t\t\t\t\t\t\t\t\t\t{$condicionante_de_garantia_liquida}\n\t\t\t\t\t\t\t\t\t\t\t\tGROUP BY\n\t\t\t\t\t\t\t\t\t\t\t\t\t`socios_general`.`grupo_solidario`,\n\t\t\t\t\t\t\t\t\t\t\t\t\t`captacion_cuentas`.`tipo_cuenta` ";
         $garliq = mifila($sqlSUMDepInicial, "sumas");
         if ($garliq < $tgtia - TOLERANCIA_SALDOS) {
             $msg .= "ERROR\tNo ha depositado el su totalidad la Garantia Liquida, ha Depositado {$garliq} de un total de {$tgtia} \r\n";
             $msg .= "WARN\tRecuerde que el DEPOSITO DE LA GARANTIA LIQUIDA se efectua en el Modulo de Captacion \r\n";
             $sucess = false;
         }
     }
     //END: verificar Garantia
     // VERIFICA LA GARANTIA SEGUN TIPO CONVENIO.- La seleccion se hace segun el Numero de Socio y no debe estar entregada
     // NO APLICA EN GRUPOS SOLIDARIOS
     $razon_garantias = $DConvenio["razon_garantia"];
     if ($razon_garantias > 0 and $this->mForceMinistracion == false) {
         $monto_garantizado = $xSocio->getGarantiasFisicasDepositadas();
         $monto_a_garantizar = $montoaut * $razon_garantias;
         if ($monto_garantizado < $monto_a_garantizar) {
             $msg .= "ERROR\tNo ha garantizado el Total del Credito, se debe garantizar {$monto_a_garantizar} y solamente se tiene en resguardo {$monto_garantizado} \r\n";
             $sucess = false;
         }
     }
     // SI EL CREDITO ES AUTOMATIZADO
     if ($modpagos == CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO) {
         $diasaut = restarfechas($fechavcto, $fecha);
         //$dsol["dias_autorizados"];				// Dias Autorizados.
         $msg .= "WARN\tLos dias Autorizados se cambian a {$diasaut}\r\n";
         //$fechavcto 	= sumardias($fecha, $diasaut);				// Fecha del Sistema + Dias Autorizados
         $intdiario = $montoaut * $tasacred / EACP_DIAS_INTERES;
     } else {
         //Verifica si existe el Plan de Pagos:
         $sqlck = "SELECT COUNT(tipo_docto) AS 'planes' FROM operaciones_recibos WHERE docto_afectado={$idsolicitud} AND tipo_docto=11";
         $plan = $this->getNumeroDePlanDePagos();
         if (!isset($plan) or empty($plan)) {
             $msg .= "ERROR\tNo se ha Generado el PLAN DE PAGOS \r\n";
             $sucess = false;
         }
         if (strtotime($fecha) != strtotime($fecha_propuesta)) {
             $msg .= "ERROR\tNo se puede ministrar el Credito({$fecha}), ya que el PLAN DE PAGO de calcula desde la fecha " . getFechaLarga($fecha_propuesta) . ", vuelva a elaborar el PLAN DE PAGOS\r\n";
             $sucess = false;
         }
     }
     //VERIFICA EL ICA A PAGAR
     $razon_interes_anticipado = $DConvenio["porcentaje_ica"];
     $iva_incluido = $DConvenio["iva_incluido"];
     $tasa_iva = $DConvenio["tasa_iva"];
     //RULE: Modificar segun el Tipo de pago
     if ($razon_interes_anticipado > 0 and $this->mForceMinistracion == false) {
         // verifica si tiene el Pago de Int Anticipado
         $sumia = $dsol["sdo_int_ant"];
         $mIntDiario = $monto_autorizado_a_ministrar * $tasa_ordinaria_de_interes / EACP_DIAS_INTERES;
         $mntia = $mIntDiario * $diasa * $razon_interes_anticipado - TOLERANCIA_SALDOS;
         $MontoICA = $mntia;
         if ($iva_incluido == '1') {
             $MontoICA = $MontoICA * (1 / (1 + $tasa_iva));
         }
         if ($sumia < $MontoICA) {
             $msg .= "ERROR\tNo se ha cubierto el Interes Anticipado, se ha pagado {$sumia} de {$MontoICA} \r\n";
             $sucess = false;
         } else {
             //
         }
     }
     if ($this->mForceMinistracion == true) {
         $sucess = true;
         $msg .= "WARN\tLa Ministracion es FORZADA \r\n";
     }
     /*------------------------------- AFECTACIONES ------------------------------------------------- */
     if ($sucess == true) {
         $monto = $montoaut;
         $parcialidad = 1;
         if ($monto != 0) {
             $CRecibo = new cReciboDeOperacion(RECIBOS_TIPO_MINISTRACION, true, $recibo);
             //Set a Mvto Contable
             //$CRecibo->setGenerarPoliza();
             $CRecibo->setGenerarTesoreria();
             $CRecibo->setGenerarBancos(true);
             //Agregar recibo si no hay
             if (setNoMenorQueCero($recibo) <= 0) {
                 $recibo = $CRecibo->setNuevoRecibo($socio, $solicitud, $fecha, $parcialidad, RECIBOS_TIPO_MINISTRACION, $observaciones, $cheque, $tipo_de_pago, $recibo_fiscal, $grupo);
                 //Checar si se agrego el recibo
                 if (setNoMenorQueCero($recibo) > 0) {
                     $this->mMessages .= "OK\tSe Agrego Exitosamente el Recibo {$recibo} de la Cuenta " . $this->mNumeroCredito . " \r\n";
                     $this->mReciboDeOperacion = $recibo;
                     $this->mSucess = true;
                 } else {
                     $this->mMessages .= "ERROR\tSe Fallo al Agregar el Recibo {$recibo} de la Cuenta " . $this->mNumeroCredito . " \r\n";
                     $this->mSucess = false;
                 }
             }
             $this->mReciboDeOperacion = $recibo;
             if (setNoMenorQueCero($recibo) > 0) {
                 //Agregar el Movimiento
                 $CRecibo->setNuevoMvto($fecha, $monto, OPERACION_CLAVE_MINISTRACION, $parcialidad, $observaciones, 1, TM_CARGO, $socio, $solicitud);
                 /** @since 2010-11-21 */
                 $this->addSDPM(0, 0, $fecha, 0, CREDITO_ESTADO_VIGENTE, $fecha, OPERACION_CLAVE_MINISTRACION);
                 //$this->mMessages	.= $CRecibo->getMessages();
                 $this->mSucess = true;
             } else {
                 $this->mMessages .= "ERROR\tNo Existe Recibo con el cual trabajar ({$recibo}) \r\n";
             }
             $CRecibo->setFinalizarRecibo(true);
             $this->mMessages .= $CRecibo->getMessages();
         }
         // Actualiza el estatus del credito a Vigente, la fecha de Operacion y la de vencimiento.
         $arrAct = array("fecha_ministracion" => $fecha, "fecha_ultimo_mvto" => $fecha, "estatus_actual" => CREDITO_ESTADO_VIGENTE, "fecha_vencimiento" => $fechavcto, "plazo_en_dias" => $diasaut, "dias_autorizados" => $diasaut, "interes_diario" => $intdiario, "saldo_actual" => $montoaut);
         $this->setUpdate($arrAct);
         // --------------------------------- ENVIA LAS SENTENCIAS SQL----------------------------------------
         //verifica la dif entre cheque 1 y el monto a ministrar
         if ($monto_cheque <= 0) {
             $monto_cheque = $montoaut;
         }
         $difCheque = $montoaut - $monto_cheque;
         $beneficiario = $xSocio->getNombreCompleto();
         $descuento = 0;
         //Separar la generaciĆ³n del cheque
         setNuevoCheque($cheque, $cuenta_cheques, $recibo, $beneficiario, $monto_cheque, $fecha, false, $descuento);
         setUltimoCheque($cuenta_cheques, $cheque);
         if ($difCheque > 0) {
             //setPolizaProforma($recibo, 9200, $difCheque, $socio, $idsolicitud, TM_ABONO);
             setNuevoCheque($cheque2, $cuenta_cheques2, $recibo, $beneficiario, $difCheque, $fecha, false, $descuento);
             setUltimoCheque($cuenta_cheques2, $cheque2);
         }
         //Agregar Avisos de Credito por renovacion
         if ($this->getTipoDeAutorizacion() == CREDITO_TIPO_AUTORIZACION_RENOVACION) {
             //$xSoc		= $this->getOPersona();
             $xSocio->initDatosDeCredito();
             $DCreds = $xSocio->getDatosDeCreditos();
             $xCred = new cCreditos_solicitud();
             foreach ($DCreds as $clave => $valores) {
                 $xCred->setData($valores);
                 if ($xCred->saldo_actual()->v() >= TOLERANCIA_SALDOS) {
                     if ($xCred->numero_solicitud()->v() != $this->getNumeroDeCredito()) {
                         //agregar aviso
                         $xSocio->addMemo(MEMOS_TIPO_NOTA_RENOVACION, "Credito Renovado en la solicitud #" . $this->getNumeroDeCredito(), $xCred->numero_solicitud()->v(), $fecha);
                         $msg .= $xSocio->getMessages();
                     }
                 }
             }
         }
         //ejecutar alertas por Ministracion de Reglas de Negocios
         //Ministracion de Credito de la persona {clave_de_persona} {nombre_de_persona}
         //credito numero {clave_de_credito} con monto {monto_de_credito} y tipo de autorizacion {tipo_de_autorizacion}.
         $OTipoAut = new cCreditos_tipo_de_autorizacion();
         $OTipoAut->setData($OTipoAut->query()->initByID($this->getTipoDeAutorizacion()));
         $xRegla = new cReglaDeNegocio();
         $xRegla->setVariables(array("clave_de_persona" => $xSocio->getCodigo(), "nombre_de_persona" => $xSocio->getNombreCompleto(), "clave_de_credito" => $this->getNumeroDeCredito(), "monto_de_credito" => $this->getMontoAutorizado(), "tipo_de_autorizacion" => $OTipoAut->descripcion_tipo_de_autorizacion()->v(OUT_TXT)));
         $xRegla->setExecuteActions($xRegla->reglas()->RN_MINISTRAR_CREDITO);
     } else {
         $msg .= "ERROR\tNo se efectua operacion alguna\r\n";
     }
     $this->mMessages .= $msg;
     return $recibo;
 }
             }
         }
     } else {
         if ($idlocalidad > 0) {
             $xDLoc = new cDomicilioLocalidad($idlocalidad);
             if ($xDLoc->init() == true) {
                 $localidad_ae = $xDLoc->getNombre();
                 $estado_ae = $xDLoc->getNombre();
             }
         }
     }
     //TODO: Terminar
     $success = $xSoc->addVivienda($calle, $nexterior, $cp, "", "", $telefono_ae, "", false, PERSONAS_REG_VIV_NINGUNO, PERSONAS_TIPO_DOM_LABORAL, $antiguedad_ae, $nombrecolonia, PERSONAS_TIPO_ACCESO_CALLE, "", $idlocalidad, $pais, "", $estado_ae, $municipio_ae, $localidad_ae);
     if ($success == true) {
         $iddomicilio = $xSoc->getIDDeVivienda();
         $xAE = new cPersonaActividadEconomica($xSoc->getCodigo());
         if ($empresa != FALLBACK_CLAVE_EMPRESA) {
             $xAE->setEmpresa($empresa, $puesto, $departamento_ae, $numero_empleado, $nss, $extension_ae);
         }
         if ($iddomicilio > 1) {
             $xAE->setDomicilioVinculado($iddomicilio);
         }
         $success = $xAE->add($tipo_ae, $montoper_ae, $antiguedad_ae, $nombre_ae, $cp, $telefono_ae, $idlocalidad);
         $msg .= $xAE->getMessages();
     }
     if ($success == true) {
         $xFRM->addAvisoRegistroOK();
     } else {
         $xFRM->addAvisoRegistroError();
     }
 } else {
         $integrantes[] = parametro("idsocio6", false, MQL_INT);
         $integrantes[] = parametro("idsocio7", false, MQL_INT);
         $integrantes[] = parametro("idsocio8", false, MQL_INT);
         $integrantes[] = parametro("idsocio9", false, MQL_INT);
         foreach ($integrantes as $key => $idpersona) {
             if (setNoMenorQueCero($idpersona) > DEFAULT_SOCIO) {
                 $xGrupo->addIntegrante($idpersona);
             }
         }
         if (MODO_DEBUG == true) {
             $msg .= $xGrupo->getMessages();
         }
     }
 }
 //Agregar Domicilio si existe
 $persona = $xSoc->getCodigo();
 $xFRM->addHTML($xSoc->getFicha());
 $lastpersona = $xCL->getUltimoSocioRegistrado(true);
 $xFRM->addPersonaComandos($persona);
 $xFRM->addAvisoRegistroOK();
 //==================================== Nuevas Relaciones
 if ($origen_relacion == false) {
     $xTbl = new cHTabla("idtblrels");
     $xHSel = new cHSelect();
     $xChk = new cHCheckBox();
     $xText = new cHText();
     $xText->setDivClass("");
     $xChk->setDivClass("");
     $xBtn = new cHButton();
     $xUl = new cHUl();
     $li = $xUl->getO();
 function getOPersona()
 {
     if ($this->mObjPersona == null) {
         $xSoc = new cSocio($this->mClaveDePersona);
         if ($xSoc->init($this->mClaveDePersona) == true) {
             $this->mMessages .= "OK\tPersona Cargada con el ID " . $xSoc->getCodigo() . "\r\n";
             $this->mObjPersona = $xSoc;
         } else {
             $this->mMessages .= "ERROR\tAl cargar persona con el ID " . $this->mClaveDePersona . "\r\n";
         }
     }
     return $this->mObjPersona;
 }
$codigo_postal = parametro("idcodigopostal");
$referencia = parametro("idreferencia");
$numero_interior = parametro("idnumero");
$curp = parametro("curp");
$observaciones = parametro("observaciones");
$consanguinidad = parametro("consan");
$depende = parametro("depende");
$ocupacion = parametro("ocupacion");
$rfc = "";
$grupo_solidario = DEFAULT_GRUPO;
$genero = DEFAULT_GENERO;
$tipo_persona = TIPO_JURIDICO_FISICA;
$numero_de_socio = $numero_de_socio == DEFAULT_SOCIO ? false : $numero_de_socio;
$xRel = new cSocio($numero_de_socio);
//$email					= $xRel->getCorreoElectronico();
if ($xRel->existe() != true) {
    $xRel->add($nombres, $apellido_paterno, $apellido_materno, $rfc, $curp, getCajaLocal(), $fecha_de_nacimiento, "", TIPO_INGRESO_RELACION, DEFAULT_ESTADO_CIVIL, $genero, DEFAULT_EMPRESA, DEFAULT_REGIMEN_CONYUGAL, $tipo_persona, $grupo_solidario, $observaciones, DEFAULT_TIPO_IDENTIFICACION, "", false, false, $telefono_movil, "", 0);
    if (trim($calle) != "") {
        $xRel->addVivienda($calle, $numero, $codigo_postal, "", $referencia, $telefono_fijo, $telefono_movil, TIPO_DOMICILIO_PRINCIPAL, TIPO_VIVIENDA_PROPIA, TIPO_DOMICILIO_PARTICULAR, DEFAULT_TIEMPO, $colonia, "calle");
    }
    if (trim($ocupacion) != "") {
        $xRel->addActividadEconomica("", 0, $ocupacion, DEFAULT_TIEMPO, DEFAULT_EMPRESA);
    }
    $xRel->init();
    $numero_de_socio = $xRel->getCodigo();
}
$xSoc = new cSocio($idsocio);
$xSoc->addRelacion($numero_de_socio, $tipo_de_relacion, $consanguinidad, $depende, $observaciones, $monto_relacionado, $porcentaje_relacionado);
//echo $xRel->getMessages("txt");
//echo $xSoc->getMessages("txt");
header("location:referencias.directas.frm.php?msg=OK&socio=" . $idsocio);
$persona = parametro("persona", DEFAULT_SOCIO, MQL_INT);
$persona = parametro("socio", $persona, MQL_INT);
$persona = parametro("idsocio", $persona, MQL_INT);
$relacionado = parametro("relacionado", DEFAULT_SOCIO, MQL_INT);
$tipo = parametro("tipo", 0, MQL_INT);
$parentesco = parametro("parentesco", 0, MQL_INT);
$depende = parametro("depende", false, MQL_BOOL);
$documento = parametro("documento", false, MQL_INT);
$error = false;
$format = parametro("out", "", MQL_STRING);
header('Content-type: application/json');
$json = "";
if ($persona > DEFAULT_SOCIO) {
    $xPer = new cSocio($persona);
    if ($xPer->init() == true) {
        $xRels = new cPersonasRelaciones(false, $xPer->getCodigo());
        echo $xRels->getBuildArbol("json");
        //setLog($lis->getListadoDeRelaciones($persona));
        $error = false;
    } else {
        $error = true;
        $txt .= "ERROR\tNo existe la persona {$persona}\r\n";
    }
    if (MODO_DEBUG == true) {
        $txt .= $xPer->getMessages();
    }
}
if ($error == true) {
    $rs["error"] = true;
    $rs["msg"] = $txt;
    echo json_encode($rs);
 function setPersona($clave_de_persona)
 {
     $this->mPersona = $clave_de_persona;
     $cSoc = new cSocio($clave_de_persona);
     $fichas_de_respsolidarios = "";
     $firmas_de_respsolidarios = "";
     if ($cSoc->init() == true) {
         $domicilio_del_socio = $cSoc->getDomicilio();
         $ficha_socio = $cSoc->getFicha(true, true);
         $xODom = $cSoc->getODomicilio();
         $xOAE = $cSoc->getOActividadEconomica();
         //Caja local por SQL
         $SQLCL = "SELECT idsocios_cajalocal, descripcion_cajalocal, ultimosocio, region, sucursal FROM socios_cajalocal WHERE idsocios_cajalocal=" . $cSoc->getNumeroDeCajaLocal();
         $caja_local = mifila($SQLCL, "descripcion_cajalocal");
         $xFecha = new cFecha();
         $this->mArr["variable_domicilio_del_socio"] = $domicilio_del_socio;
         $this->mArr["variable_rfc_del_socio"] = $cSoc->getRFC();
         $this->mArr["variable_curp_del_socio"] = $cSoc->getCURP();
         $this->mArr["variable_numero_de_socio"] = $cSoc->getCodigo();
         $this->mArr["variable_nombre_caja_local"] = $caja_local;
         $this->mArr["variable_informacion_del_socio"] = $ficha_socio;
         $this->mArr["variable_fecha_de_nacimiento_del_socio"] = $xFecha->getFechaMediana($cSoc->getFechaDeNacimiento());
         $this->mArr["variable_ciudad_de_nacimiento_del_socio"] = $cSoc->getLugarDeNacimiento();
         if ($xODom != null) {
             $this->mArr["variable_sin_ciudad_domicilio_del_socio"] = $xODom->getDireccionBasica();
             $this->mArr["variable_ciudad_del_socio"] = $xODom->getCiudad();
             $this->mArr["variable_persona_domicilio_municipio"] = $xODom->getMunicipio();
         }
         if ($xOAE != null) {
             $this->mArr["variable_actividad_economica_del_socio"] = $xOAE->getPuesto();
             $this->mArr["variable_estado_de_actividad_economica"] = $xOAE->getNombreEstado();
             $this->mArr["variable_municipio_de_actividad_economica"] = $xOAE->getNombreMunicipio();
             $this->mArr["variable_nombre_de_la_empresa"] = $xOAE->getNombreEmpresa();
             $this->mArr["variable_socio_actividad_ciudad"] = $xOAE->getLocalidad();
             $this->mArr["variable_socio_actividad_telefono"] = $xOAE->getTelefono();
         }
         $this->mArr["variable_nombre_del_socio"] = $cSoc->getNombreCompleto();
         $this->mArr["variable_persona_nombre_completo"] = $cSoc->getNombreCompleto();
         $idestadocivil = $cSoc->getEstadoCivil();
         $DEstadoCivil = new cSocios_estadocivil();
         $DEstadoCivil->setData($DEstadoCivil->query()->initByID($idestadocivil));
         $nombre_estadocivil = $DEstadoCivil->descripcion_estadocivil()->v();
         $this->mArr["variable_estado_civil_del_socio"] = $nombre_estadocivil;
         $firmas_de_respsolidarios = $cSoc->getCoResponsables("firmas");
     } else {
         if (MODO_DEBUG == true) {
             setLog($cSoc->getMessages());
         }
     }
     $this->mArr["variable_responsable_solidario_en_fichas"] = $fichas_de_respsolidarios;
     $this->mArr["variable_firmas_de_obligados_solidarios"] = $firmas_de_respsolidarios;
 }
function JsaGetDatosHeredados($socio)
{
    $xSoc = new cSocio($socio);
    $xSoc->init();
    $sucess = true;
    $telefono = "";
    $domicilio = "";
    $telefonomovil = "";
    $nombre = "";
    $appPaterno = "";
    $appMaterno = "";
    $NDia = "";
    $NMes = "";
    $NAnno = "";
    $actividad = "";
    /**
     * Si el Numero de Socio es menor a 5 digitos
     */
    //if ( strlen($curp) >= 7){
    $DDom = $xSoc->getDatosDomicilio();
    $telefono = $DDom["telefono_residencial"];
    $telefonomovil = $DDom["telefono_movil"];
    $nombre = $xSoc->getNombre();
    $appPaterno = $xSoc->getApellidoPaterno();
    $appMaterno = $xSoc->getApellidoMaterno();
    $curp = $xSoc->getCURP();
    $FNacimiento = $xSoc->getFechaDeNacimiento();
    $NDia = date("d", strtotime($FNacimiento));
    $NMes = date("n", strtotime($FNacimiento));
    $NAnno = date("Y", strtotime($FNacimiento));
    //$num			= $DDom["Resultado"];
    $DOcup = $xSoc->getDatosActividadEconomica();
    //$domicilio		= $xSoc->getDomicilio();
    $actividad = $DOcup["puesto"];
    $socio = $xSoc->getCodigo();
    //if ($num == 1){ $sucess = true; }
    //}
    //idelmes0 idelanno0 ideldia0
    $tab = new TinyAjaxBehavior();
    if ($sucess == true) {
        $tab->add(TabSetvalue::getBehavior("idTFijo", $telefono));
        //$tab->add(TabSetvalue::getBehavior("idDomicilio", $domicilio));
        $tab->add(TabSetvalue::getBehavior("idTMovil", $telefonomovil));
        $tab->add(TabSetvalue::getBehavior("idNombres", $nombre));
        $tab->add(TabSetvalue::getBehavior("idApPaterno", $appPaterno));
        $tab->add(TabSetvalue::getBehavior("idApMaterno", $appMaterno));
        $tab->add(TabSetvalue::getBehavior('idCurp', $curp));
        $tab->add(TabSetvalue::getBehavior('ideldia0', $NDia));
        $tab->add(TabSetvalue::getBehavior('idelmes0', $NMes));
        $tab->add(TabSetvalue::getBehavior('idelanno0', $NAnno));
        $tab->add(TabSetvalue::getBehavior("idOcupacion", $actividad));
        //$tab->add(TabSetvalue::getBehavior("idNumeroSocio", $socio));
        $tab->add(TabSetvalue::getBehavior("idNumeroSocio", $socio));
        //-
        $tab->add(TabSetvalue::getBehavior("idcolonia", $DDom["colonia"]));
        $tab->add(TabSetvalue::getBehavior("idcalle", $DDom["calle"]));
        $tab->add(TabSetvalue::getBehavior("idnumero", $DDom["numero_exterior"]));
        $tab->add(TabSetvalue::getBehavior("idreferencia", $DDom["referencia"]));
        $tab->add(TabSetvalue::getBehavior("idcodigopostal", $DDom["codigo_postal"]));
    }
    //$tab -> add(TabSetvalue::getBehavior('idObservaciones', $xSoc->getMessages() ));
    return $tab->getString();
    //}
}
                             $numero = "";
                             $codigo_postal = DEFAULT_CODIGO_POSTAL;
                             $numero_interior = "";
                             $referencia = "";
                             $telefono_fijo = $cT->cChar(trim($datos[18]));
                             $telefono_movil = $cT->cChar(trim($datos[17]));
                             $es_principal = TIPO_DOMICILIO_PRINCIPAL;
                             $regimen_vivienda = TIPO_VIVIENDA_PROPIA;
                             $relRFC = "";
                             $tipo_persona = TIPO_JURIDICO_FISICA;
                             $tipo_relacion = $arrRefTipo[trim($datos[5])];
                             $xRel->add($relNombre, $relApPat, $relApMat, $relRFC, "", getCajaLocal(), false, "", TIPO_INGRESO_RELACION, DEFAULT_ESTADO_CIVIL, $relGenero, DEFAULT_EMPRESA, DEFAULT_REGIMEN_CONYUGAL, $tipo_persona, $grupo_solidario, "", DEFAULT_TIPO_IDENTIFICACION, "", $idRelSocio, false, "{$relTelP}", "{$relMail}", 0);
                             //Agregar domicilio
                             $xRel->addVivienda($relCalle, $numero, $codigo_postal, $numero_interior, $referencia, $telefono_fijo, $telefono_movil, $es_principal, $regimen_vivienda, TIPO_DOMICILIO_PARTICULAR, DEFAULT_TIEMPO, $relColonia);
                             $xRel->init();
                             $xSoc->addRelacion($xRel->getCodigo(), $tipo_relacion, DEFAULT_TIPO_CONSANGUINIDAD, 1, "Importado");
                             $msg .= $xSoc->getMessages("txt");
                             $msg .= $xRel->getMessages("txt");
                         }
                     }
                     $iReg++;
                 }
             }
             fclose($gestor);
             $xLog->setWrite($msg);
             echo $xLog->getLinkDownload("Archivo del proceso");
         } else {
             echo "<p class='aviso'>EL TIPO DE ARCHIVO DE " . $usrFiles[$i]['name'] . "(" . $mExt . ") NO SE ACEPTA</p>";
         }
     }
 }
function jsaGetDatosDePersona($persona)
{
    $xSoc = new cSocio($persona);
    $xSoc->init();
    $sucess = true;
    $telefono = "";
    $domicilio = "";
    $telefonomovil = "";
    $nombre = "";
    $appPaterno = "";
    $appMaterno = "";
    $NDia = "";
    $NMes = "";
    $NAnno = "";
    $actividad = "";
    /**
     * Si el Numero de Socio es menor a 5 digitos
     */
    $DDom = $xSoc->getDatosDomicilio();
    $telefono = $xSoc->getTelefonoPrincipal();
    $nombre = $xSoc->getNombre();
    $appPaterno = $xSoc->getApellidoPaterno();
    $appMaterno = $xSoc->getApellidoMaterno();
    $curp = $xSoc->getCURP();
    $FNacimiento = $xSoc->getFechaDeNacimiento();
    $DOcup = $xSoc->getDatosActividadEconomica();
    $actividad = $DOcup["puesto"];
    $socio = $xSoc->getCodigo();
    $tab = new TinyAjaxBehavior();
    if ($sucess == true) {
        $tab->add(TabSetvalue::getBehavior("telefono", $telefono));
        $tab->add(TabSetvalue::getBehavior("nombre", $nombre));
        $tab->add(TabSetvalue::getBehavior("paterno", $appPaterno));
        $tab->add(TabSetvalue::getBehavior("materno", $appMaterno));
        $tab->add(TabSetvalue::getBehavior('curp', $curp));
        $tab->add(TabSetvalue::getBehavior("ocupacion", $actividad));
        $tab->add(TabSetvalue::getBehavior("ingreso", $xSoc->getIngresosMensuales()));
        //$tab->add(TabSetvalue::getBehavior("personarelacionada", $persona));
        // "idnombrecolonia" "identidadesfederativas"
        if ($xSoc->getODomicilio() == null) {
        } else {
            $tab->add(TabSetvalue::getBehavior("idnombrecolonia", $DDom["colonia"]));
            $tab->add(TabSetvalue::getBehavior("idnombreacceso", $DDom["calle"]));
            $tab->add(TabSetvalue::getBehavior("idnumeroexterior", $DDom["numero_exterior"]));
            $tab->add(TabSetvalue::getBehavior("idcodigopostal", $DDom["codigo_postal"]));
            if (PERSONAS_VIVIENDA_MANUAL == true) {
                $tab->add(TabSetvalue::getBehavior("idnombrelocalidad", $DDom["localidad"]));
                $tab->add(TabSetvalue::getBehavior("idnombremunicipio", $DDom["municipio"]));
            } else {
            }
        }
    }
    //$tab -> add(TabSetvalue::getBehavior('idObservaciones', $xSoc->getMessages() ));
    return $tab->getString();
}