$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));
    }
}
$msg .= $xSoc->getMessages();
$xFRM->addAviso($msg);
echo $xFRM->get();
 $PAGOS_AUTORIZADOS = $xCred->getPagosAutorizados();
 $PERIOCIDAD_DE_PAGO = $xCred->getPeriocidadDePago();
 $socio = $xCred->getClaveDePersona();
 $DProducto = $xCred->getOProductoDeCredito();
 $tasa_ahorro = $DProducto->getTasaDeAhorro();
 $tasa_interes = $xCred->getTasaDeInteres();
 $dias_autorizados = $xCred->getDiasAutorizados();
 $saldo_historico = $xCred->getMontoAutorizado();
 $saldo_actual = $xCred->getSaldoActual();
 $MontoCubierto = $saldo_historico - $saldo_actual;
 //Cuanto ha abonado
 // ---------------------------------- Datos del Convenio -----------------------------------------
 $dias_tolerancia_no_pago = $DProducto->getDiasTolerados();
 $tasa_iva = $xCred->getTasaIVA();
 $iva_incluido = $DProducto->getTasaIncluyeIVA();
 $tipo_de_autorizacion = $xCred->getTipoDeAutorizacion();
 $tipo_de_integracion = $DProducto->getTipoDeIntegracion();
 $tipo_de_calculo = $xCred->getTipoDeCalculoDeInteres();
 $interes_normal_pagado = $xCred->getInteresNormalPagado();
 $credito_abonado = ($monto_autorizado > $saldo_actual + TOLERANCIA_SALDOS and $estatus < CREDITO_ESTADO_AUTORIZADO) ? true : false;
 // --------------------- DATOS OBTENIDOS DEL FORM
 $cuenta_captacion = isset($_POST["idcuenta"]) ? $_POST["idcuenta"] : DEFAULT_CUENTA_CORRIENTE;
 $observaciones = $_POST["observaciones"];
 $fecha_primer_abono = $_POST["elanno0"] . "-" . $_POST["elmes0"] . "-" . $_POST["eldia0"];
 $fecha_ministracion = $_POST["elanno1"] . "-" . $_POST["elmes1"] . "-" . $_POST["eldia1"];
 $tipo_de_plan = $_POST["tipo_plan_pagos"];
 $monto_extra = $_POST["cMontoCargoExtra"];
 $tipo_monto_extra = $_POST["cMvtosEsp"];
 $FormaDePago = isset($_POST["cFormaDePago"]) ? $_POST["cFormaDePago"] : 1;
 $FormaDeRedondeo = isset($_POST["redondeo"]) ? $_POST["redondeo"] : 0;
 $BaseDinamicaCalculo = $xCred->getMontoAutorizado();