$xCta->init(); } else { $messages .= "WARN\\NO_ACT\tLa Cuenta no se actualizo\r\n"; } $saldo = $xCta->getNuevoSaldo(); if ($sucess == true) { if ($saldo > INVERSION_MONTO_MINIMO) { $recibo_de_reinversion = $xCta->setReinversion($fecha_actual, true); $messages .= "WARN\tLa Inversion se CIERRA\r\n"; } elseif ($saldo >= TOLERANCIA_SALDOS) { $messages .= "ERROR\tSDO_MIN\tEL saldo de la Inversion({$saldo}) es menor a " . INVERSION_MONTO_MINIMO . ", la Inversion no se efectua\r\n"; //LLevar a cuenta Corriente $mCorriente = $xSoc->getCuentaDeCaptacionPrimaria(CAPTACION_TIPO_VISTA); if ($xTyp->getEvalNotNull(array($mCorriente)) == true) { $messages .= "WARN\tSDO_MIN\tSe intenta el Traspaso a cuenta Corriente\r\n"; $messages .= $xCta->setTraspaso($mCorriente, CAPTACION_TIPO_VISTA); } } } else { $messages .= "WARN\tLa Inversion permanece Abierta\r\n"; } $url_recibo_inversion = $xCta->getURLReciboInversion($recibo_de_reinversion); if (MODO_DEBUG == true) { $xFRM->addLog($messages . $xCta->getMessages()); } $xFRM->addAviso($messages); $xCta->init(); $xFRM->addHElem($xCta->getFicha(true, "", true)); $xFRM->addToolbar($xBtn->getBasic("TR.Imprimir constancia_de_inversion", "jsPrintReporto()", "imprimir", "idnim", false)); } echo $xFRM->get();