{
$li_row=$li_i+1;
$la_data[$li_i]["ae"]=substr($ds_dt_spg->getValue("estpro",$li_row),20,6);
$la_data[$li_i]["uel"]=$ds_dt_spg->getValue("coduniadm",$li_row);
$ls_spg_cuenta=$ds_dt_spg->getValue("spg_cuenta",$li_row);
$li_len=strlen($ls_spg_cuenta);
$la_data[$li_i]["pa"]=uf_obtener_seccion_cuenta($ls_spg_cuenta,0,$arr_spg[1]);
$la_data[$li_i]["ge"]=uf_obtener_seccion_cuenta($ls_spg_cuenta,$arr_spg[1]+1,$arr_spg[2]);
$la_data[$li_i]["es"]=uf_obtener_seccion_cuenta($ls_spg_cuenta,$arr_spg[2]+1,$arr_spg[3]);
$la_data[$li_i]["se"]=uf_obtener_seccion_cuenta($ls_spg_cuenta,$arr_spg[3]+1,$arr_spg[4]);
$la_data[$li_i]["denominacion"]=$ds_dt_spg->getValue("denominacion",$li_row);
$la_data[$li_i]["monto"]=number_format($ds_dt_spg->getValue("monto",$li_row),2,",",".");
}
$la_anchos_col = array(8,13,4,4,4,8.04,93,31.7);
$la_indices_claves=array("ae","uel","pa","ge","es","se","denominacion","monto");
$la_filasusadas=$io_pdf->obtener_lineas_por_fila(6,$la_anchos_col,$la_data,$la_indices_claves,0);
$li_totalfilasusadas=array_sum($la_filasusadas);
if($li_totalfilasusadas<($li_maxfilas*2))
{
for($li_i=$li_totalfilas;$li_i<$li_maxfilas*2;$li_i++)
{
$la_data[$li_i]["ae"]="";
$la_data[$li_i]["uel"]="";
$la_data[$li_i]["pa"]="";
$la_data[$li_i]["ge"]="";
$la_data[$li_i]["es"]="";
$la_data[$li_i]["se"]="";
$la_data[$li_i]["denominacion"]="";
$la_data[$li_i]["monto"]="";
}
}
//-----------------------------Datos de la tabla-------------------------------------------------//
$li_filas=2;//(count($la_datapartidas, COUNT_RECURSIVE) / count($la_datapartidas)) - 1;
$la_datadetalle=array();
for($li_i=0;$li_i<$li_filas;$li_i++)
{
$la_datadetalle[$li_i]["codigo"]="1";
$la_datadetalle[$li_i]["descripcion"]="RETENCIONES DE IVA";
$la_datadetalle[$li_i]["monto"]="130.643,60";
}
//-------------------Este Codigo que sigue es para permitir que se cree una
//pagina nueva en caso de que sean demasiadas filas----------------------------//
$li_i=0;
$la_indices=array("codigo","descripcion","monto");
$la_anchos_col = array(22,110,38);
$la_lineasfila=$io_pdf->obtener_lineas_por_fila(7,$la_anchos_col,$la_datadetalle,$la_indices);
while($li_i<count($la_lineasfila))
{
$la_aux=array();
$li_j=0;
$li_altotabla=0;
$li_disponible=$io_pdf->get_alto_disponible()-30;
while(($li_altotabla<$li_disponible) && $li_i<count($la_lineasfila))
{
$li_altofila=$io_pdf->get_alto_fila(7,$la_lineasfila[$li_i]);
if(($li_altofila+$li_altotabla) < $li_disponible)
{
$la_aux[$li_j]=$la_datadetalle[$li_i];
$li_i++;
$li_j++;
}
