if ($ls_estretiva == "B") {
         $li_monretiva = $io_report->uf_select_det_deducciones_solpag($ls_numsol);
         $li_monsol = $li_monsol + $li_monretiva;
     }
     $li_salsol = $li_salsol + $li_monsol;
     $li_totalhaber = $li_totalhaber + $li_monsol;
     $ld_fecsol = $io_funciones->uf_convertirfecmostrar($ld_fecsol);
     $ls_monto = number_format($li_monsol, 2, ',', '.');
     $ls_salsol = "(" . number_format($li_salsol, 2, ',', '.') . ")";
     $la_datasol[$li_j] = array('numsol' => $ls_numsol, 'consol' => $ls_consol, 'procedencia' => "", 'fecha' => $ld_fecsol, 'debe' => "0,00", 'haber' => $ls_monto, 'saldo' => $ls_salsol);
 }
 $io_report->ds_solactuales->reset_ds();
 unset($la_datasol);
 //////////////////////////////////    SOLICITUDES ACTUALES    //////////////////////////////////
 //////////////////////////////////    NOTAS DEBITO/CREDITO    //////////////////////////////////
 $lb_valido = $io_report->uf_select_informacionndnc($ls_tipproben, $ls_codigo, $ld_fecemides, $ld_fecemihas, "");
 if ($lb_valido) {
     $li_totndnc = $io_report->ds_detndnc->getRowCount('numsol');
     for ($li_j = 1; $li_j <= $li_totndnc; $li_j++) {
         $ls_numdc = $io_report->ds_detndnc->getValue('numdc', $li_j);
         $ls_codope = $io_report->ds_detndnc->getValue('codope', $li_j);
         $ls_desope = $io_report->ds_detndnc->getValue('desope', $li_j);
         $li_monto = $io_report->ds_detndnc->getValue('monto', $li_j);
         //Monto de la Solicitudes de Pago actuales.
         $ld_fecope = $io_report->ds_detndnc->getValue('fecope', $li_j);
         if ($ls_codope == "ND") {
             $li_salsol = $li_salsol + $li_monto;
             $li_debe = 0;
             $li_haber = $li_monto;
             $ls_procedencia = "Debito";
             $li_totalhaber = $li_totalhaber + $li_monto;