$li_totalmontoporcentaje=0;
for($li_i=1;(($li_i<=$li_totrow)&&($lb_valido));$li_i++)
{
$ls_codded=$io_report->DS->data["codded"][$li_i];
$ls_codtipper=$io_report->DS->data["codtipper"][$li_i];
$ls_desded=$io_report->DS->data["desded"][$li_i];
$ls_destipper=$io_report->DS->data["destipper"][$li_i];
$li_cargoprog=0;
$li_cargoreal=0;
$li_cargoabsoluta=0;
$li_cargoporcentaje=0;
$li_montoprog=0;
$li_montoreal=0;
$li_montoabsoluta=0;
$li_montoporcentaje=0;
$lb_valido=$io_report->uf_comparado0506_real($ls_rango,$ls_codded,$ls_codtipper,$li_cargoreal,$li_montoreal); // Obtenemos los valores reales
if($lb_valido)
{
$li_desde=intval(substr($ls_rango,0,2));
$li_hasta=intval(substr($ls_rango,3,2));
for($li_s=$li_desde;$li_s<=$li_hasta;$li_s++)
{
switch($li_s)
{
case 1;
$li_cargoprog=$li_cargoprog+round($io_report->DS->data["carene"][$li_i],2);
$li_montoprog=$li_montoprog+round($io_report->DS->data["monene"][$li_i],2);
break;
case 2;
$li_cargoprog=$li_cargoprog+round($io_report->DS->data["carfeb"][$li_i],2);
$li_montoprog=$li_montoprog+round($io_report->DS->data["monfeb"][$li_i],2);
