if($ls_tipo_destino=="B")
{
$ls_nomprobene=$ls_nombene;
}
if($ls_tipo_destino=="-")
{
$ls_nomprobene="";
}
if(($ls_procede_next!=$ls_procede)&&($ls_comprobante_next!=$ls_comprobante)&&($ls_nomprobene_next!=$ls_nomprobene))
{
uf_print_cabecera($ls_procede,$ls_comprobante,$ls_nomprobene,$ls_tipo_destino,$io_pdf); // Imprimimos la cabecera
}
$ls_procede_next=$ls_procede;
$ls_comprobante_next=$ls_comprobante;
$ls_nomprobene_next=$ls_nomprobene;
$lb_valido=$io_report->uf_spg_reportes_ejecucion_compromiso($ls_procede,$ls_comprobante,$ldt_fecha,$ldt_fecdes,
$ldt_fechas,$ls_spg_cuenta);
if($lb_valido)
{
$ld_sub_total_comprometer=0;
$ld_sub_total_causado=0;
$ld_sub_total_pagado=0;
$li_totrow_det=$io_report->dts_reporte->getRowCount("spg_cuenta");
for($li_s=1;$li_s<=$li_totrow_det;$li_s++)
{
$ls_programatica=$io_report->dts_reporte->data["programatica"][$li_s];
$ls_estcla=substr($ls_programatica,-1);
$ls_codestpro1=substr($ls_programatica,0,25);
$ls_denestpro1="";
$lb_valido=$io_function_report->uf_spg_reporte_select_denestpro1($ls_codestpro1,$ls_denestpro1,$ls_estcla);
if($lb_valido)
{
