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>");