$FechaDePrimerIncumplimiento = "";
if ($SaldoActual <= 0) {
if ($xF->getInt($xCred->getFechaUltimoDePago()) >= $xF->getInt($xCred->getFechaDeMinistracion())) {
$FechaCierreCuenta = $xCR->getDate($xCred->getFechaDeMinistracion());
$FechaAperturaCuenta = $xCR->getDate($xF->setRestarDias(3, $xCred->getFechaDeMinistracion()));
$FechaUltimoPago = $xCR->getDate($xF->setRestarDias(2, $xCred->getFechaDeMinistracion()));
//setLog("3....$FechaUltimoPago");
} else {
$FechaCierreCuenta = $xCR->getDate($xCred->getFechaUltimoDePago());
}
//$FechaUltimaCompra = $xCR->getDate($xCred->getFechaDeMinistracion() );
//$FechaAperturaCuenta = $xCR->getDate($xCred->getFechaDeMinistracion() );
}
$PagoActual = "V";
if ($SaldoActual > TOLERANCIA_SALDOS + 0.01) {
if ($xCred->getEstadoActual() == CREDITO_ESTADO_MOROSO or $xCred->getEstadoActual() == CREDITO_ESTADO_VENCIDO) {
if ($xCred->getPeriocidadDePago() == CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO) {
$PagoActual = "01";
$SaldoVencido = $SaldoActual;
$NumeroPagosVencidos = "01";
$FechaDePrimerIncumplimiento = $xCR->getDate($xCred->getFechaDeVencimiento());
} else {
if (setNoMenorQueCero($xCred->getNumeroDePlanDePagos()) > 0) {
$xPlan = $xCred->getOPlanDePagos();
// new cPlanDePagos($xCred->getNumeroDePlanDePagos());
$data = isset($DCal[$idcredito]) ? $DCal[$idcredito] : false;
$xPlan->initParcsPendientes(0, $FechaFinal, $data);
$NumeroPagosVencidos = $xPlan->getPagosAtrasados();
$SaldoVencido = $xPlan->getMontoAtrasado();
//Objeto Pago Actual
$idpago_actual = $xPlan->getPeriodoProximoSegunFecha();
<!-- MONTO AUTORIZADO -->
<div class="inv" id="divmontoautorizado">
<?php
$oFrm5 = new cHForm("frmmontoaut", "", "idfrmmontoaut");
$oFrm5->addHElem($oTxt->getDeMoneda("idmontoaut", "", $xCred->getMontoAutorizado()));
$oFrm5->addHTML($oUL->li("Modificar el Monto que se autorizó")->end());
$oFrm5->addFootElement($oBtn->getBasic($lguardar, "jsaCambiarMontoAutorizado();jsTipTimer()", "guardar", "idmonto"));
$oFrm5->addFootElement($oBtn->getBasic($lcancelar, "jsCancelarAccion()", "cancelar", "idcancela5"));
echo $oFrm5->get();
?>
</div>
<!-- ESTADO ACTUAL -->
<div class="inv" id="divestatus">
<?php
$oFrm4 = new cHForm("frmestatus", "", "idfrmestatus");
$oFrm4->addHElem($xSelEA->get("idestadoactual", "Estado Actual", $xCred->getEstadoActual()));
$oFrm4->addHElem($oFch->get("TR.Fecha Nueva", $xCred->getFechaDeVencimiento(), 3));
$oFrm4->addHTML($oUL->li("Modificar la Fecha de Ministración")->li("Cambiar la Fecha del Recibo de Ministración")->li("Eliminar Plan de Pagos")->li("Recalcular Intereses Devengados")->li("Reestructurar SDPM")->end());
$oFrm4->addHTML("<p class='aviso'>No se puede afectan estatus VENCIDO/MOROSO</p>");
$oFrm4->addFootElement($oBtn->getBasic($lguardar, "jsaCambiarEstadoActual();jsTipTimer()", "guardar", "idsafechamin"));
$oFrm4->addFootElement($oBtn->getBasic($lcancelar, "jsCancelarAccion()", "cancelar", "idcancela4"));
echo $oFrm4->get();
?>
</div>
<!-- PRODUCTO -->
<div class="inv" id="divpdto">
<?php
$oFrm6 = new cHForm("frmpdto", "", "idfrmpdto");
$oFrm6->addHElem($xSelPP->get("idpdto", $xFRM->lang("Producto", "Actual"), $xCred->getClaveDeProducto()));
$oFrm6->addHElem($oTxt->getDeMoneda("idtasa", $xFRM->lang("Tasa", "Actual"), $xCred->getTasaDeInteres() * 100));
$oFrm6->addHElem($oTxt->getDeMoneda("idtasamora", "TR.Tasa Moratorio", $xCred->getTasaDeMora() * 100));
$cuenta_cheques2 = DEFAULT_CUENTA_BANCARIA;
$cheque2 = 0;
$recibo_fiscal = parametro("idfoliofiscal");
$fecha = parametro("idfechaactual", false, MQL_DATE);
//descuentos
$creditodescontado = parametro("idcreditodescontado", 0, MQL_INT);
$montocreditodesc = parametro("idmontocreditodescontado", 0, MQL_FLOAT);
$montocomision = parametro("idmontocomisiondescontado", 0, MQL_FLOAT);
$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);
$xF->set($rw["fecha_operacion"]);
$cssFecha = $xF->mes() != $mes ? " class='otromes' " : " class='date' ";
$mtd = "<tr>\n\t\t\t\t\t<td {$cssFecha}>" . $xF->getFechaDDMM() . "</td>\n\t\t\t\t\t<td onclick=\"msgbox('Total Recibo " . $rw["total_recibo"] . "')\">" . $rw[2] . "</td>\n\t\t\t\t\t<td>" . $rw[3] . "</td>\n\t\t\t\t\t<td class='ajustar'>" . $rw[4] . "</td>\n\t\t\t\t\t{$tdEsp}\n\t\t\t\t\t<td class='mny'>{$sdos}</td>\n\t\t\t\t\t<td class='ajustar'>{$observa}</td>\n\t\t\t\t</tr>";
//parche de credito
if (strtotime($rw["fecha_operacion"]) < strtotime($fecha_inicial) or strtotime($rw["fecha_operacion"]) > strtotime($fecha_final)) {
$mtd = "";
}
$mes = $xF->mes();
$trs .= $mtd;
$i++;
//Imprime en pantalla el Aviso de NO COINCIDENCIA
}
//$sdo1 =
if (round($sdo, 2) != round($sdoTemp, 2)) {
if (FORCE_CUADRE_EN_OPERACIONES == true) {
if ($cFC->getEstadoActual() == CREDITO_ESTADO_AUTORIZADO or $cFC->getEstadoActual() == CREDITO_ESTADO_SOLICITADO) {
$sdo = 0;
}
$arrUp = array("saldo_actual" => $sdo);
$cFC->setUpdate($arrUp);
}
if ($cFC->getEstadoActual() != CREDITO_ESTADO_AUTORIZADO and $cFC->getEstadoActual() != CREDITO_ESTADO_SOLICITADO) {
if ($output != OUT_EXCEL) {
//echo "<style> body { background-image: url(\"../images/error_saldos.png\"); background-repeat: repeat; } </style>";
}
}
}
$tSdos += $sdo;
@mysql_free_result($rs);
//Imprime la Tabla de Mvtos
if ($PieInts != SYS_NINGUNO) {
$msg = "============================ LOG DE PLAN DE PAGOS =========================\r\n";
$msg .= "============================ GENERADO POR {$oficial} \r\n";
$msg .= "============================ FECHA " . date("Y-m-d H:s:i") . " \r\n";
$xLog = new cFileLog("log-de-plan-de-pago-{$solicitud}", true);
//DATOS PREDEFINIDOS
//$DatosPlanAnterior = false;
$OPCION_ANUAL_FLAT = true;
$decenales = array();
$dia_1_ab = PQ_DIA_PRIMERA_QUINCENA;
$dia_2_ab = PQ_DIA_SEGUNDA_QUINCENA;
$dia_3_ab = 30;
//==========================================================
$xCred = new cCredito($solicitud);
$xCred->init();
$dsol = $xCred->getDatosDeCredito();
$estatus = $xCred->getEstadoActual();
$monto_autorizado = $xCred->getMontoAutorizado();
$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();
$mMvtos = array(); $alerts = ""; //Movimientos que afectan al Capital $cAfectCapital = new cBases(2004); $aAfectCapital = $cAfectCapital->getMembers_InArray(); $mAfectCapital = 0; $plan_de_pagos = false; $socio = $xCred->getClaveDePersona(); $dcredito = $xCred->getDatosDeCredito(); $fecha_ministracion = $xCred->getFechaDeMinistracion(); // $dcredito["fecha_ministracion"]; $fecha_ult_mvto = $xCred->getFechaUltimoDePago(); $fecha_vencimiento = $xCred->getFechaDeVencimiento(); // $dcredito["fecha_vencimiento"]; $numero_de_pagos = $xCred->getPagosAutorizados(); $estatus_del_credito = $xCred->getEstadoActual(); $saldo_actual = $xCred->getSaldoActual(); $saldo_del_credito = $saldo_actual; $interes_anticipado = $dcredito["sdo_int_ant"]; $grupo = $xCred->getClaveDeGrupo(); $OProducto = $xCred->getOProductoDeCredito(); //$OEstado = $xCred->getOEstado(); $tasa_iva = $generarIVA == false ? 0 : $xCred->getTasaIVA(); $interes_normal_devengado = $xCred->getInteresNormalDevengado(); $interes_normal_pagado = $xCred->getInteresNormalPagado(); $interes_moratorio_pagado = $xCred->getInteresMoratorioPagado(); $interes_moratorio_devengado = $xCred->getInteresMoratorioDev(); $periocidad = $xCred->getPeriocidadDePago(); $ByLetra = ""; $solo_mora_corriente = $pago_total == true ? true : false; //Corrige calculo de Interes.- Si es primer pago
