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();
$jxc->drawJavaScript(false, true);
?>
</body>
<script >
var mjrsF = "../clsfunctions.inc.php";
var mIForm = document.frminversiones;