function jsaGetDatosHeredados($codigopostal, $idcolonia)
{
$tab = new TinyAjaxBehavior();
$xCol = new cDomiciliosColonias();
if (setNoMenorQueCero($codigopostal) > 0) {
$xCol->getClavePorCodigoPostal($codigopostal);
} else {
if (setNoMenorQueCero($idcolonia) <= 0) {
$xLoc = new cLocal();
$xCol->getClavePorCodigoPostal($xLoc->DomicilioCodigoPostal());
} else {
$xCol->set($idcolonia);
}
}
$tab->add(TabSetValue::getBehavior("idnombrecolonia", $xCol->getNombre()));
$tab->add(TabSetValue::getBehavior("idcolonia", $xCol->get()));
if (PERSONAS_VIVIENDA_MANUAL == true) {
$tab->add(TabSetValue::getBehavior("idnombrelocalidad", $xCol->getNombreLocalidad()));
$tab->add(TabSetValue::getBehavior("idnombremunicipio", $xCol->getNombreMunicipio()));
//$tab->add(TabSetValue::getBehavior("idnombreestado", $xCol->getNombreEstado() ));
} else {
//$tab->add(TabSetValue::getBehavior("idlocalidad", $xCol->getNombreLocalidad() ));
$tab->add(TabSetValue::getBehavior("identidadfederativa", $xCol->getClaveDeEstadoABC()));
}
//$tab->add(TabSetValue::getBehavior("idestado", $xCol->getClaveDeEstado() ));
return $tab->getString();
}
function getFactura($enviar = false, $out = OUT_PDF)
{
$ready = null;
$xml = "";
$unidad = "NO APLICA";
$cantidad = 1;
$mql = new MQL();
$xLis = new cSQLListas();
$xLoc = new cLocal();
$xPais = new cDomiciliosPaises(EACP_CLAVE_DE_PAIS);
$xLog = new cCoreLog();
$sql = "SELECT * FROM `operaciones_archivo_de_facturas` WHERE `clave_de_recibo` = " . $this->mCodigoDeRecibo . " LIMIT 0,1";
$xArch = new cOperaciones_archivo_de_facturas();
$DFact = $mql->getDataRow($sql);
if (isset($DFact["clave_de_recibo"])) {
$xArch->setData($DFact);
$this->mMessages .= "OK\tEl UUID existe " . $xArch->uuid()->v(OUT_TXT) . "\r\n";
if ($enviar == true) {
if ($this->getOPersona() == null) {
} else {
$xSoc = $this->getOPersona();
$email = $xSoc->getCorreoElectronico();
$comprobante = PATH_FACTURAS . $xArch->uuid()->v(OUT_TXT);
file_put_contents($comprobante . ".xml", base64_decode($xArch->contenido()->v(OUT_TXT)));
file_put_contents($comprobante . ".pdf", base64_decode($xArch->impreso()->v(OUT_TXT)));
$ready = $out == OUT_PDF ? base64_decode($xArch->impreso()->v(OUT_TXT)) : base64_decode($xArch->contenido()->v(OUT_TXT));
$xNotif = new cNotificaciones();
//PDF y XML
$arrFil = array();
$arrFil["archivo1"]["path"] = $comprobante . ".pdf";
$arrFil["archivo2"]["path"] = $comprobante . ".xml";
$xNotif->sendMail("Factura del Recibo " . $this->mCodigoDeRecibo, "Factura del Recibo " . $this->mCodigoDeRecibo, $email, $arrFil);
//Enviar al Archivo mail
$xNotif->sendMail("Factura del Recibo " . $this->mCodigoDeRecibo, "Factura del Recibo " . $this->mCodigoDeRecibo, FACTURACION_MAIL_ARCHIVO, $arrFil);
$this->mMessages .= $xNotif->getMessages();
}
} else {
$ready = $out == OUT_PDF ? $xArch->impreso()->v(OUT_TXT) : $xArch->contenido()->v(OUT_TXT);
}
} else {
$xLog->add("WARN\tGenerando Nueva Factura\r\n", $xLog->DEVELOPER);
//cargar Archivo
$xPais->init();
if ($this->mReciboIniciado == false) {
$this->init();
}
if ($this->getOPersona() == null) {
$xLog->add("ERROR\tAl cargar la Persona\r\n");
} else {
$xFact = new cFacturaElectronica();
//datos de la emisora
//persona iniciada
$xSoc = $this->getOPersona();
$email = $xSoc->getCorreoElectronico();
$xFact->setEmisor(EACP_NAME, EACP_RFC, EACP_DOMICILIO_CALLE, EACP_DOMICILIO_NUM_EXT, EACP_DOMICILIO_NUM_INT, EACP_CODIGO_POSTAL, EACP_COLONIA, EACP_MUNICIPIO, EACP_ESTADO, $xPais->getNombre());
$xFact->setRegimenFiscal(EACP_REGIMEN_FISCAL);
$calle = $xLoc->DomicilioCalle();
$numeroInt = $xLoc->DomicilioNumeroInterior();
$numeroExt = $xLoc->DomicilioNumeroExterior();
$codigoPostal = $xLoc->DomicilioCodigoPostal();
$colonia = $xLoc->DomicilioColonia();
$xSocDom = $xSoc->getODomicilio();
$pais = $xLoc->getNombreDePais();
$estado = $xLoc->DomicilioEstado();
$municipio = $xLoc->DomicilioMunicipio();
$tasa_iva = TASA_IVA;
$xFact->setLugarDeExpedicion($xLoc->DomicilioCalle(), $xLoc->DomicilioNumeroExterior(), $xLoc->DomicilioNumeroInterior(), $xLoc->DomicilioCodigoPostal(), $xLoc->DomicilioColonia(), $xLoc->DomicilioMunicipio(), $xLoc->DomicilioEstado(), $xLoc->getNombreDePais());
if ($xSocDom == null) {
$xLog->add("WARN\tNo hay domicilio Valido\r\n", $xLog->DEVELOPER);
} else {
$calle = $xSocDom->getCalle();
$numeroExt = $xSocDom->getNumeroExterior();
$numeroInt = $xSocDom->getNumeroInterior();
$codigoPostal = $xSocDom->getCodigoPostal();
$colonia = $xSocDom->getColonia();
$municipio = $xSocDom->getMunicipio();
$estado = $xSocDom->getEstado();
$pais = $xSocDom->getNombreDePais();
}
//Cargar datos del Docto
//$this->getOrigen();
$OTipoRec = $this->getOTipoRecibo();
if ($OTipoRec->getOrigen() == RECIBOS_ORIGEN_MIXTO or $OTipoRec->getOrigen() == RECIBOS_ORIGEN_COLOCACION) {
$xCred = new cCredito($this->getCodigoDeDocumento());
$xCred->init();
$tasa_iva = $xCred->getTasaIVA();
$xLog->add("WARN\tLa tasa de IVA es {$tasa_iva}\r\n", $xLog->DEVELOPER);
}
$xFact->setReceptor($xSoc->getNombreCompleto(), $xSoc->getRFC(true, true), $calle, $numeroExt, $numeroInt, $codigoPostal, $colonia, $municipio, $estado, $pais);
//Datos del pagos
$formaDePago = "Pago en una sola exhibición";
$cuentaDePago = "No Identificado";
$arrEquiv = array(TESORERIA_COBRO_DOCTO => "Documentos", TESORERIA_COBRO_EFECTIVO => "Efectivo", TESORERIA_COBRO_INTERNO => "Documentos", TESORERIA_COBRO_MULTIPLE => "Documentos", TESORERIA_COBRO_NINGUNO => "Documentos", TESORERIA_COBRO_TRANSFERENCIA => "Transferencia", TESORERIA_COBRO_CHEQUE => "Cheque");
$metodoDePago = $arrEquiv[$this->getTipoDePago()];
//cargar equivalencias
//TODO: Considerar cambios en otro de tipo de tributacion
if ($this->getTipoDePago() == TESORERIA_COBRO_TRANSFERENCIA or $this->getTipoDePago() == TESORERIA_COBRO_CHEQUE) {
$OCaja = $this->getOCaja();
$cuentaDePago = $OCaja->getCuentaBancoActivo();
}
//Cheque, Transferencia, Depósito
$xFact->setDatosDePago($formaDePago, $metodoDePago, $cuentaDePago);
$sql = "SELECT\n\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base`,\n\t\t\t\t\t`operaciones_mvtos`.`recibo_afectado`,\n\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`miembro`,\n\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`subclasificacion`,\n\t\t\t\t\t`operaciones_tipos`.`descripcion_operacion` AS `operacion`,\n\t\t\t\t\t`operaciones_mvtos`.`fecha_operacion`,\n\t\t\t\t\t`operaciones_mvtos`.`afectacion_real` AS 'monto' \n\t\t\t\tFROM\n\t\t\t\t\t`operaciones_mvtos` `operaciones_mvtos` \n\t\t\t\t\t\tINNER JOIN `eacp_config_bases_de_integracion_miembros` \n\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros` \n\t\t\t\t\t\tON `operaciones_mvtos`.`tipo_operacion` = \n\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`miembro` \n\t\t\t\t\t\t\tINNER JOIN `operaciones_tipos` `operaciones_tipos` \n\t\t\t\t\t\t\tON `operaciones_mvtos`.`tipo_operacion` = `operaciones_tipos`.\n\t\t\t\t\t\t\t`idoperaciones_tipos` \n\t\t\t\tWHERE\n\t\t\t\t\t(`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` =11000) AND\n\t\t\t\t\t(`operaciones_mvtos`.`recibo_afectado` =" . $this->mCodigoDeRecibo . " )";
$iva = 0;
$total = 0;
$rs = $mql->getDataRecord($sql);
foreach ($rs as $rows) {
$descripcion = $rows["operacion"];
$valor = $rows["monto"];
$tipo = $rows["subclasificacion"];
$total += $valor;
if ($tipo == 1000) {
$iva += $rows["monto"];
} else {
$xFact->addConcepto($cantidad, $unidad, $valor, $descripcion);
}
}
//agregar IVA
if ($iva > 0) {
$xFact->addTrasladado("IVA", $tasa_iva, $iva);
}
$xml = $xFact->get();
$this->mOFactura = $xFact;
if ($total <= 0) {
$enviar = false;
}
}
if ($enviar == true) {
if ($this->mOFactura != null) {
if (filter_var($email, FILTER_VALIDATE_EMAIL)) {
if ($this->mOFactura->timbrar() == 1) {
//ready = true
$xNotif = new cNotificaciones();
//PDF y XML
$arrFil = array();
$arrFil["archivo1"]["path"] = $this->mOFactura->getComprobante() . ".pdf";
$arrFil["archivo2"]["path"] = $this->mOFactura->getComprobante() . ".xml";
$xNotif->sendMail("Factura del Recibo " . $this->mCodigoDeRecibo, "Factura del Recibo " . $this->mCodigoDeRecibo, $email, $arrFil);
//Enviar al Archivo mail
$xNotif->sendMail("Factura del Recibo " . $this->mCodigoDeRecibo, "Factura del Recibo " . $this->mCodigoDeRecibo, FACTURACION_MAIL_ARCHIVO, $arrFil);
//Guardar en DB
$this->mOFactura->setArchivar($this->mCodigoDeRecibo);
$xLog->add($xNotif->getMessages(), $xLog->DEVELOPER);
$ready = $out == OUT_PDF ? $this->mOFactura->getPDF() : $this->mOFactura->getXML();
}
} else {
$xLog->add("WARN\tNo hay email valido para la Factura ({$email})\r\n", $xLog->DEVELOPER);
}
$xLog->add($this->mOFactura->getMessages(), $xLog->DEVELOPER);
}
}
}
$this->mMessages .= $xLog->getMessages();
return $ready;
}
FechaDefuncion
IndicadorDefuncion
TipoPersona
*/
//Linea de Socio
$linea .= "{$ApellidoPaterno}|{$ApellidoMaterno}|{$ApellidoAdicional}|{$Nombres}|{$FechaNacimiento}|{$RFC}|{$CURP}|{$Nacionalidad}|{$Residencia}|{$licencia}|{$EstadoCivil}|{$Sexo}|";
$linea .= "{$ClaveIFE}|{$NumeroDependientes}|{$FechaDefuncion}|{$IndicadoDefuncion}|{$TipoPersona}|";
//==================================== Domicilio Particular ==================================
//Calle, numero exterior, numero interior
if ($ODom == null) {
$Direccion = "DOMICILIO NO PROPORCIONADO";
$ColoniaPoblacion = "NO PROPORCIONADO";
$DelegacionMunicipio = $xCR->getText($xLoc->DomicilioMunicipio());
$Ciudad = "";
$Estado = $xCR->getText($xLoc->DomicilioEstadoClaveSIC());
$CP = $xCR->getText($xLoc->DomicilioCodigoPostal(), 5);
$xSuc = new cSucursal($sucres);
if ($xSuc->init() == true) {
$DelegacionMunicipio = $xCR->getText($xSuc->getMunicipio());
$Estado = $xCR->getText($xSuc->getClaveDeEstadoSIC());
$CP = $xCR->getText($xSuc->getCodigoPostal(), 5);
}
$FechaResidencia = "";
$NumeroTelefono = "";
$TipoDomicilio = "";
$TipoAsentamiento = "";
$linea .= "{$Direccion}|{$ColoniaPoblacion}|{$DelegacionMunicipio}|{$Ciudad}|{$Estado}|{$CP}|{$FechaResidencia}|{$NumeroTelefono}|{$TipoDomicilio}|{$TipoAsentamiento}|";
$xLog->add("ERROR\t{$idpersona}-{$idcredito}\t{$sucres}\tSin Domicilio {$Direccion}|{$ColoniaPoblacion}|{$DelegacionMunicipio}|{$Ciudad}|{$Estado}|{$CP}|{$FechaResidencia}|{$NumeroTelefono}|{$TipoDomicilio}|{$TipoAsentamiento}|\r\n", $xLog->DEVELOPER);
} else {
$calle = $ODom->getCalle();
$numExterior = $ODom->getNumeroExterior() == "" ? "SN" : $ODom->getNumeroExterior();
$nombrelocalidad = $xCol->getNombreLocalidad();
if (trim($colonia) == "") {
$colonia = $xCol->getNombre();
}
}
}
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";
}
$razones = $xRisk->razones_de_reporte()->v(OUT_TXT);
$tipo_de_obj = $xRisk->tipo_de_documento()->v();
$tercero = $xRisk->tercero_relacionado()->v();
//obtiene las razones de cada operacion presente.
$recibo = $xRisk->documento_relacionado()->v();
$cont = array();
$linea = "";
$cont[1] = $xLayout->getClave();
$cont[2] = $FechaExtraccion;
$cont[3] = $operaciones == 0 ? 1 : $operaciones;
$cont[4] = "01" . $xT->cSerial(3, $supervisor);
//clave nacional de entidad supervisora 1002 = CNBV
$cont[5] = $casfin;
$cont[6] = $xLoc->DomicilioLocalidadClave();
// cambiar por la UIF
$cont[7] = $xLoc->DomicilioCodigoPostal();
// CP de la sucursal
$docto_relacionado = $OAEc == null ? $OAEc->getNumeroDeSeguridadSocial() : $xRisk->documento_relacionado()->v();
//($xRec->getCodigoDeDocumento() == DEFAULT_CREDITO) ? $xRec->getCodigoDeRecibo() : $xRec->getCodigoDeDocumento();
$fecha_de_op = $xF->getFechaByInt($xRisk->fecha_de_reporte()->v());
$instrumento = $xRisk->instrumento_financiero()->v();
$tipo_de_op = $xRisk->tipo_de_operacion()->v();
$total = $xRisk->monto_total_relacionado()->v();
$moneda = AML_CLAVE_MONEDA_LOCAL;
//TODO: Agregar soporte para captación y colocación
switch ($tipo_de_obj) {
case iDE_RECIBO:
$xRec = new cReciboDeOperacion(false, false, $recibo);
if ($xRec->init() == true) {
if ($xRec->getCodigoDeSocio() == $tercero) {
$tipo_de_op = $xEquivOps->get($xRec->getTipoDeRecibo());
$localidad_ae = parametro("idnombrelocalidad", $xLoc->DomicilioLocalidad());
$idlocalidad = parametro("idlocalidad", $xLoc->DomicilioLocalidadClave(), MQL_INT);
$municipio_ae = parametro("idnombremunicipio", $xLoc->DomicilioMunicipio());
$idmunicipio = parametro("idmunicipio", $xLoc->DomicilioMunicipioClave(), MQL_INT);
$estado = parametro("identidadfederativa", $xLoc->DomicilioEstadoClaveNum(), MQL_INT);
//DEFAULT_NOMBRE_ESTADO
$telefono_ae = parametro("idtelefono");
$extension_ae = parametro("idextension");
$numero_empleado = parametro("idnumeroempleado");
$antiguedad_ae = parametro("idantiguedad", DEFAULT_TIEMPO);
$departamento_ae = parametro("iddepartamento");
$montoper_ae = parametro("idsalario", 0, MQL_FLOAT);
$empresa = parametro("iddependencia", FALLBACK_CLAVE_EMPRESA);
$puesto = parametro("idpuesto");
$nss = parametro("idnss");
$cp = parametro("idcodigopostal", $xLoc->DomicilioCodigoPostal(), MQL_INT);
$fechaalta = fechasys();
$idcolonia = parametro("idcp_idcodigopostal", 0, MQL_INT);
$nombrecolonia = parametro("dlidcodigopostal");
$nexterior = parametro("idnumeroexterior");
$tipo_acceso = parametro("idtipoacceso", "calle", MQL_RAW);
$calle = parametro("idnombreacceso");
$estado_ae = "";
$asalariado = false;
$pais = parametro("idpais", EACP_CLAVE_DE_PAIS, MQL_RAW);
$loaded = false;
//Agregar
if (setNoMenorQueCero($persona) > DEFAULT_SOCIO) {
/* verifica si el socio o datos son validos */
$xSoc = new cSocio($persona);
if ($xSoc->init() == true) {
function setRepresentante($clave_de_persona)
{
$xLoc = new cLocal();
if (setNoMenorQueCero($clave_de_persona) > DEFAULT_SOCIO) {
$xPer = new cSocio($clave_de_persona);
if ($xPer->init() == true) {
$codigo = $xPer->getCodigo();
$nombre = $xPer->getNombreCompleto();
$dom = "";
$cp = $xLoc->DomicilioCodigoPostal();
if ($xPer->getODomicilio() != null) {
$dom = $xPer->getODomicilio()->getDireccionBasica();
$cp = $xPer->getODomicilio()->getCodigoPostal();
}
$this->setUpdate(array("colonia_gruposolidario" => $cp, "direccion_gruposolidario" => $dom, "representante_numerosocio" => $codigo, "representante_nombrecompleto" => $nombre));
$this->addIntegrante($clave_de_persona);
}
}
}
}
$cTbl = new cTabla($xLi->getListadoDeTareas(getUsuarioActual()));
$cTbl->setKeyField("idusuarios_web_notas");
$cTbl->setKeyTable("usuarios_web_notas");
$cTbl->OButton("TR.Checado", "setUpdateEstatus(_REPLACE_ID_)", $cTbl->ODicIcons()->OK);
$alerts .= $cTbl->Show("TR.Tareas");
$xFRM->OButton("TR.Salir", "var xG = new Gen(); xG.salir()", "salir");
$xFRM->addSeccion("idmastareas", "TR.Tareas");
$xFRM->addHElem("<div id=\"tcalendar-task\">{$alerts}</div>");
$xFRM->endSeccion();
$sysinfo = "";
if (MODO_DEBUG == true and SYSTEM_ON_HOSTING == false) {
$xUL = new cHUl();
$xUL2 = new cHUl();
$sysinfo = $xUL->li("Base de Datos:" . MY_DB_IN)->li("Servidor: " . WORK_HOST)->li("Sucursal: " . getSucursal())->li("Version S.A.F.E.: " . SAFE_VERSION)->li("Revision S.A.F.E: " . SAFE_REVISION)->li("Path Temporal: " . PATH_TMP)->li("Path Backups: " . PATH_BACKUPS)->li("Fecha del Sistema: " . date("Y-m-d H:i:s"))->li("Usuario Activo: " . $xUsr->getNombreCompleto())->li("ID de Usuario: " . $xUsr->getID())->li("Nivel de Usuario: " . $xUsr->getNivel())->li("SAFE DB version : " . SAFE_DB_VERSION)->end();
$sysinfo2 = $xUL2->li("Caja Local : " . $xLoc->getCajaLocal())->li("Localidad : " . $xLoc->DomicilioLocalidad())->li("Clave Localidad : " . $xLoc->DomicilioLocalidadClave())->li("Municipio : " . $xLoc->DomicilioMunicipio())->li("Estado : " . $xLoc->DomicilioEstado())->li("Clave Estado : " . $xLoc->DomicilioEstadoClaveABC())->li("C.P. : " . $xLoc->DomicilioCodigoPostal())->end();
$xFRM->addSeccion("idmaslogs", "TR.Sistema");
$xFRM->addDivSolo($sysinfo, $sysinfo2, "tx24", "tx24");
$xFRM->endSeccion();
}
if (getUsuarioActual(SYS_USER_NIVEL) == USUARIO_TIPO_CAJERO) {
$xNot = new cHNotif();
$xCaja = new cCaja();
if ($xCaja->getEstatus() == TESORERIA_CAJA_CERRADA) {
$xNot->get("", "idestadocaja", $xNot->ERROR);
} else {
}
}
$xFRM->addAviso("", "idavisos");
$xFRM->OHidden("id-KeyEditable", "", "");
//$xFRM->addHTML($menu);
$nombrelocalidad = $xCol->getNombreLocalidad();
if (trim($colonia) == "") {
$colonia = $xCol->getNombre();
}
}
}
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;
}
}
} else {
}
$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 (MODO_DEBUG == true) {
$xFRM->addAviso($xSoc->getMessages());
}
$xFRM->addAvisoRegistroOK();
}
}
$xFRM->addSubmit();
$xFRM->OButton("TR.Importar de Asociadada", "jsaImportarDeAsociada", "importar");
$xFRM->addHElem($xSel->getListaDeRegimenDeVivienda()->get(true));
$xFRM->addHElem($xSel->getListaDeTiposDeVivienda()->get(true));
//$xFRM->endSeccion();
//$xFRM->addSeccion("iddatosgenerales", "TR.Domicilio");
$xCP = new cHText();
$xTx3 = new cHText();
$xTxtE = new cHText();
$xChk = new cHCheckBox();
$xTxt = new cHText();
$xHSel = new cHSelect();
$xFRM->addHElem($xSel->getListaDeRegimenDeVivienda()->get(true));
$xFRM->OHidden("idtipodevivienda", TIPO_DOMICILIO_PARTICULAR, "");
//$xFRM->addHElem( $xSel->getListaDeTiposDeVivienda()->get(true) );
$xFRM->addHElem($xSel->getListaDeTiempo()->get("TR.Tiempo_de_Residencia", true));
$lsPaises = $xSel->getListaDePaises();
$lsPaises->addEvent("onchange", "jsSetEstadoPorPais(this)");
$xFRM->addHElem($lsPaises->get(true));
$xFRM->addHElem($xCP->getNumero("idcodigopostal", $xLoc->DomicilioCodigoPostal(), "TR.codigo_postal"));
$sentidades = $xSel->getListaDeEntidadesFed("", true);
$sentidades->addEvent("onchange", "jsaGetMunicipios");
$xFRM->addHElem($sentidades->get(true));
$xHSel->setEnclose(false);
$xHSel->addOptions(array("calle" => "Calle", "avenida" => "Avenida", "andador" => "Andador", "camino_rural" => "Camino Rural"));
$xTxtE->setDivClass("");
$xFRM->addDivSolo($xHSel->get("idtipoacceso", "", "calle"), $xTxtE->getNormal("idnombreacceso", ""), "tx14", "tx34");
$xFRM->addHElem($xTxt->getNormal("idnumeroexterior", "", "TR.Numero_Exterior"));
$xFRM->addHElem($xTxt->getNormal("idnumerointerior", "", "TR.Numero_Interior"));
$xFRM->addHElem($xTx3->getDeNombreDeColonia("idnombrecolonia", EACP_COLONIA, "TR.Colonia"));
if (PERSONAS_VIVIENDA_MANUAL == true) {
$xFRM->addHElem($xTx3->getDeNombreDeMunicipio("idnombremunicipio", "", "TR.Municipio"));
$xFRM->addHElem($xTx3->getDeNombreDeLocalidad("idnombrelocalidad", "", "TR.Localidad"));
} else {
$xFRM->addHElem("<div class='tx4' id='txtmunicipio'></div>");
