$ls_denestpro5=$ls_denestpro5;
}
$ls_denestpro=$ls_denestpro1." , ".$ls_denestpro2." , ".$ls_denestpro3." , ".$ls_denestpro4." , ".$ls_denestpro5;
$ls_programatica=substr($ls_codestpro1,-$ls_loncodestpro1).substr($ls_codestpro2,-$ls_loncodestpro2).substr($ls_codestpro3,-$ls_loncodestpro3).substr($ls_codestpro4,-$ls_loncodestpro4).substr($ls_codestpro5,-$ls_loncodestpro5);
}
else
{
$ls_programatica=substr($ls_codestpro1,-$ls_loncodestpro1).substr($ls_codestpro2,-$ls_loncodestpro2).substr($ls_codestpro3,-$ls_loncodestpro3);
$ls_denestpro = array();
$ls_denestpro[0]=$ls_denestpro1;
$ls_denestpro[1]=$ls_denestpro2;
$ls_denestpro[2]=$ls_denestpro3;
}
$lb_valido=$io_report->uf_spg_reporte_mayor_analitico2($ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,
$ls_codestpro5,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,
$ls_codestpro4,$ls_codestpro5,$ldt_fecdes,$ldt_fechas,
$ls_cuentades,$ls_cuentahas,$ls_orden,$ls_estcla,$rs_data2);
if($lb_valido)
{
$li_totrow_det=$rs_data2->RecordCount();
if($li_totrow_det>1)
{
$li_row=$li_row+1;
if ($dts_empresa["estmodest"] == 2)
{
$lo_hoja->write($li_row, 0, "Programatica",$lo_titulo);
$lo_hoja->write($li_row, 1, $ls_programatica,$lo_datacenter);
$li_row=$li_row+1;
$lo_hoja->write($li_row, 2, $ls_denestpro,$lo_libro->addformat(array('font'=>'Verdana','align'=>'left','size'=>'9')));
}
