function uf_delete_dt_fuentefinanciamiento()
{
    $la_seguridad["empresa"] = $_SESSION["la_empresa"]["codemp"];
    $la_seguridad["logusr"] = $_SESSION["la_logusr"];
    $la_seguridad["sistema"] = "CFG";
    $la_seguridad["ventanas"] = "sigesp_spg_d_codestpro_codfuefin.php";
    $ls_estcla = $_POST["estcla"];
    $ls_codestpro1 = $_POST["codestpro1"];
    $ls_codestpro2 = $_POST["codestpro2"];
    $ls_codestpro3 = $_POST["codestpro3"];
    if ($_SESSION["la_empresa"]["estmodest"] == 2) {
        $ls_codestpro4 = $_POST["codestpro4"];
        $ls_codestpro5 = $_POST["codestpro5"];
    } else {
        $ls_codestpro4 = $ls_codestpro5 = "";
    }
    $li_totrows = $_POST["totrows"];
    $ls_codfuefin = $_POST["codfuefin"];
    $la_datfuefin = array();
    if (empty($ls_codfuefin)) {
        for ($li_i = 1; $li_i <= $li_totrows; $li_i++) {
            $ls_codfuefin = $_POST["txtcodfuefin" . $li_i];
            $ls_denfuefin = $_POST["txtdenfuefin" . $li_i];
            $la_datfuefin["codfuefin"][$li_i] = $ls_codfuefin;
            $la_datfuefin["denfuefin"][$li_i] = $ls_denfuefin;
        }
    } else {
        $ls_denfuefin = $_POST["denfuefin"];
        $la_datfuefin["codfuefin"][1] = $ls_codfuefin;
        $la_datfuefin["denfuefin"][1] = $ls_denfuefin;
    }
    require_once "sigesp_spg_c_codestpro_codfuefin.php";
    $io_codfue = new sigesp_spg_c_codestpro_codfuefin("../../../");
    $lb_valido = $io_codfue->uf_delete_dt_fuentefinanciamiento($ls_codestpro1, $ls_codestpro2, $ls_codestpro3, $ls_codestpro4, $ls_codestpro5, $ls_estcla, $la_datfuefin, $la_seguridad);
    if (!$lb_valido) {
        uf_print_detalles($li_totrows);
    }
}
						   $ls_feccot = $row["feccot"];
						   $ls_feccot = $io_funciones->uf_convertirfecmostrar($ls_feccot);
						   $ls_obscot = $row["obscot"];
						   $ls_tipcot = $row["tipcot"];
						   if ($ls_tipcot=='B')
							  {
							    $ls_tipcot = "Bienes";
							  }
						   elseif($ls_tipcot=='S')
							  {
							    $ls_tipcot = "Servicios";
							  }
						   $ls_nompro = $row["nompro"];
						   $la_data[$li_i] = array('numcot'=>$ls_numcot,'nompro'=>$ls_nompro,'obscot'=>$ls_obscot,'feccot'=>$ls_feccot,'tipcot'=>$ls_tipcot);
						 }
				   uf_print_detalles($la_data,$io_pdf);//Imprimimos el detalle 										
				   uf_print_pie_cabecera($li_i,$io_pdf);
				   $io_pdf->setStrokeColor(0,0,0);
				   $io_pdf->line(20,50,580,50);
				   $io_pdf->ezStopPageNumbers(1,1);
				   $io_pdf->ezStream();
				   unset($io_pdf);
				   unset($io_report);
				   unset($io_funciones);
				 }
	          else
		         {
			       print("<script language=JavaScript>");
			       print(" alert('No hay nada que Reportar');"); 
			       print(" close();");
			       print("</script>");
    print " alert('No hay nada que Reportar');";
    print " close();";
    print "</script>";
} else {
    error_reporting(E_ALL);
    set_time_limit(1800);
    $io_pdf = new Cezpdf('LETTER', 'portrait');
    // Instancia de la clase PDF
    $io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
    // Seleccionamos el tipo de letra
    $io_pdf->ezSetCmMargins(5, 3, 3, 3);
    // Configuración de los margenes en centímetros
    $io_pdf->ezStartPageNumbers(550, 30, 10, '', '', 1);
    // Insertar el número de página
    $li_count = 0;
    uf_print_encabezado_pagina($ls_numcmp, $ls_feccmp, $ls_codbenpre, $ls_nombenpre, $io_pdf);
    $li_count = count($la_codact);
    if ($li_count > 0) {
        for ($li_i = 0; $li_i < $li_count; $li_i++) {
            $ls_codact = $la_codact[$li_i];
            $ls_ideact = $la_ideact[$li_i];
            $ls_denact = $io_report->uf_load_nombre_activo($ls_codact);
            $la_data = array('codact' => $ls_codact, 'denact' => $ls_denact, 'ideact' => $ls_ideact);
        }
        uf_print_detalles($ls_codact, $ls_denact, $ls_ideact, $io_pdf);
    }
    $io_pdf->setStrokeColor(0, 0, 0);
    $io_pdf->line(20, 50, 580, 50);
    $io_pdf->ezStopPageNumbers(1, 1);
    $io_pdf->ezStream();
}
            $ls_feccmp = $io_funcion->uf_convertirfecmostrar($rs_data->fields["feccam"]);
            $ls_obscam = $rs_data->fields["obstra"];
            $ls_codres = $rs_data->fields["codres"];
            $ls_codact = $rs_data->fields["codact"];
            $ls_ideact = $rs_data->fields["idact"];
            $ls_seract = $rs_data->fields["seract"];
            $ls_denact = $rs_data->fields["denact"];
            $ls_codusureg = $rs_data->fields["codusureg"];
            $ls_codnewres = $rs_data->fields["codresnew"];
            $ls_nomres = $rs_data->fields["nomres1"];
            if (empty($ls_nomres)) {
                $ls_nomres = $rs_data->fields["nomres2"];
            }
            $ls_nomnewres = $rs_data->fields["nomresnew1"];
            if (empty($ls_nomnewres)) {
                $ls_nomnewres = $rs_data->fields["nomresnew2"];
            }
            uf_print_encabezado_pagina($ls_cmpmov, $ls_feccmp, $io_pdf);
            uf_print_detalles($ls_codact, $ls_denact, $ls_ideact, $ls_seract, $ls_codres, $ls_nomres, $ls_codnewres, $ls_nomnewres, $ls_obscam, $io_pdf);
            $io_pdf->setStrokeColor(0, 0, 0);
            $io_pdf->line(20, 50, 580, 50);
            $io_pdf->ezStopPageNumbers(1, 1);
            $io_pdf->ezStream();
        } else {
            print "<script language=JavaScript>";
            print " alert('No hay nada que Reportar !!!');";
            print " close();";
            print "</script>";
        }
    }
}
            // Insertar el número de página
            $ls_cmpent = $rs_data->fields["cmpent"];
            $ls_fecentuni = $io_funcion->uf_convertirfecmostrar($rs_data->fields["fecentuni"]);
            $ls_codusureg = $rs_data->fields["codusureg"];
            $ls_coduniadm = $rs_data->fields["coduniadm"];
            $ls_denuniadm = $rs_data->fields["denuniadm"];
            $ls_codres = $rs_data->fields["codres"];
            $ls_obsentuni = $rs_data->fields["obsentuni"];
            $ls_codnewres = $rs_data->fields["codresnew"];
            $ls_nomres = $rs_data->fields["nomres1"];
            if (empty($ls_nomres)) {
                $ls_nomres = $rs_data->fields["nomres2"];
            }
            $ls_nomnewres = $rs_data->fields["nomresnew1"];
            if (empty($ls_nomnewres)) {
                $ls_nomnewres = $rs_data->fields["nomresnew2"];
            }
            uf_print_encabezado_pagina($ls_cmpent, $ls_fecentuni, $io_pdf);
            uf_print_detalles($ls_coduniadm, $ls_denuniadm, $ls_codres, $ls_nomres, $ls_codnewres, $ls_nomnewres, $ls_obsentuni, $io_pdf);
            $io_pdf->setStrokeColor(0, 0, 0);
            $io_pdf->line(20, 50, 580, 50);
            $io_pdf->ezStopPageNumbers(1, 1);
            $io_pdf->ezStream();
        } else {
            print "<script language=JavaScript>";
            print " alert('No hay nada que Reportar !!!');";
            print " close();";
            print "</script>";
        }
    }
}