}
//------------------------------------------------------------------------------------------
$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) {
$msg .= "ERROR\tRECIBO {$recibo_pago} ... {$monto_a_operar} ....( {$totalAutomatico} ).... {$total_recibo} .... [{$abonar_al_final}] \r\n";
$xCred->setAbonoCapital($abonar_al_final, $xCred->getPagosAutorizados(), DEFAULT_CHEQUE, $tipo_pago, $recibo_fiscal, $observaciones, $grupo, $fecha_operacion, $recibo_pago);
$total_recibo += $abonar_al_final + $totalAutomatico;
}
}
$oRec->init();
$oRec->setSumaDeRecibo($total_recibo);
$oRec->setFinalizarRecibo(true);
if (MODO_DEBUG == true) {
$msg .= $oRec->getMessages(OUT_TXT);
$msg .= $xCred->getMessages(OUT_TXT);
$xFL = new cFileLog(false, true);
$xFL->setWrite($msg);
$xFL->setClose();
if ($procesado != SYS_AUTOMATICO) {
$xFRM->addToolbar($xFL->getLinkDownload("TR.Archivo de sucesos", ""));
}
}
if ($procesado != SYS_AUTOMATICO) {
$xFRM->addHElem($oRec->getFicha(true));
$total_letras = convertirletras($total_recibo);
$xBtn = new cHButton("");