function jsaGuardarDatosBanco($credito, $banco, $cuenta, $clabe)
{
    $xCred = new cCredito($credito);
    $xCred->init();
    $Cat = $xCred->OCatOtrosDatos();
    $datobanco = "";
    $xBan = new cBancos_entidades();
    $xBan->setData($xBan->query()->initByID($banco));
    $datobanco = $xBan->idbancos_entidades()->v() . " | " . $xBan->nombre_de_la_entidad()->v();
    $xCred->setOtrosDatos($Cat->DEPOSITO_BANCO, strtoupper($datobanco));
    $xCred->setOtrosDatos($Cat->DEPOSITO_CTA_BANCARIA, $cuenta);
    $xCred->setOtrosDatos($Cat->DEPOSITO_CLABE_BANCARIA, $clabe);
    return $xCred->getMessages(OUT_HTML);
}
 if ($result == false) {
     $xFRM->addToolbar($xBtn->getRegresar("solicitud_de_credito.frm.php", true));
     $xFRM->addAviso($xHP->lang(MSG_ERROR_SAVE));
     $xFL = new cFileLog();
     $xFL->setWrite($xCred->getMessages(OUT_TXT));
     $xFL->setWrite($xSoc->getMessages());
     $xFL->setClose();
     $xFRM->addToolbar($xFL->getLinkDownload("Log de eventos", ""));
     $xFRM->addAviso($xCred->getMessages());
 } else {
     $xCred->init();
     $credito = $xCred->getNumeroDeCredito();
     //Si es Automatizado
     $xCat = new cCreditosOtrosDatos();
     if ($tieneprops == true) {
         $xCred->setOtrosDatos($xCat->AML_CON_PROPIETARIO, "1");
     }
     if ($tieneprovs == true) {
         $xCred->setOtrosDatos($xCat->AML_CON_PROVEEDOR, "1");
     }
     if ($xCred->getTipoDeAutorizacion() == CREDITO_TIPO_AUTORIZACION_AUTOMATICA) {
         //$saldo_actual = $monto_autorizado;
         //TODO: Acabar con este modulo
         $xFRM->addToolbar($xBtn->getBasic($xHP->lang("Imprimir", "Orden de Desembolso"), "jsImprimirOrdenDeDesembolso()", "imprimir", "cmdprintdes", false));
     }
     //----------------------------------------------------------------------
     $xFRM->addHTML($xCred->getFichaDeSocio());
     $xFRM->addHTML($xCred->getFicha());
     $xFRM->addCreditoComandos($xCred->getNumeroDeCredito());
     $xFRM->addToolbar($xBtn->getBasic("TR.Autorizar credito", "var CGen=new CredGen();CGen.getFormaAutorizacion({$credito})", "imprimir", "cmdprintdes5", false));
     $xFRM->addToolbar($xBtn->getBasic("TR.GENERAR PLAN_DE_PAGOS", "var CGen=new CredGen();CGen.getFormaPlanPagos({$credito})", "reporte", "generar-plan", false));