$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;