////////////////////////// GRID DETALLE PRESUPUESTARIO ////////////////////////////////////// $lb_valido = $io_report->uf_select_detalle_spg($ls_numsol); // Cargar el DS con los datos del reporte if ($lb_valido) { $io_report->ds_detalle_spg->group_by(array('0' => 'codestpro', '1' => 'estcla', '2' => 'spg_cuenta'), array('0' => 'monto'), array('0' => 'codestpro', '1' => 'estcla', '2' => 'spg_cuenta')); $li_totrowspg = $io_report->ds_detalle_spg->getRowCount("codestpro"); $la_data = ""; $li_totpre = 0; for ($li_s = 1; $li_s <= $li_totrowspg; $li_s++) { $ls_codestpro = $io_report->ds_detalle_spg->data["codestpro"][$li_s]; $ls_spgcuenta = $io_report->ds_detalle_spg->data["spg_cuenta"][$li_s]; $ls_denominacion = $io_report->ds_detalle_spg->data["denominacion"][$li_s]; $li_monto = $io_report->ds_detalle_spg->data["monto"][$li_s]; $li_totpre = $li_totpre + $li_monto; $li_monto = number_format($li_monto, 2, ",", "."); $io_fun_cxp->uf_loadmodalidad(&$li_len1, &$li_len2, &$li_len3, &$li_len4, &$li_len5, &$ls_titulo); $ls_codestpro1 = substr($ls_codestpro, 0, 25); $ls_codestpro2 = substr($ls_codestpro, 25, 25); $ls_codestpro3 = substr($ls_codestpro, 50, 25); $ls_codestpro4 = substr($ls_codestpro, 75, 25); $ls_codestpro5 = substr($ls_codestpro, 100, 25); $ls_codestpro1 = substr($ls_codestpro1, 25 - $li_len1, $li_len1); $ls_codestpro2 = substr($ls_codestpro2, 25 - $li_len2, $li_len2); $ls_codestpro3 = substr($ls_codestpro3, 25 - $li_len3, $li_len3); $ls_codestpro4 = substr($ls_codestpro4, 25 - $li_len4, $li_len4); $ls_codestpro5 = substr($ls_codestpro5, 25 - $li_len5, $li_len5); if ($ls_estmodest == 1) { $la_data[$li_s] = array('codestpro' => $ls_codestpro1 . " - " . $ls_codestpro2 . " - " . $ls_codestpro3, 'spg_cuenta' => $ls_spgcuenta, 'denominacion' => $ls_denominacion, 'monto' => $li_monto); } else { $ls_titcuentas = "Estructura Programatica"; $la_data[$li_s] = array('codestpro' => $ls_codestpro1 . " - " . $ls_codestpro2 . " - " . $ls_codestpro3 . " - " . $ls_codestpro4 . " - " . $ls_codestpro5, 'spg_cuenta' => $ls_spgcuenta, 'denominacion' => $ls_denominacion, 'monto' => $li_monto);