$xSoc = new cSocio($persona);
 if ($xSoc->init() == true) {
     if ($action == MQL_ADD) {
         //$estado_ae			= $xLoc->DomicilioEstado();
         if ($pais == EACP_CLAVE_DE_PAIS) {
             if ($idcolonia > 1 and $nombrecolonia == "") {
                 $xCol = new cDomiciliosColonias($idcolonia);
                 $xCol->set($idcolonia);
                 //setLog("Colonia Cargada del id $idcolonia");
                 if ($xCol->init() == true) {
                     $nombrecolonia = $xCol->getNombre();
                     $localidad_ae = $xCol->getNombreLocalidad();
                     $municipio_ae = $xCol->getNombreMunicipio();
                     $localidad_ae = $xCol->getNombreLocalidad();
                     $idlocalidad = $xCol->getClaveDeLocalidad();
                     $cp = $xCol->getCodigoPostal();
                     $loaded = true;
                 }
             }
             if ($cp > 1 and $nombrecolonia == "") {
                 $xCol = new cDomiciliosColonias($idcolonia);
                 $xCol->getClavePorCodigoPostal($cp);
                 //setLog("Colonia Cargada del id $idcolonia");
                 if ($xCol->init() == true) {
                     $nombrecolonia = $xCol->getNombre();
                     $idlocalidad = $xCol->getClaveDeLocalidad();
                     if (PERSONAS_VIVIENDA_MANUAL == false) {
                         $localidad_ae = $xCol->getNombreLocalidad();
                         $municipio_ae = $xCol->getNombreMunicipio();
                         $localidad_ae = $xCol->getNombreLocalidad();
                         $loaded = true;
$locale = "es_MX.iso-8859-1";
setlocale(LC_ALL, $locale);
$locales = list_system_locales();
//var_dump($locales);
//Crear formularios
$xFRM = new cHForm("frmTest", "./test.php");
$xHTxt = new cHText("");
//====================================================================================================
$xFRM->addHElem("<p class='aviso'>Pruebas de la Clase Colonia</p>");
//$txt 	= $xHTxt->getDeMoneda("id", "Moneda de Prueba",  100);
$xColonia = new cDomiciliosColonias();
$clave = $xColonia->getClavePorNombre("Ampliacion josefa ortiz de dom");
$xColonia->init();
$lng = new cLang();
$xFRM->addHElem($lng->getT("TR.La Clave Buscada es ") . $clave . "<br />");
$xFRM->addHElem($lng->getT("TR.El Codigo Postal Buscado es ") . $xColonia->getCodigoPostal() . "<br />");
$xFRM->addHElem($lng->getT("TR.EL Nombre de la Colonia es ") . $xColonia->getNombre() . "<br />");
$xFRM->addHElem($lng->getT("TR.EL Nombre del Municipio es ") . $xColonia->getNombreMunicipio() . "<br />");
$xFRM->addHElem($lng->getT("TR.EL Nombre del Estado es ") . $xColonia->getNombreEstado() . "<br />");
$xFRM->addHElem($lng->getT("TR.EL Nombre de la Localidaad es ") . $xColonia->getNombreLocalidad() . "<br />");
//$xFRM->addHElem( $txt );
$xFRM->addHElem("<p class='aviso'>Probando con el C.P. 24026</p>");
$clave = $xColonia->getClavePorCodigoPostal(24026);
//$xColonia->init();
$xFRM->addHElem("<p>La OTRA Clave Buscada es " . $clave . "</p>");
$xFRM->addHElem("<p>EL Nombre de la Colonia es " . $xColonia->getNombre() . "</p>");
$xFRM->addHElem("<p>EL Nombre del Municipio es " . $xColonia->getNombreMunicipio() . "</p>");
$xFRM->addHElem("<p>EL Nombre del Estado es " . $xColonia->getNombreEstado() . "</p>");
$xFRM->addHElem("<p>EL Nombre de la Localidad es " . $xColonia->getNombreLocalidad() . "</p>");
$xFRM->addHElem("<p>EL Nombre de la Localidad2 es " . $xColonia->getOColonia()->sucursal()->v() . "</p>");
///Iniciar el estado