$li_debe = number_format($li_debe, 2, ',', '.');
$li_haber = number_format($li_haber, 2, ',', '.');
$li_salsol = round($li_salsol, 2);
if (doubleval($li_salsol) > 0) {
$ls_salsol = "(" . number_format($li_salsol, 2, ',', '.') . ")";
} else {
$ls_salsol = abs($li_salsol);
$ls_salsol = number_format($ls_salsol, 2, ',', '.');
}
$la_datandnc[$li_j] = array('numsol' => $ls_numdc, 'consol' => $ls_desope, 'procedencia' => $ls_procedencia, 'fecha' => $ld_fecope, 'debe' => $li_debe, 'haber' => $li_haber, 'saldo' => $ls_salsol);
}
}
////////////////////////////////// NOTAS DEBITO/CREDITO //////////////////////////////////
////////////////////////////////// PAGOS ACTUALES //////////////////////////////////
unset($la_datapag);
$lb_valido = $io_report->uf_select_informacionpagoscxp($ls_tipproben, $ls_cedbene, $ls_codpro, $ld_fecemides, $ld_fecemihas);
if ($lb_valido) {
$li_totpagact = $io_report->ds_pagactuales->getRowCount('numsol');
for ($li_j = 1; $li_j <= $li_totpagact; $li_j++) {
$ls_salsol = "";
$ls_numsol = $io_report->ds_pagactuales->getValue('numsol', $li_j);
$ls_codope = $io_report->ds_pagactuales->getValue('codope', $li_j);
$ls_conmov = $io_report->ds_pagactuales->getValue('conmov', $li_j);
$li_monto = $io_report->ds_pagactuales->getValue('monto', $li_j);
//Monto de la Solicitudes de Pago actuales.
$ld_fecmov = $io_report->ds_pagactuales->getValue('fecmov', $li_j);
if ($ls_estretiva == "B") {
$li_monretiva = $io_report->uf_select_det_deducciones_solpag($ls_numsol);
$li_monto = $li_monto + $li_monretiva;
}
$li_salsol = $li_salsol - $li_monto;
