$ls_codcar= $io_report->ds_detpersonal->data["cargo"][$li_s];
$ls_codclavia= $io_report->ds_detpersonal->data["codclavia"][$li_s];
}
else
{
$ls_codper= $io_report->ds_detpersonal->data["codper"][$li_s];
$ls_cedper= $io_report->ds_detpersonal->data["ced_bene"][$li_s];
$ls_nomper= $io_report->ds_detpersonal->data["nombene"][$li_s]." ".$io_report->ds_detpersonal->data["apebene"][$li_s];
$ls_codcar="";
$ls_codclavia="";
}
$la_data_pers[$li_s]=array('codper'=>$ls_codper,'cedper'=>$ls_cedper,'nomper'=>$ls_nomper,'cargo'=>$ls_codcar,
'codclavia'=>$ls_codclavia);
}
uf_print_detalle_personal($la_data_pers,$io_pdf); // Imprimimos el detalle
$lb_existe=$io_report->uf_select_dt_spg($ls_codemp,$ls_codsolvia);
if($lb_existe)
{
$li_totrow_detpres=$io_report->ds_detpresup->getRowCount("spg_cuenta");
for($li_j=1;$li_j<=$li_totrow_detpres;$li_j++)
{
$ls_spgcuenta= $io_report->ds_detpresup->data["spg_cuenta"][$li_j];
$ls_codestpro1= $io_report->ds_detpresup->data["codestpro1"][$li_j];
$ls_codestpro2= $io_report->ds_detpresup->data["codestpro2"][$li_j];
$ls_codestpro3= $io_report->ds_detpresup->data["codestpro3"][$li_j];
$ls_codestpro4= $io_report->ds_detpresup->data["codestpro4"][$li_j];
$ls_codestpro5= $io_report->ds_detpresup->data["codestpro5"][$li_j];
$li_monto= $io_report->ds_detpresup->data["monto"][$li_j];
$li_monto=number_format($li_monto,2,",",".");
if($ls_modalidad==1)
