function jsaEliminarRecibo($numero)
{
if (setNoMenorQueCero($numero) > 0) {
$oficial = elusuario($_SESSION["log_id"]);
$cRec = new cReciboDeOperacion(false, false, $numero);
$cRec->setNumeroDeRecibo($numero);
$cRec->setRevertir();
return $cRec->getMessages(OUT_HTML);
}
}
function setEliminar()
{
$xRec = new cReciboDeOperacion(false, true, $this->mNumeroDePlan);
$xRec->init();
$xRec->setRevertir(true);
$this->mMessages .= $xRec->getMessages(OUT_TXT);
}
$permiso = getSIPAKALPermissions($theFile);
if ($permiso === false) {
header("location:../404.php?i=999");
}
$_SESSION["current_file"] = addslashes($theFile);
//<===== FIN_H
$iduser = $_SESSION["log_id"];
//=====================================================================================================
include_once "../core/entidad.datos.php";
include_once "../core/core.deprecated.inc.php";
include_once "../core/core.fechas.inc.php";
include_once "../libs/sql.inc.php";
include_once "../core/core.config.inc.php";
include_once "../core/core.operaciones.inc.php";
$oficial = elusuario($iduser);
$idrec = $_POST["idrecibo"];
//$frn = $_GET["u"];
if (!$idrec) {
echo JS_CLOSE;
}
$cRec = new cReciboDeOperacion(false, false, $idrec);
$cRec->setNumeroDeRecibo($idrec);
$cRec->setRevertir();
//echo $cRec->getMessages("html");
saveError(10, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "EL Usuario {$oficial} Elimino el Recibo {$idrec} y sus Operaciones");
if ($u == "exn") {
header("location: frmeditarrecibos.php");
} else {
header("location: frmeliminarrecibos.php");
}
//*/
$tds .= "<tr><th></th>\n <td>Recalculo de I.V.A. por Intereses</td>\n <td class='mny'>" . getFMoney($ivaintereses) . "</td></tr>";
//setPolizaProforma($recibo_pago, 1203, $ivaintereses, $socio, $solicitud, TM_ABONO);
}
if ($ivaotros != 0) {
$tds .= "<tr><th></th>\n <td>Recalculo de I.V.A. por Otros Conceptos</td>\n <td class='mny'>" . getFMoney($ivaotros) . "</td></tr>";
//setPolizaProforma($recibo_pago, 1204, $ivaotros, $socio, $solicitud, TM_ABONO);
}
if ($capital != 0) {
$tds .= "<tr><th></th>\n <td>Capital Directo Pagado</td>\n <td class='mny'>" . getFMoney($capital) . "</td></tr>";
//setPolizaProforma($recibo_pago, OPERACION_CLAVE_PAGO_CAPITAL, $capital, $socio, $solicitud, TM_ABONO);
}
//-------------------------------- ELIMINAR EL RECIBO DE PENDIENTES ------------------------
//Si los Pendientes son CERO y el Numero de Recibo es diferente al dePendientes
if ($total_pendientes <= TOLERANCIA_SALDOS and $recibo_pendientes != $xPlan) {
$cRP = new cReciboDeOperacion(22, true, $recibo_pendientes);
$cRP->setRevertir();
$msg .= "========\tEliminando Recibo de Pendientes\t==========\r\n";
$msg .= $cRP->getMessages(OUT_TXT);
}
$xCred->init();
if ($xCred->getSaldoActual() <= TOLERANCIA_SALDOS) {
$xCred->setCreditoPagado($fecha_operacion);
}
//------------------------------------------------------------------------------------------
$oRec = new cReciboDeOperacion(RECIBOS_TIPO_PAGO_CREDITO, true);
$oRec->setNumeroDeRecibo($recibo_pago);
//Agrega un abono a la ultima letra
if ($procesado == SYS_AUTOMATICO) {
//$eqvalor = round(($monto_a_operar - $totalAutomatico),2);
$abonar_al_final = setNoMenorQueCero($monto_a_operar - $totalAutomatico, 2);
if ($abonar_al_final > TOLERANCIA_SALDOS) {