} else {
             $estado = $DEstado[0];
         }
         //Obtener pais
         $pais = trim($xFil->cleanString($xFil->getV(5), array("/-0-/")));
         $sqlPais = "SELECT * FROM `personas_domicilios_paises` WHERE `nombre_oficial` SOUNDS LIKE '%{$pais}%' LIMIT 0,1";
         $idpais = mifila($sqlPais, "clave_de_control");
         $idpais = $idpais == 0 ? EACP_CLAVE_DE_PAIS : $idpais;
         //Obtener Localidad
         $sqllocal = "SELECT * FROM `catalogos_localidades` WHERE `nombre_de_la_localidad` LIKE '%{$estado} {$pais}%' LIMIT 0,1";
         $DLocal = $xQL->getDataRow($sqllocal);
         if (setNoMenorQueCero($DLocal["clave_unica"]) > 0) {
             $idlocal = setNoMenorQueCero($DLocal["clave_unica"]);
             $localidad = $DLocal["nombre_de_la_localidad"];
         }
         $xSoc->addVivienda($calle, $numero, $cp, "", $referencia, "0", "0", SYS_UNO, FALLBACK_PERSONAS_REGIMEN_VIV, FALLBACK_PERSONAS_TIPO_VIV, DEFAULT_TIEMPO, $colonia, "calle", "", $idlocal, $idpais, $pais, $estado, $municipio, $localidad);
         //Actualizar pais
     }
     $msg .= $xSoc->getMessages(OUT_TXT);
     break;
 case "ALT":
     /*
     1597|1190|"aka"|"OCTOBER HOLDING COMPANY"|-0- 
     1661|1229|"aka"|"PESMAR S.A."|-0-
     6857|4607|"aka"|"CARDENAS GUILLEN, Oscar"|-0-
     */
     //$someword = strtolower(preg_replace("/[^a-z]+/i", "-", $theword));
     $xSoc = new cSocio($id);
     if ($xSoc->existe($id) == true) {
         $xFil->setDataRow($cont);
         $eq = array("AKA" => 511, "FKA" => 512);
                 }
             }
         }
         if ($colonia == false || $colonia == "") {
             if (setNoMenorQueCero($idcolonia) > 0) {
                 $xCol = new cDomiciliosColonias($idcolonia);
                 $xCol->init();
                 $colonia = $xCol->getNombre();
                 $nombre_estado = $xCol->getNombreEstado();
                 $nombremunicipio = $xCol->getNombreMunicipio();
                 $nombrelocalidad = $xCol->getNombreLocalidad();
             } else {
                 $colonia = trim($colonia) == "" ? $xLoc->DomicilioCodigoPostal() : $colonia;
             }
         }
         $addDom = $xSoc->addVivienda($calle, $nexterior, $cpostal, $ninterior, $referencia, $tresidencial, $tmovil, $principal, $regimen, $tdomicilio, $tiempo, $colonia, $tipo_acceso, "", $idlocalidad, $pais, $nombre_pais, $nombre_estado, $nombremunicipio, $nombrelocalidad);
         if ($addDom == false) {
             $msg .= "ERROR\tError al agregar el domicilio \r\n";
         } else {
             $iddomicilio = $xSoc->getIDDeVivienda();
         }
     }
 }
 if (setNoMenorQueCero($ingresos) > 0 and setNoMenorQueCero($persona) > 0) {
     $addAct = $xSoc->addActividadEconomica($nombreempresa, $ingresos, "", DEFAULT_TIEMPO, FALLBACK_CLAVE_EMPRESA, $calle . "/" . $nexterior, $nombrelocalidad, $nombremunicipio, $nombre_estado, $tmovil, 0, 0, "", $idactividad, FALLBACK_SECTOR_ECONOMICO, $sucursal, "0", $cpostal, $idlocalidad);
     if ($addAct == false) {
         $msg .= "ERROR\tError al agregar la Actividad Economica \r\n";
     }
 }
 if (setNoMenorQueCero($origen_relacion) > 0 and setNoMenorQueCero($persona) > 0) {
     $documentorelacionado = parametro("iddocumentorelacionado", 0, MQL_INT);
                 $localidad_ae = $xCol->getNombreLocalidad();
                 $loaded = true;
             }
         }
     }
 } 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 {
$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);
                                $calle = str_replace("SN", "NUMEROSN", $calle);
                                //limpiar calle
                                $DCalle = split("NUMERO", $calle);
                                //(strpos($calle, "NUMERO") === false) ? split(" ", $calle) :  split("NUMERO", $calle);
                                $calle = trim($DCalle[0]);
                                $numero = isset($DCalle[1]) ? trim($DCalle[1]) : "SN";
                                $codigo_postal = $cT->cInt(trim($datos[15]));
                                $colonia = $cT->cChar(trim($datos[14]));
                                $referencia = isset($datos[7]) ? "ENTRE " . $cT->cChar(trim($datos[7])) . " Y " . $cT->cChar(trim($datos[8])) : "";
                                $telefono1 = $cT->cChar(trim($datos[10]));
                                $telefono2 = $cT->cChar(trim($datos[12]));
                                $es_principal = $tdom == 1 ? TIPO_DOMICILIO_PRINCIPAL : TIPO_DOMICILIO_ORDINARIO;
                                $tipo_dom = $tdom == 1 ? TIPO_DOMICILIO_PARTICULAR : DEFAULT_TIPO_DOMICILIO;
                                $fechaVivienda = $xF->getFechaISO($cT->cChar(trim($datos[9])));
                                $tiempo_de_residir = $xF->getEscalaTiempo($fechaVivienda);
                                $xSoc->addVivienda($calle, $numero, $codigo_postal, "", $referencia, $telefono1, $telefono2, $es_principal, TIPO_VIVIENDA_PROPIA, $tipo_dom, $tiempo_de_residir, $colonia);
                                $msg .= $xSoc->getMessages("txt") . "\n";
                            }
                        }
                        $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 setPurgueDB()
 {
     $sqlT = array();
     $msg = "";
     $xF = new cFecha();
     $sqlT[] = "DELETE FROM bancos_cuentas WHERE idbancos_cuentas != " . FALLBACK_CUENTA_BANCARIA;
     $sqlT[] = "DELETE FROM bancos_operaciones ";
     $sqlT[] = "DELETE FROM captacion_cuentas WHERE numero_cuenta!=" . CTA_GLOBAL_CORRIENTE;
     $sqlT[] = "DELETE FROM captacion_sdpm_historico ";
     $sqlT[] = "DELETE FROM captacion_firmas";
     $sqlT[] = "DELETE FROM captacion_sdpm_historico";
     $sqlT[] = "DELETE FROM contable_catalogo ";
     $sqlT[] = "DELETE FROM contable_catalogorelacion ";
     $sqlT[] = "DELETE FROM contable_movimientos ";
     $sqlT[] = "DELETE FROM contable_polizas ";
     $sqlT[] = "DELETE FROM contable_saldos";
     $sqlT[] = "DELETE FROM contable_polizas_proforma ";
     $sqlT[] = "DELETE FROM creditos_reconvenio";
     $sqlT[] = "DELETE FROM creditos_solicitud WHERE numero_solicitud !=" . DEFAULT_CREDITO;
     $sqlT[] = "DELETE FROM creditos_garantias";
     $sqlT[] = "DELETE FROM creditos_flujoefvo";
     $sqlT[] = "DELETE FROM creditos_lineas";
     $sqlT[] = "DELETE FROM creditos_productos_otros_parametros ";
     $sqlT[] = "DELETE FROM creditos_sdpm_historico";
     $sqlT[] = "DELETE FROM creditos_periodos ";
     //WHERE idcreditos_periodos !=
     $sqlT[] = "DELETE FROM  creditos_rechazados ";
     $sqlT[] = "DELETE FROM general_sucursales WHERE codigo_sucursal != \"matriz\" AND codigo_sucursal !='" . getSucursal() . "'  ";
     $sqlT[] = "DELETE FROM general_log ";
     $sqlT[] = "DELETE FROM general_tmp ";
     $sqlT[] = "DELETE FROM general_import ";
     $sqlT[] = "DELETE FROM operaciones_recibos";
     $sqlT[] = "DELETE FROM operaciones_mvtos";
     $sqlT[] = "DELETE FROM seguimiento_compromisos";
     $sqlT[] = "DELETE FROM seguimiento_llamadas ";
     $sqlT[] = "DELETE FROM seguimiento_notificaciones";
     $sqlT[] = "DELETE FROM socios_aeconomica";
     $sqlT[] = "DELETE FROM socios_aportaciones";
     $sqlT[] = "DELETE FROM socios_baja";
     $sqlT[] = "DELETE FROM socios_cajalocal WHERE idsocios_cajalocal != " . getCajaLocal() . " AND sucursal != '" . getSucursal() . "' ";
     $sqlT[] = "DELETE FROM `socios_aeconomica_dependencias`\n\t\t\tWHERE `idsocios_aeconomica_dependencias` !=" . DEFAULT_EMPRESA . "\n\t\t\tAND `idsocios_aeconomica_dependencias` !=" . FALLBACK_CLAVE_EMPRESA;
     $sqlT[] = "DELETE FROM socios_general WHERE codigo!=" . DEFAULT_SOCIO . " AND codigo !=" . EACP_ID_DE_PERSONA;
     $sqlT[] = "DELETE FROM socios_memo";
     $sqlT[] = "DELETE FROM socios_patrimonio";
     $sqlT[] = "DELETE FROM socios_relaciones";
     $sqlT[] = "DELETE FROM socios_vivienda";
     $sqlT[] = "DELETE FROM socios_grupossolidarios WHERE idsocios_grupossolidarios!=" . DEFAULT_GRUPO;
     $sqlT[] = "DELETE FROM  `personas_documentacion` ";
     $sqlT[] = "DELETE FROM  `socios_otros_parametros` ";
     $sqlT[] = "DELETE FROM t_03f996214fba4a1d05a68b18fece8e71 WHERE idusuarios !=99";
     $sqlT[] = "DELETE FROM tesoreria_cajas";
     $sqlT[] = "DELETE FROM `tesoreria_cajas_movimientos` ";
     $sqlT[] = "DELETE FROM usuarios_web ";
     $sqlT[] = "DELETE FROM usuarios_web_connected";
     $sqlT[] = "DELETE FROM `usuarios_web_notas` ";
     $sqlT[] = "DELETE FROM general_tmp";
     $sqlT[] = "DELETE FROM general_folios ";
     $sqlT[] = "DELETE FROM contable_polizas_proforma ";
     $sqlT[] = "DELETE FROM contable_centrodecostos WHERE idcontable_centrodecostos !=0 ";
     $sqlT[] = "DELETE FROM general_log ";
     $sqlT[] = "UPDATE t_03f996214fba4a1d05a68b18fece8e71 SET f_34023acbff254d34664f94c3e08d836e = md5('root') WHERE f_28fb96d57b21090705cfdf8bc3445d2a = 'root'";
     //*/
     //TODO: Actualizar nombre de la tabla
     $sqlT[] = "DELETE FROM `empresas_operaciones` ";
     $sqlT[] = "DELETE FROM `empresas_cobranza`";
     $sqlT[] = "DELETE FROM `sistema_programacion_de_avisos` ";
     $sqlT[] = "DELETE FROM `personas_perfil_transaccional` ";
     $sqlT[] = "DELETE FROM `creditos_rechazados` ";
     //AML
     $sqlT[] = "DELETE FROM  `aml_risk_register`";
     $sqlT[] = "DELETE FROM  `aml_alerts`";
     $sqlT[] = "DELETE FROM  `personas_documentacion` ";
     $sqlT[] = "DELETE FROM  `socios_otros_parametros` ";
     $sqlT[] = "UPDATE `general_contratos` SET `texto_del_contrato` = '' WHERE `idgeneral_contratos` = '5' ";
     $sqlT[] = "UPDATE `general_contratos` SET `texto_del_contrato` = '' WHERE `idgeneral_contratos` = '9' ";
     $sqlT[] = "UPDATE `general_contratos` SET `texto_del_contrato` = '' WHERE `idgeneral_contratos` = '8' ";
     //$sqlT[]	= "DELETE FROM  ";
     $sqlT[] = "DELETE FROM  creditos_otros_datos ";
     $sqlT[] = "DELETE FROM  `aml_perfil_egresos_por_persona` ";
     $sqlT[] = "DELETE FROM  `historial_de_pagos` ";
     $sqlT[] = "DELETE FROM  `operaciones_archivo_de_facturas` ";
     $sqlT[] = "DELETE FROM  `personas_operaciones_recursivas` ";
     $sqlT[] = "DELETE FROM  `personas_relaciones_recursivas` ";
     $sqlT[] = "DELETE FROM  `tesoreria_caja_arqueos` ";
     //$sqlT[]	= "DELETE FROM  ";
     //$sqlT[]	= "DELETE FROM  ";
     //$sqlT[]	= "DELETE FROM  ";
     $sqlT[] = "UPDATE `socios_general` SET `nombrecompleto` = 'REGISTRO_INICIAL_FINANCIERA' WHERE `codigo` = '10000'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE  `nombre_del_parametro` = 'curp_del_representante_legal'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE  `nombre_del_parametro` = 'nombre_del_presidente_del_consejo_de_vigilancia'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'nombre_del_representante_legal'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'rfc_del_representante_legal'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'domicilio.domicilio_integrado'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'email_de_la_entidad'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'nombre_de_la_entidad'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'registro_ante_la_cnbv'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'registro_casfin'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'registro_patronal_imss'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'rfc_de_la_entidad'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'email_de_nominas'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'entidad_corto_en_el_sic'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'contrasenna_de_sms_automaticos'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'usuario_de_sms_automaticos'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'email_del_administrador'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'password_de_usuario_ftp' ";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'nombre_de_usuario_ftp' ";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'system_pay_email_register'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'password_del_email_del_administrador'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'contrasenna_de_trabajos_automaticos'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'usuario_de_sms_automaticos'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '00000000' WHERE `nombre_del_parametro` = 'entidad_clave_en_el_sic'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '00000000' WHERE `nombre_del_parametro` = 'domicilio.telefono_principal'";
     $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = 'https://demo.sipakal.com/' WHERE `nombre_del_parametro` = 'url_de_entidad_transmisora'";
     //$sqlT[]	= " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '00000000' WHERE `nombre_del_parametro` = 'entidad_clave_en_el_sic'";
     $sqlT[] = "INSERT INTO `bancos_entidades` (`idbancos_entidades`, `nombre_de_la_entidad`, `rfc_de_la_entidad`) VALUES ('999', 'BANCO_POR_DEFECTO', 'BAN999999')  ";
     $sqlT[] = "INSERT INTO `bancos_cuentas` (`idbancos_cuentas`, `descripcion_cuenta`, `fecha_de_apertura`, `estatus_actual`, `consecutivo_actual`, `saldo_actual`, `sucursal`, `entidad_bancaria`) VALUES ('99', 'FALLBACK_CUENTA', '2014-01-01', 'activo', '1', '100000000', 'matriz', '1') ";
     $sqlT[] = "INSERT INTO `t_03f996214fba4a1d05a68b18fece8e71` (`idusuarios`, `f_28fb96d57b21090705cfdf8bc3445d2a`, `apellidopaterno`, `apellidomaterno`, `puesto`, `periodo_responsable`, `codigo_de_persona`) VALUES ('1', 'USUARIO POR DEFECTO', '', '', 'Usuario por Defecto', '1', '99999')";
     $sqlT[] = "UPDATE `general_contratos` SET `texto_del_contrato` = '' WHERE `idgeneral_contratos` = '801'";
     $sqlT[] = "UPDATE `general_contratos` SET `texto_del_contrato` = '' WHERE `idgeneral_contratos` = '4'";
     $sqlT[] = "INSERT INTO `contable_centrodecostos` (`idcontable_centrodecostos`, `nombre_centrodecostos`) VALUES ('1', 'POR DEFECTO')";
     foreach ($sqlT as $id => $sql) {
         $x = my_query($sql);
         if ($x[SYS_ESTADO] != false) {
             if (isset($x[SYS_INFO])) {
                 $msg .= "OK\t" . $xF->getMarca() . "\t" . $x[SYS_INFO] . " SQL : {$sql}\r\n";
             } else {
                 $msg .= "OK\t" . $xF->getMarca() . "\tSQL : {$sql} \r\n";
             }
         } else {
             if (isset($x[SYS_ERROR])) {
                 $msg .= "ERROR\t" . $xF->getMarca() . "\t" . $x[SYS_ERROR] . " SQL : {$sql} \r\n";
             } else {
                 $msg .= "ERROR\t" . $xF->getMarca() . "- \tSQL : {$sql} \r\n";
             }
         }
     }
     //llevar los folios al maximo
     $msg .= setFoliosAlMaximo();
     //
     $xRec = new cReciboDeOperacion(12);
     $idrecibo = $xRec->setNuevoRecibo(1, 1, fechasys(), 1, 12, "CIERRE_ESTABLECIDO_POR_DEFECTO", "NA", "ninguno", "NA", DEFAULT_GRUPO);
     $xRec->setFinalizarRecibo(false);
     //Crear periodo de credito
     //TODO: Agregar informacion de valores por DEFAULT
     $xP = new cPeriodoDeCredito();
     $xP->add();
     $msg .= $xP->setCambiar(EACP_PER_SOLICITUDES);
     $xConf = new cConfiguration();
     $xConf->set("fecha_de_inicio_de_operaciones_en_el_sistema", fechasys());
     $msg .= "OK\tCONFIGURATION\tSe cambio la fecha de Inicio de Operaciones en el sistema\r\n";
     $xSoc = new cSocio(10000);
     //);
     $xSoc->setOmitirAML();
     $xSoc->add(EACP_NAME, "", "", EACP_RFC, "", getCajaLocal(), EACP_FECHA_DE_CONSTITUCION, EACP_LOCALIDAD);
     $xSoc->addVivienda(EACP_DOMICILIO_CORTO, "", EACP_CODIGO_POSTAL, "", "", EACP_TELEFONO_PRINCIPAL, "", true, 1, 1, 99, EACP_COLONIA, "calle", "", EACP_CLAVE_DE_LOCALIDAD, EACP_CLAVE_DE_PAIS);
     my_query("INSERT INTO `socios_general` (`codigo`, `nombrecompleto`, `estatusactual`, `cajalocal`, `sucursal`) VALUES ('10000', 'MICROFINANCIERA', '10', '1', 'matriz')");
     return $msg;
 }
                     $idRelSocio = $socio + 100000 * rand(2, 9);
                     $xRel = new cSocio($idRelSocio);
                     $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>";
 }