if($ls_modalidad==2)
{
$ls_codestpro4=substr($ls_programatica,75,25);
if($lb_valido)
{
$ls_denestpro4="";
$lb_valido=$io_report->uf_spg_reporte_select_denestpro4($ls_codestpro1,$ls_codestpro2,$ls_codestpro3,
$ls_codestpro4,$ls_denestpro4,$ls_estcla);
$ls_denestpro4=$ls_denestpro4;
}
$ls_codestpro5=substr($ls_programatica,100,25);
if($lb_valido)
{
$ls_denestpro5="";
$lb_valido=$io_report->uf_spg_reporte_select_denestpro5($ls_codestpro1,$ls_codestpro2,$ls_codestpro3,
$ls_codestpro4,$ls_codestpro5,$ls_denestpro5,
$ls_estcla);
$ls_denestpro5=$ls_denestpro5;
}
}
if ($li_tot>0)
{
$io_pdf->ezSetDy(-10);
uf_print_cabecera_estructura($ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,
$ls_denestpro1,$ls_denestpro2,$ls_denestpro3,$ls_denestpro4,$ls_denestpro5,$io_pdf);
$io_pdf->ezSetDy(-10);
uf_print_cabecera($io_pdf);
uf_print_detalle($la_data1,$io_pdf); // Imprimimos el detalle
uf_print_pie_cabecera($la_data_tot,$io_pdf);
unset($la_data1);
unset($la_data_tot);
