function jsaGetLocalidades($estado, $municipio, $pais, $cp)
{
    $xSel = new cHSelect();
    $text = new cHText();
    $txt = "";
    $mun = false;
    if (setNoMenorQueCero($cp) > 0) {
        if ($pais == EACP_CLAVE_DE_PAIS) {
            $xCol = new cDomiciliosColonias();
            $xCol->existe($cp);
            $mun = $xCol->getClaveDeMunicipio();
            //$xCol->getNombreMunicipio();
        }
    }
    if (PERSONAS_VIVIENDA_MANUAL == true) {
        $text->setDivClass("");
        $txt = $text->getDeNombreDeLocalidad("idnombrelocalidad", "", "TR.Localidad");
    } else {
        $xS = $xSel->getListaDeLocalidades("", $estado, $pais);
        $txt = $xS->get(false);
        if ($xS->getCountRows() <= 0) {
            //Corregir si no hay registros
            $text->setDivClass("");
            $txt = $text->getDeNombreDeLocalidad("idnombrelocalidad", "", "TR.Localidad");
        }
    }
    return $txt;
}
function jsaReRelaciones($idsocio)
{
    //Checar compatibilidad numerica entre los dependientes economicos
    $sqlL = new cSQLListas();
    $cBenef = new cTabla($sqlL->getListadoDeRelaciones($idsocio));
    $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();
    $li->setT("ul");
    $li->setClass("tags blue");
    $li->add($xBtn->getBasic("TR.Guadar", "jsGuardarReferencia()", $xBtn->ic()->GUARDAR, "idguardar", false, true), "");
    $xTbl->initRow();
    $xTbl->addTD($xText->getDeNombreDePersona());
    $xTbl->addTD($xHSel->getListaDeTiposDeRelaciones("", "")->get(""));
    $xTbl->addTD($xHSel->getListaDeTiposDeParentesco()->get(""));
    $xTbl->addTD($xChk->get("TR.es dependiente_economico", "dependiente"));
    $xTbl->addRaw("<td class='toolbar-24'>" . $xUl->get() . "</td>");
    $xTbl->endRow();
    $cBenef->addTool(1);
    $cBenef->addTool(2);
    $cBenef->setKeyField("idsocios_relaciones");
    return $xTbl->get() . $cBenef->Show();
}
        $xLog->add("OK\tActualizar {$idcuenta} {$nombre} {$equivalencia} {$centro}\r\n");
    }
    return $xLog->getMessages(OUT_HTML);
}
$jxc->exportFunction('jsaHeredarDatos', array('idcuenta'));
$jxc->exportFunction('jsaGuardarDatos', array('idcuenta', 'idnombrecuenta', 'idtipodecuentacontable', 'idcentrodecosto', 'idequivalencia', 'idoperacion'), "#idmsgs");
$jxc->process();
$xHP->init();
$xFRM = new cHForm("frm", "./");
$xFRM->setFieldsetClass("fieldform frmpanel");
$xSel = new cHSelect();
$xTxt = new cHText();
$xTxt->setDivClass("");
$xTxt->addEvent("jsaHeredarDatos()", "onblur");
$xTxt2 = new cHText();
$xTxt2->setDivClass("");
$msg = "";
$xFRM->addGuardar("jsaGuardarDatos()");
$xFRM->OButton("TR.Panel", "jsGoPanel()", $xFRM->ic()->EJECUTAR);
$xFRM->addDivSolo($xTxt->getDeCuentaContable("idcuenta", "", false), $xTxt2->getNormal("idnombrecuenta", "", "TR.Nombre de la Cuenta"), "tx14", "tx34");
$xFRM->addDivSolo("<input type='text' id='idcuentasuperior' disabled='true' />", "<input type='text' id='idnombresuperior' disabled='true' />", "tx14", "tx34");
$xFRM->OText("idequivalencia", "", "TR.Equivalencia");
//$xFRM->addHElem( $xSel->getListaDeNivelesDeCuentasContables()->get(true) );
$xFRM->addHElem($xSel->getListaDeTiposDeCuentasContables()->get(true));
$xFRM->addHElem($xSel->getListaDeTiposDeCentrosDeCosto()->get(true));
$xFRM->OHidden("idoperacion", "0", "TR.operacion");
//0 = nuevo, 1 = Actualizar
$xFRM->OTextArea("idmsg3", "", "TR.Texto");
$xFRM->addAviso(" ");
echo $xFRM->get();
$jxc->drawJavaScript(false, true);
         }
     }
 }
 //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();
     $li->setT("ul");
     $li->setClass("tags blue");
     $li->add($xBtn->getBasic("TR.Guadar", "jsGuardarReferencia()", $xBtn->ic()->GUARDAR, "idguardar", false, true), "");
     $xTbl->initRow();
     $xTbl->addTD($xText->getDeNombreDePersona());
     $xTbl->addTD($xHSel->getListaDeTiposDeRelaciones("", "")->get(""));
     $xTbl->addTD($xHSel->getListaDeTiposDeParentesco()->get(""));
     $xTbl->addTD($xChk->get("TR.es dependiente_economico", "dependiente"));
     $xTbl->addRaw("<td class='toolbar-24'>" . $xUl->get() . "</td>");
     $xTbl->endRow();
     $xFRM->addHTML("<h2>" . PERSONAS_TITULO_PARTES . "</h2>");
$credito = parametro("credito", DEFAULT_CREDITO, MQL_INT);
$credito = parametro("idsolicitud", $credito, MQL_INT);
$credito = parametro("solicitud", $credito, MQL_INT);
$cuenta = parametro("cuenta", DEFAULT_CUENTA_CORRIENTE, MQL_INT);
$cuenta = parametro("idcuenta", $cuenta, MQL_INT);
$jscallback = parametro("callback");
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$xHP->init();
$xFRM = new cHForm("frmbuscargrupos", "./");
$xTxt = new cHText();
$msg = "";
//$xFRM->OText("idbusqueda", "", "TR.Buscar Grupo");
//$xFRM->addHElem(  );
$xTxt->setDivClass("");
$xTxt->addEvent("jsaGetGrupos()", "onkeyup");
$xFRM->addDivSolo($xTxt->getNormal("idbusqueda", "", "TR.Nombre"), " ");
$xFRM->OButton("TR.Buscar", "jsaGetGrupos()", "buscar");
$xFRM->addHTML("<div class='tx1' id='listabusqueda'></div>");
//$xFRM->addJsBasico();
//$xFRM->addCreditBasico();
//$xFRM->addSubmit();
echo $xFRM->get();
$jxc->drawJavaScript(false, true);
?>
<script>
function setGrupo(id){
	if (window.parent){ msrc = window.parent.document; }
	if (opener){ msrc = opener.document; }
<?php 
    }
} else {
    $xFRM->addJsBasico();
    $xFRM->addCreditBasico();
    $xFRM->addSubmit();
    $xSel = new cHSelect();
    $xTxt = new cHText();
    $xTxt2 = new cHText();
    $xTxt3 = new cHText();
    $xTCob = new cHCobros();
    //"idtipodepago", "idtipodepago"
    $xFRM->ODate("idfechacomision", "", "TR.Fecha de Cobro");
    $xFRM->addCobroBasico();
    $xTxt2->setDivClass("");
    $xTxt->setDivClass("");
    $xTxt3->setDivClass("");
    $xTxt->addEvent("jsaGetSumas()", "onchange");
    $xTxt->addEvent("jsaGetSumas()", "onblur");
    $xTxt3->addEvent("jsaGetSumas()", "onchange");
    $xTxt3->addEvent("jsaGetSumas()", "onblur");
    $xTxt->addEvent("jsaGetComisionPorApertura()", "onfocus");
    //$xTxt->setClearEvents(false);
    $xFRM->addDivSolo($xTxt->getDeMoneda("idcom1", "TR.Comisiones por Apertura de credito"), $xTxt2->getDeObservaciones("idob1", "", "TR.Observaciones"), "tx24", "tx24");
    $xTxt->addEvent("jsaGetSumas()", "onchange");
    $xTxt->addEvent("jsaGetSumas()", "onblur");
    $xFRM->addDivSolo($xTxt3->getDeMoneda("idcom2", "TR.Comisiones por Cobranza"), $xTxt2->getDeObservaciones("idob2", "", "TR.Observaciones"), "tx24", "tx24");
    $xTxt->addEvent("jsaGetSumas()", "onchange");
    $xTxt->addEvent("jsaGetSumas()", "onblur");
    $xFRM->addDivSolo($xTxt3->getDeMoneda("idcom3", "TR.Comisiones varias"), $xTxt2->getDeObservaciones("idob3", "", "TR.Observaciones"), "tx24", "tx24");
    $xFRM->addDivSolo($xTxt->getDeMoneda("idiva", "TR.IVA"), " ", "tx24", "tx24");
    $xTxt->setProperty("disabled", "true");
if ($persona != DEFAULT_SOCIO) {
    $xSoc = new cSocio($persona);
    $xSoc->init();
    $ByType = $xSoc->getEsPersonaFisica() == true ? BASE_DOCTOS_PERSONAS_FISICAS : BASE_DOCTOS_PERSONAS_MORALES;
}
$xFRM = new cHForm("frmfirmas", "personas_documentos.frm.php?action=" . SYS_UNO . "&persona={$persona}");
$xFRM->setEnc("multipart/form-data");
$xFRM->setTitle($xHP->getTitle());
$xBtn = new cHButton();
$xTxt = new cHText();
$xTxt2 = new cHText();
$xTxtF = new cHText();
$xSel = new cHSelect();
$xImg = new cHImg();
if ($action == SYS_CERO) {
    $xTxtF->setDivClass("");
    //$xTxtF->setProperty("class", "")
    $xFRM->OFile("idnuevoarchivo", "", "TR.Cargar Documento");
    $xFRM->OText("iddocumento", "", "TR.Nombre del Archivo", true, $xImg->get24("common/search.png", " onclick='jsGetDocto()' "));
    $xFRM->addHElem($xSel->getTiposDeDoctosPersonales("", $ByType)->get(true));
    $xFRM->addHElem($xTxt2->getDeMoneda("idnumeropagina", "TR.Numero de Pagina"));
    $xFRM->addObservaciones();
    $xFRM->addSubmit();
} else {
    $xFRM->addCerrar();
    $doc1 = parametro("iddocumento", "", MQL_RAW);
    $observaciones = isset($DDATA["idobservaciones"]) ? $DDATA["idobservaciones"] : "";
    $tipodedocto = isset($DDATA["idtipodedocto"]) ? $DDATA["idtipodedocto"] : "";
    $pagina = isset($DDATA["idnumeropagina"]) ? $DDATA["idnumeropagina"] : "";
    $archivoenviado = isset($_FILES["idnuevoarchivo"]) ? $_FILES["idnuevoarchivo"] : null;
    if (isset($_FILES["idnuevoarchivo"])) {
function jsaGetLetras($idcredito)
{
    $idcred = setNoMenorQueCero($idcredito);
    $xF = new cFecha();
    if ($idcred > DEFAULT_CREDITO) {
        $xCred = new cCredito($idcred);
        $xCred->init();
        if ($xCred->getEsAfectable() == false or $xCred->getSaldoActual() <= 0) {
            if (MODO_CORRECION == true) {
                $xTxt = new cHText();
                $xTxt->setDivClass("");
                return $xTxt->getNumero("idparcialidad", $xCred->getPeriodoActual() + 1, "TR.Numero de Parcialidad");
            } else {
                return $xCred->getMessages();
            }
        } else {
            if ($xCred->getPeriocidadDePago() == CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO) {
                //
                $xTxt = new cHText();
                $xTxt->setDivClass("");
                return $xTxt->getNumero("idparcialidad", $xCred->getPeriodoActual() + 1, "TR.Numero de Parcialidad");
            } else {
                $plan = $xCred->getNumeroDePlanDePagos();
                if ($plan != false) {
                    $xPlan = new cPlanDePagos($plan);
                    $xPlan->init();
                    $parcs = $xPlan->getParcsPendientes();
                    //$txt		= "";
                    $arrD = array();
                    foreach ($parcs as $p) {
                        //setLog( $p[SYS_NUMERO]. " " . $xF->getFechaDDMM($p[SYS_FECHA]) . " ". getFMoney($p[SYS_TOTAL]));
                        if (setNoMenorQueCero($p[SYS_TOTAL]) > 0) {
                            $arrD[$p[SYS_NUMERO]] = $p[SYS_NUMERO] . " " . $xF->getFechaDDMM($p[SYS_FECHA]) . " " . getFMoney($p[SYS_TOTAL]);
                        }
                    }
                    $xSel = new cHSelect();
                    $xSel->addOptions($arrD);
                    $xSel->setEnclose(false);
                    return $xSel->get("idparcialidad", "TR.Numero de Parcialidad", $xCred->getPeriodoActual() + 1);
                } else {
                    if (MODO_CORRECION == true) {
                        $xTxt = new cHText();
                        $xTxt->setDivClass("");
                        return $xTxt->getNumero("idparcialidad", $xCred->getPeriodoActual() + 1, "TR.Numero de Parcialidad");
                    }
                }
            }
        }
    }
}
//$xFRM->addHElem($xTxt->getDeMoneda("idnuevocredito", "TR.clave_de_credito"));
$selFreq = $xSel->getListaDePeriocidadDePago();
$selFreq->addEvent("onblur", "jsSetFrecuenciaDePagos(this)");
$xFRM->addHElem($selFreq->get(true));
$xFRM->addHElem($xSel->getListaDeTipoDePago()->get(true));
$xFRM->OMoneda("idnumerodepagos", 1, "TR.Numero de pagos");
$xFRM->ODate("idFechaVencimiento", false, "TR.Fecha de Vencimiento");
$xFRM->ODate("idFechaMinistracion", false, "TR.Fecha de Ministracion");
$xFRM->addHElem($xTxt->getDeMoneda("idmonto", "TR.Monto Solicitado", 0, true));
if (MODULO_CAPTACION_ACTIVADO == true) {
    $xFRM->addCuentaCaptacionBasico(false);
} else {
    $xFRM->addHTML("<input type='hidden' value='" . DEFAULT_CUENTA_CORRIENTE . "' id='idcuenta' name='idcuenta' />");
}
$txt2 = new cHText();
$txt2->setDivClass("");
$xFRM->addDivSolo($xSel->getListaDeDestinosDeCredito()->get(false), $txt2->get("iddescripciondestino", false, "TR.Descripcion del Destino de los_recursos"), "tx14", "tx34");
$xFRM->addObservaciones();
//si es credito renovado
$xFRM->OCheck("TR.Es Credito Renovado", "idrenovado");
if (MODULO_AML_ACTIVADO == true) {
    $xFRM->OCheck("TR.PREGUNTA_AML_CREDITO_2", "idpropietario");
    $xFRM->OCheck("TR.PREGUNTA_AML_CREDITO_1", "idproveedor");
}
$xFRM->addCerrar();
$xFRM->OButton("TR.Validar Credito", "jsValidarCredito()", "checar", "idcheck");
$xFRM->addToolbar("<span id='creditoaprobado'></span>");
$xFRM->addAviso(" ");
echo $xFRM->get();
$jxc->drawJavaScript(false, true);
?>
$xDiv->addHElem($xTxM->getDeMoneda("mone-10-cents", "TR.Monedas de 10 centimos", 0));
$xDiv->addHElem($xTxM->getDeMoneda("mone-20-cents", "TR.Monedas de 20 centimos", 0));
$xDiv->addHElem($xTxM->getDeMoneda("mone-50-cents", "TR.Monedas de 50 centimos", 0));
$xDiv->addHElem($xTxM->getDeMoneda("mone-1", "TR.Monedas de 1", 0));
$xDiv->addHElem($xTxM->getDeMoneda("mone-2", "TR.Monedas de 2", 0));
$xDiv->addHElem($xTxM->getDeMoneda("mone-5", "TR.Monedas de 5", 0));
$xDiv->addHElem($xTxM->getDeMoneda("mone-10", "TR.Monedas de 10", 0));
$xDiv->addHElem($xTxM->getDeMoneda("bille-20", "TR.Billetes de 20", 0));
$xDiv->addHElem($xTxM->getDeMoneda("bille-50", "TR.Billetes de 50", 0));
$xDiv->addHElem($xTxM->getDeMoneda("bille-100", "TR.Billetes de 100", 0));
$xDiv->addHElem($xTxM->getDeMoneda("bille-200", "TR.Billetes de 200", 0));
$xDiv->addHElem($xTxM->getDeMoneda("bille-500", "TR.Billetes de 500", 0));
$xDiv->addHElem("<h3>" . $xFRM->lang("Documentos") . "<id id='totaldocumentos'></i></h3>");
$xHT = new cHTabla();
$xTxD = new cHText();
$xTxD->setDivClass("");
$xHT->initRow();
$xTxD->addEvent("jsActualizarDoctos", "onchange");
$xHT->addTH("#");
$xHT->addTH("TR.Documento");
$xHT->addTH("TR.Monto");
$xHT->addTH("TR.Observaciones");
$xHT->endRow();
$xHT->initRow();
$xTxD->addEvent("jsActualizarDoctos", "onchange");
$xHT->addTD("1");
$xHT->addTD($xTxD->getNormal("documento-01"));
$xHT->addTD($xTxD->getDeMoneda("idmontodoc-01"));
$xHT->addTD($xTxD->getDeObservaciones("idobserva-01"));
$xHT->endRow();
$xHT->initRow();
    foreach ($rs as $row) {
        $aOpts[$row["credito"]] = $row["credito"] . "-" . $row["producto"] . "-" . $row["periocidad"] . "-" . $row["saldo"];
    }
    $xs->addOptions($aOpts);
    return $xs->get("idcreditodescontado", "TR.CLAVE_de_credito");
}
$jxc->exportFunction('jsaSetUltimoCheque', array('idsocio', 'idsolicitud', 'idcodigodecuenta'));
$jxc->exportFunction('jsaCargaDeCreditos', array('idsocio'), "#iddivcreditos");
$jxc->process();
echo $xHP->getHeader();
$jxB = new jsBasicForm("frmministracion");
$jxB->setEstatusDeCreditos(CREDITO_ESTADO_AUTORIZADO);
$xFRM = new cHForm("frmministracion", "clscreditosministracion.php");
$xSel = new cHSelect();
$xTxM = new cHText();
$xTxM->setDivClass("");
$xTxtMC = new cHText();
$xTxM->addEvent("jsUpdateCheque()", "onfocus");
$msg = "";
$xFRM->addDataTag("role", "ministracion");
$xFRM->addCreditBasico();
$xFRM->addSubmit();
//descuento //comisiones
$xFRM->addHElem("<h3>" . $xFRM->lang("Descuentos") . "</h3>");
$xFRM->addDivSolo(" ", $xTxM->getDeMoneda("idmontocreditodescontado", "TR.Descuento"), "tx2", "tx2", array(1 => array("id" => "iddivcreditos")));
$xFRM->addDivSolo(" ", $xTxM->getDeMoneda("idmontocomisiondescontado", "TR.Comision"), "tx2", "tx2");
//fragmentacion del cheque
$xFRM->addHElem("<h3>" . $xFRM->lang("Cheque") . "</h3>");
$xFRM->addHElem($xSel->getListaDeCuentasBancarias("", true)->get(true));
$xFRM->ODate("idfechaactual", false, "TR.Fecha de otorgacion");
$xFRM->OText("idnumerocheque", "", "TR.Codigo de Cheque");
$jxc->exportFunction('jsaEliminarMovimiento', array('clave_unica'), "#idmsgs");
$jxc->process();
$jscallback = parametro("callback");
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$xHP->init();
$idx = parametro("id", null, MQL_RAW);
$xOp = new cContableOperacion();
$xOp->setPorCodigo($idx);
$xTabla = $xOp->getObj();
$xFRM = new cHForm("frmeditarmvto");
$xTxt = new cHText();
$xSel = new cHSelect();
$xTxtM = new cHText();
$xTxtM->setDivClass("");
$msg = "";
$xFRM->addGuardar("jsEditarMovimiento()");
$xFRM->OButton("TR.Eliminar", "jsEliminarMovimiento()", $xFRM->ic()->ELIMINAR);
$xFRM->addHElem($xTxt->getDeCuentaContable("numerocuenta", $xTabla->numerocuenta()->v(), true));
$xFRM->addDivSolo($xTxtM->getDeMoneda("cargo", "TR.Cargo", $xTabla->cargo()->v()), $xTxtM->getDeMoneda("abono", "TR.Abono", $xTabla->abono()->v()), "tx24", "tx24");
//$xFRM->OMoneda("cargo", $xTabla->cargo()->v(), "TR.cargo");
//$xFRM->OMoneda("abono", $xTabla->abono()->v(), "TR.abono");
$xFRM->OText("referencia", $xTabla->referencia()->v(), "TR.referencia");
$xFRM->OText("concepto", $xTabla->concepto()->v(), "TR.concepto");
//$xFRM->OMoneda("diario", , "TR.diario");
$xFRM->addHElem($xSel->getListaDeDiarioDeMvtosContables("diario", $xTabla->diario()->v())->get(true));
$xFRM->OHidden("moneda", $xTabla->moneda()->v(), "TR.moneda");
$xFRM->OHidden("fecha", $xTabla->fecha()->v(), "TR.fecha");
$xFRM->OHidden("importe", $xTabla->importe()->v(), "TR.importe");
$xFRM->OHidden("clave_unica", $xTabla->clave_unica()->v(), "TR.clave unica");