$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();