$arrUpdate["ultimo_periodo_afectado"] = SYS_CERO;
}
//Pagos de solo interes
if ($xCred->getPagosSinCapital() == true) {
$arrUpdate["ultimo_periodo_afectado"] = $ultima_parcialidad;
}
$xCred->setUpdate($arrUpdate);
// -------------------------------------------- Actualiza el Saldo del Recibo
$xCred->init();
$xFRM->addHTML($xCred->getFicha(true, "", false, true));
$xFRM->addHTML($xPlan->getFicha());
$sqlparc = "SELECT periodo_socio AS 'parcialidad', MAX(fecha_afectacion) AS 'fecha_de_pago', SUM((afectacion_real * valor_afectacion)) AS 'total_parcialidad',\n\t\t\t\t\t MAX(saldo_anterior) AS 'saldo_anterior_', MIN(saldo_actual) AS 'saldo_actual_' FROM operaciones_mvtos\n\t\t\t\tWHERE recibo_afectado={$idrecibo} GROUP BY periodo_socio ORDER BY periodo_socio";
$cTMvtos = new cTabla($sqlparc);
$cTMvtos->setWidth();
$xFRM->addHTML($cTMvtos->Show());
$urctr = $xCred->getPathDelContrato();
$urlsend = $DProducto->getPathPagare($solicitud);
$xFRM->addAviso("Dias Totales: {$dias_netos} -- Vence: {$fecha_de_vencimiento}");
$xFRM->addToolbar($xBtn->getBasic($xFRM->lang("imprimir", "plan de pagos"), "jsImprimirPlanPagos({$idrecibo})", "lista", "cm1", false));
$xFRM->addToolbar($xBtn->getBasic($xFRM->lang("imprimir", "orden de desembolso"), "jsImprimirOrdenDesembolso()", "lista", "cm2", false));
$xFRM->addToolbar($xBtn->getBasic($xFRM->lang(array("imprimir", "CONTRATO de", "credito")), "jsImprimirContrato()", "lista", "cm3", false));
$xFRM->addToolbar($xBtn->getBasic($xFRM->lang("imprimir", "recibo"), "jsImprimirReciboDePrestamo()", "lista", "cm4", false));
$xFRM->addToolbar($xBtn->getBasic($xFRM->lang("imprimir", "mandato"), "jsImprimirMandato()", "lista", "cm5", false));
$xFRM->addToolbar($xBtn->getBasic($xFRM->lang("imprimir", "pagare"), "jsImprimirPagare()", "lista", "cm6", false));
$xFRM->addHElem("<div class='tx4'><label for='idNoAvales'>No Mostrar Avales</label><input name=\"noAvales\" id=\"idNoAvales\" type=\"checkbox\" onchange=\"setNoAvales()\" /></div>");
}
//Graba los Mensages del LOG y cierra el Archivo
$msg .= $xPlan->getMessages();
$msg .= $msgM;
$msg .= $msgC;
$msg .= $msgPIE;
$xHP->init();
$xFRM = new cHForm("frmacciones", "./");
if ($idsolicitud <= 0 or $monto_cheque1 <= 0) {
echo JS_CLOSE;
} else {
$xCred = new cCredito($idsolicitud, $idsocio);
$xCred->init();
if ($xCred->getEstadoActual() == CREDITO_ESTADO_AUTORIZADO or $monto_cheque1 <= 0) {
$recibo = $xCred->setMinistrar($recibo_fiscal, $cheque, $monto_cheque1, $cuenta_cheques, $cheque2, $cuenta_cheques2, $observaciones, $fecha);
if (setNoMenorQueCero($recibo) > 0) {
$xFRM->addHTML($xCred->getFichaDeSocio());
$xFRM->addHTML($xCred->getFicha());
$xFRM->OButton("TR.RECIBO DE MINISTRACION", "jsImprimirReciboMinistracion()", $xFRM->ic()->REPORTE, "id4");
$xFRM->addToolbar($xBtn->getIrAlInicio(true));
$uPagare = "elUrl='" . $xCred->getOProductoDeCredito()->getPathPagare($idsolicitud) . "';";
$uContrato = "esUrl='" . $xCred->getPathDelContrato() . "';";
if ($creditodescontado >= DEFAULT_CREDITO) {
$xDCred = new cCredito($creditodescontado);
$xDCred->init();
$saldodesc = $xDCred->getSaldoActual($fecha);
if ($saldodesc < $montocreditodesc) {
$montocreditodesc = $saldodesc;
$montocomision = $montocomision + ($montocreditodesc - $saldodesc);
}
$idrecibocap = $xDCred->setAbonoCapital($montocreditodesc, SYS_UNO, $cheque, TESORERIA_COBRO_DESCTO, $recibo_fiscal, $observaciones);
if (setNoMenorQueCero($idrecibocap) > 0) {
$xRecCapt = new cReciboDeOperacion(false, false, $idrecibocap);
$xRecCapt->init();
if ($xRecCapt->setFinalizarRecibo(true) == true) {
$xFRM->OButton("TR.Recibo de Abono", "jsImprimirReciboCapital()", "imprimir");
$xFRM->addHTML($xRecCapt->getJsPrint(true, "jsImprimirReciboCapital"));
if (MODO_DEBUG == true) {
$xHTabs->addTab("TR.Sistema", $xCred->getMessages(OUT_HTML));
$sql = $mSQL->getListadoDeOperaciones("", $idsolicitud);
$cEdit = new cTabla($sql);
$cEdit->addTool(SYS_UNO);
$cEdit->addTool(SYS_DOS);
$cEdit->setTdClassByType();
$cEdit->setKeyField("idoperaciones_mvtos");
$xHTabs->addTab("TR.Operaciones", $cEdit->Show());
$cMovs = new cTabla($mSQL->getListadoDeSDPMCredito($idsolicitud));
$xHTabs->addTab("TR.Historial", $cMovs->Show());
}
$oFrm->addHTML($xHTabs->get());
}
$oFrm->OButton("TR.Castigos", "jsCastigos({$idsolicitud})", "error");
$pathContrato = $xCred->getPathDelContrato();
$pathPagare = $xOPdto->getPathPagare($idsolicitud);
}
echo $oFrm->get();
?>
<script >
var siAvales = "si";
var idCredito = <?php
echo $idsolicitud;
?>
;
var idSocio = <?php
echo $idsocio;
?>
;
var idRecibo = <?php
