$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'))); }