{
$ls_codasi= $io_report->ds_detalle->data["codasi"][$li_s];
$ls_denasi= $io_report->ds_detalle->data["denasi"][$li_s];
$li_canasi= $io_report->ds_detalle->data["canasi"][$li_s];
$li_monto= $io_report->ds_detalle->data["monto"][$li_s];
$li_subtotal = $li_monto*$li_canasi;
$li_total=$li_total+$li_subtotal;
$li_canasi=number_format($li_canasi,2,",",".");
$li_monto=number_format($li_monto,2,",",".");
$li_subtotal=number_format($li_subtotal,2,",",".");
$la_data[$li_s]=array('codigo'=>$ls_codasi,'descripcion'=>$ls_denasi,'tarifa'=>$li_monto,'dias'=>$li_canasi,'subtotal'=>$li_subtotal);
}
$io_numero_letra->setNumero($li_total);
$ls_totalletras=$io_numero_letra->letra();
$li_total=number_format($li_total,2,",",".");
uf_print_detalle_asignaciones($la_data,$li_total,$ls_totalletras,$io_pdf); // Imprimimos el detalle
unset($la_data);
$io_report->ds_detalle->reset_ds();
$lb_existe=$io_report->uf_select_solicitudpago_spg($ls_codemp,$ls_codsolvia);
if($lb_existe)
{
$li_totrow_detpres=$io_report->ds_detpresup->getRowCount("spg_cuenta");
$ls_ano=substr($_SESSION["la_empresa"]["periodo"],0,4);
for($li_j=1;$li_j<=$li_totrow_detpres;$li_j++)
{
$ls_spgcuenta=$io_report->ds_detpresup->data["spg_cuenta"][$li_j];
$ls_denestpro1=$io_report->ds_detpresup->data["denestpro1"][$li_j];
$ls_denestpro2=$io_report->ds_detpresup->data["denestpro2"][$li_j];
$la_data[$li_j]=array('ano'=>$ls_ano,'proyecto'=>$ls_denestpro1,'especifica'=>$ls_denestpro2,'cuenta'=>$ls_spgcuenta);
}
uf_print_detalle_presupuestario($la_data,$io_pdf); // Imprimimos el detalle
uf_print_detalle_totales($io_pdf);
uf_print_detalle_totales($io_pdf);
if ($io_pdf->ezPageCount==$li_numpag)
{// Hacemos el commit de los registros que se desean imprimir
$io_pdf->transaction('commit');
}
else
{// Hacemos un rollback de los registros, agregamos una nueva página y volvemos a imprimir
$io_pdf->transaction('rewind');
// if($li_numpag!=1)
// {
$io_pdf->ezNewPage(); // Insertar una nueva página
// }
uf_print_cabecera($ls_codsolvia,$ls_codmis,$ls_denmis,$ls_codrut,$ls_denrut,$ls_coduniadm,$ls_denunidam,
$ld_fecsolvia,$ld_fecsalvia,$ld_fecregvia,$li_numdia,$ls_obssolvia,&$io_pdf); // Imprimimos la cabecera del registro
uf_print_detalle_asignaciones($la_data_asig,$io_pdf); // Imprimimos el detalle
uf_print_detalle_personal($la_data_pers,$io_pdf); // Imprimimos el detalle
if($lb_existe)
{
uf_print_detalle_presupuestario($la_data_pres,$io_pdf,$ls_titest); // Imprimimos el detalle
uf_print_detalle_contable($la_data_cont,$io_pdf); // Imprimimos el detalle
}
uf_print_detalle_totales($io_pdf);
uf_print_detalle_totales($io_pdf);
}
}
}
unset($la_data_asig);
unset($la_data_pers);
unset($la_data_pres);
unset($la_data_cont);
