$xSel = new cHSelect();
$xTxt = new cHText();
$xTxt2 = new cHText();
$xBtn = new cHButton();
$msg = "";
$jsInit = "";
$remoto = false;
if (setNoMenorQueCero($credito) > DEFAULT_CREDITO and $action == SYS_NINGUNO) {
    $xCred = new cCredito($credito);
    $xCred->init();
    $persona = $xCred->getClaveDePersona();
    $jsInit = "jsInit()";
    getPersonaEnSession($persona);
    $remoto = true;
}
$xFRM->addDataTag("role", "autorizacion");
function jsaGetDatos($solicitud)
{
    if ($solicitud != 0 and $solicitud != '') {
        $xCred = new cCreditos_solicitud();
        $xCred->setData($xCred->query()->getRow("numero_solicitud={$solicitud}"));
        $pagos = $xCred->numero_pagos()->v();
        $monto = $xCred->monto_solicitado()->v();
        $periocidad = $xCred->periocidad_de_pago()->v();
        $tasa = $xCred->tasa_interes()->v();
        $xF = new cFecha();
        $xT = new cTipos();
        $tab = new TinyAjaxBehavior();
        $tab->add(TabSetvalue::getBehavior('idpagos', $pagos));
        $tab->add(TabSetvalue::getBehavior('idmonto', $monto));
        $tab->add(TabSetvalue::getBehavior('idtasa', $tasa * 100));
    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");
$xFRM->addHElem($xTxtMC->getDeMoneda("idmontocheque", "TR.Monto del cheque", 0, true));
$xFRM->addHElem("<h3>" . $xFRM->lang("Otros") . "</h3>");
$xFRM->OText("idfoliofiscal", "", "TR.Folio Impreso");
$xFRM->addObservaciones();