}
if ($lb_valido) {
$li_monsolpre = 0;
////////////////////////////////// SALDO PREVIO //////////////////////////////////
$lb_valido = $io_report->uf_select_solicitudes_previas($ls_tipproben, $ls_codpro, $ls_cedbene, $ld_fecemides, $ld_fecemihas);
if ($lb_valido) {
$li_solcont = 0;
$li_solanul = 0;
$li_totsolprevias = $io_report->ds_solprevias->getRowCount('monsol');
// print "<br>".$li_totsolprevias."<br>";
for ($li_j = 1; $li_j <= $li_totsolprevias; $li_j++) {
$ls_estatus = $io_report->ds_solprevias->getValue('estatus', $li_j);
$li_monsol = $io_report->ds_solprevias->getValue('monsol', $li_j);
$ls_numsolaux = $io_report->ds_solprevias->getValue('numsol', $li_j);
if ($ls_estretiva == "B") {
$li_monretiva = $io_report->uf_select_det_deducciones_solpag($ls_numsolaux);
$li_monsol = $li_monsol + $li_monretiva;
}
switch ($ls_estatus) {
case "C":
$li_solcont = $li_solcont + $li_monsol;
break;
case "A":
$li_solanul = $li_solanul + $li_monsol;
break;
}
}
$li_monsolpre = $li_solcont - $li_solanul;
}
$li_monpagpre = 0;
$lb_valido = $io_report->uf_select_pagosprevios($ls_tipproben, $ls_codpro, $ls_cedbene, $ld_fecemides, $ld_fecemihas, $li_monpagpre, $li_monretpre);
