$io_pdf->line(350,620,350,590);
		$io_pdf->line(45,560,550,560);		
		$io_pdf->setLineStyle(2);
		$io_pdf->line(45,620,550,620);
		//$io_pdf->setLineStyle(2);
		$io_pdf->line(45,590,550,590);
		$io_pdf->addText(50,660,11,"<b>Obra: </b>".$as_obra);
		$io_pdf->addText(50,630,11,"<b>Ubicación:</b> ".$as_ubicacion);
		$io_pdf->addText(50,600,11,"<b>Contratista:</b> ".$as_contratista);
		$io_pdf->addText(360,600,11,"<b>Contrato Nº: </b> ".$as_codcon);
		$io_pdf->addText(50,580,9,"<b>Aprobación Contraloría Interna: </b> ");
		$io_pdf->addText(50,562,11,"<b>Nº: </b> ".$as_numcontraloria);
		$io_pdf->addText(200,562,11,"<b>Memorandum: </b> ".$as_memorandumcontraloria);
		$io_pdf->addText(400,562,11,"<b>Fecha: </b> ".$as_fechacontraloria);
		$io_pdf->addText(50,540,11,"<b>Objeto: </b> ".$as_objetocontraloria);			
	}// end function uf_print_cabecera
	//--------------------------------------------------------------------------------------------------------------------------------
	
	require_once("../../shared/ezpdf/class.ezpdf.php");	
	$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(3.5,3.5,3.5,3.5); // Configuración de los margenes en centímetros
	uf_print_encabezado_pagina("cabecera_minfra.jpg","Acta de Inicio",$io_pdf); // Imprimimos el encabezado de la página
	$io_pdf->ezStartPageNumbers(550,50,10,'','',1); // Insertar el número de página
	uf_print_cabecera("Construccion de Casas","Calle Concordia","Construcciones C.A.","12569862585",&$io_pdf,"","","","") ;
	$io_pdf->transaction('commit');
	$io_pdf->ezStopPageNumbers(1,1);
	$io_pdf->ezStream();
	unset($io_pdf);	
	unset($io_funciones);
?>
	
	 if($lb_valido==false) // Existe algún error ó no hay registros
	 {
		print("<script language=JavaScript>");
		print(" alert('No hay nada que Reportar');"); 
		print(" close();");
		print("</script>");
	 }
	 else // Imprimimos el reporte
	 {
	    error_reporting(E_ALL);
		set_time_limit(1800);
		$io_pdf=new Cezpdf('LEGAL','landscape'); // Instancia de la clase PDF
		$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
		$io_pdf->ezSetCmMargins(5.5,3,3,3); // Configuración de los margenes en centímetros
		uf_print_encabezado_pagina($ls_titulo,$ls_titulo1,$io_pdf); // Imprimimos el encabezado de la página
        $io_pdf->ezStartPageNumbers(980,40,10,'','',1); // Insertar el número de página
		$li_total=$row=$io_report->SQL->num_rows($rs_data);
		$li=0;
		while($row=$io_report->SQL->fetch_row($rs_data))
		{
			$li=$li+1;
			$ld_total_asignado=0;
			$ld_total_aumento=0;
			$ld_total_disminucion=0;
			$ld_total_monto_actualizado=0;
			$ld_total_compromiso=0;
			$ld_total_precompromiso=0;
			$ld_total_compromiso=0;
			$ld_total_saldo_comprometer=0;
			$ld_total_causado=0;
	   }
	$ls_titulo="<b>Listado de Documentos en Transito $ls_tipbol</b>";
	$io_report->uf_cargar_documentos_transito($ls_periodo,$ls_codban,$ls_ctaban,$ls_orden);
	$ldec_totaldebitos=0;
	$ldec_totalcreditos=0;
	$ldec_saldo=0;
	$lb_valido=true;
	$li_total=$io_report->ds_documentos->getRowCount("codban");
	if($li_total>0)
	{
		error_reporting(E_ALL);
		set_time_limit(1800);
		$io_pdf=new Cezpdf('A4','portrait'); // Instancia de la clase PDF
		$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
		$io_pdf->ezSetCmMargins(3.5,3,3,3); // Configuración de los margenes en centímetros
		uf_print_encabezado_pagina($ls_titulo,$ls_periodo,$ls_denban,$ls_ctaban,$ls_dencta,$io_pdf); // Imprimimos el encabezado de la página
		$io_pdf->ezStartPageNumbers(750,50,10,'','',1); // Insertar el número de página
		for($i=1;$i<=$li_total;$i++)
		{
	        $io_pdf->transaction('start'); // Iniciamos la transacción
			$li_numpag	  = $io_pdf->ezPageCount; // Número de página
			$ls_numdoc	  = $io_report->ds_documentos->getValue("numdoc",$i);
			$ls_ctaban	  = $io_report->ds_documentos->getValue("ctaban",$i);
			$ldec_monto	  = $io_report->ds_documentos->getValue("monto",$i);
			$ld_fecmov	  = $io_report->ds_documentos->getValue("fecmov",$i);
			$ld_fecmov	  =	$io_report->fun->uf_convertirfecmostrar($ld_fecmov);
			$ls_nomproben = $io_report->ds_documentos->getValue("nomproben",$i);
			$ls_codope	  = $io_report->ds_documentos->getValue("codope",$i);
			$ls_conmov	  = $io_report->ds_documentos->getValue("conmov",$i);
			$ls_estmov	  = $io_report->ds_documentos->getValue("estmov",$i);
			if ($ls_estmov=='O')
 $li_monsol = $io_report->DS->data["monsol"][$li_i];
 $numalet->setNumero($li_monsol);
 $ls_monto = $numalet->letra();
 $li_monsol = number_format($li_monsol, 2, ",", ".");
 $ld_fecemisol = $io_funciones->uf_convertirfecmostrar($ld_fecemisol);
 if ($ls_codpro != "----------") {
     $ls_codigo = $ls_codpro;
 } else {
     $ls_codigo = $ls_cedbene;
 }
 /*				if($ls_tiporeporte==0)
 				{
 					$li_monsolaux=$io_report->DS->data["monsolaux"][$li_i];
 					$li_monsolaux=number_format($li_monsolaux,2,",",".");
 				}*/
 uf_print_encabezado_pagina($ls_titulo, $ls_numsol, $ld_fecemisol, &$io_pdf);
 uf_print_cabecera($ls_numsol, $ls_codigo, $ls_nombre, $ls_denfuefin, $ld_fecemisol, $ls_consol, $ls_obssol, $li_monsol, $ls_monto, $ls_rifpro, $ls_dentipdoc, &$io_pdf);
 //////////////////////////  GRID RECEPCIONES DE DOCUMENTOS		//////////////////////////////////////
 $io_report->ds_detalle->reset_ds();
 $lb_valido = $io_report->uf_select_rec_doc_solicitud($ls_numsol);
 // Cargar el DS con los datos del reporte
 if ($lb_valido) {
     $li_totrowdet = $io_report->ds_detalle_rec->getRowCount("numrecdoc");
     $la_data = "";
     $li_totsubtot = 0;
     $li_tottot = 0;
     $li_totcar = 0;
     $li_totded = 0;
     for ($li_s = 1; $li_s <= $li_totrowdet; $li_s++) {
         $ls_numrecdoc = $io_report->ds_detalle_rec->data["numrecdoc"][$li_s];
         $ld_fecemidoc = $io_report->ds_detalle_rec->data["fecemidoc"][$li_s];
        $lb_valido=$io_report->uf_select_concursante_concurso($ls_codcondes,$ls_codconhas,$ls_estconper,$ls_orden,$rs_datcon);
		if ($lb_valido==false)
		{
		    print("<script language=JavaScript>");
			print(" alert('No hay nada que reportar');"); 
			print(" close();");
			print("</script>");
		}		   
		else  // Imprimimos el reporte
		{       
		    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->ezStartPageNumbers(570,47,8,'','',1); // Insertar el número de página			
			uf_print_encabezado_pagina($ls_titulo,&$io_pdf);
			$ls_auxcodigo="";
			$li_i=0;
			$li_conact=0;
			$li_conexc=0;
			while ((!$rs_datcon->EOF)&&($lb_valido))
		    {
		   		$ls_codigo=$rs_datcon->fields["codcon"];	
				
				
				if (($ls_codigo!=$ls_auxcodigo)&&($ls_auxcodigo!=""))
				{
					uf_print_datos_concurso($ls_auxcodigo,$ls_descrip,$ls_cargo,$ls_descar,$ls_fecaper,$ls_feccie,
				                            $ls_cantcar,$ls_tipo,$ls_estatus,$io_pdf);
											
					uf_print_datos_concursantes($la_data,$io_pdf);
	 $lb_valido=$io_report->uf_spg_reporte_select_comprobante_formato2($ls_cuentades,$ls_cuentahas,$ldt_fecdes,$ldt_fechas);
	 if($lb_valido==false) // Existe algún error ó no hay registros
	 {
		print("<script language=JavaScript>");
		print(" alert('No hay nada que Reportar');");
		print(" close();");
		print("</script>");
	 }
	 else // Imprimimos el reporte
	 {
	    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(4.5,3,3,3); // Configuración de los margenes en centímetros
		uf_print_encabezado_pagina($ls_titulo,$ls_periodo_comp,$ls_fecha_comp,$io_pdf); // Imprimimos el encabezado de la página
		$io_pdf->ezStartPageNumbers(550,50,10,'','',1); // Insertar el número de página
		$li_tot=$io_report->dts_cab->getRowCount("comprobante");
		$ld_total=0;
		$ld_totalcomprobante=0;
		$ld_totalprogramatica=0;
		for($li_i=1;$li_i<=$li_tot;$li_i++)
		{
	        $io_pdf->transaction('start'); // Iniciamos la transacción
			$thisPageNum=$io_pdf->ezPageCount;
			$ls_comprobante=$io_report->dts_cab->data["comprobante"][$li_i];
			$ls_procede=$io_report->dts_cab->data["procede"][$li_i];
			$ls_ced_bene=$io_report->dts_cab->data["ced_bene"][$li_i];
			$ls_cod_pro=$io_report->dts_cab->data["cod_pro"][$li_i];
			$ls_nompro=$io_report->dts_cab->data["nompro"][$li_i];
			$ls_apebene=$io_report->dts_cab->data["apebene"][$li_i];
				$ld_monto     = number_format($ld_monto,2,',','.');	
				$ld_tasa      = number_format($ld_tasa,2,',','.');	     
				$ld_mondiv    = number_format($ld_mondiv,2,',','.');	     
				$ld_porcentaje= number_format($ld_porcentaje,0,'','');	     
				$ld_monant    = number_format($ld_monant,2,',','.');	     
				$ld_montoseg  = number_format($ld_montoseg,2,',','.');	     			
				$li_totconv  = number_format($li_totconv,2,',','.');	     			
				if($ls_formapago=="s1")
				 {
					$ls_formapago="";
				 }				 
				if($ls_condicion=="s1")
				 {
					$ls_condicion="";
				 }				 
				uf_print_encabezado_pagina($ls_estcondat,$hidnumero,$ls_fecord,&$io_pdf); // Imprimimos el encabezado de la página
				uf_print_cuadros_superiores($ls_lugcom,$ls_condicion,$ls_proveedor,$ls_dirpro,$ls_telpro,$li_diaplacom,
											$ls_formapago,$ls_dirdependencia,$io_pdf);
		}				  
		//-------------------------------SPG-------------------------------------- 												
		$li_totrowspg=0;
		$lb_validosqg   =$io_report->uf_select_cuenta_spg($ls_codemp,$hidnumero,$hidtipcom);
		$li_totrowspg=$io_report->ds_spg_dt->getRowCount("numordcom");
		$li_totrowcount=$li_totrowspg;
		if($li_totrowspg<4)
		{
			$li_totrowcount=4;
		}
		for($li_i=1;$li_i<=$li_totrowcount;$li_i++)
		{
			if($li_i<=$li_totrowspg)
     $lb_valido=$io_report->uf_spg_reporte_informacion_mensual_eje_fin($ldt_fecdes,$ldt_fechas,$ls_tipo);

	 if($lb_valido==false) // Existe algún error ó no hay registros
	 {
		print("<script language=JavaScript>");
		print(" alert('No hay nada que Reportar');"); 
		print(" close();");
		print("</script>");
	 }
	 else // Imprimimos el reporte
	 {
	    error_reporting(E_ALL);
		set_time_limit(1800);
		$io_pdf=new Cezpdf('LEGAL','landscape'); // Instancia de la clase PDF
		$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
		uf_print_encabezado_pagina($ls_titulo,"(En Bolivar Fuerte)",$ls_mes,$io_pdf); // Imprimimos el encabezado de la página
 	    $io_pdf->ezStartPageNumbers(980,40,10,'','',1); // Insertar el número de página
		$io_pdf->transaction('start'); // Iniciamos la transacción
		$thisPageNum=$io_pdf->ezPageCount;
		$li_tot=$io_report->dts_reporte->getRowCount("codigo");
	    $ld_total_programado_mensual   = 0;
		$ld_total_programado_acumulado = 0;
		$ld_total_ejecutado_mens_comp  = 0;
		$ld_total_ejecutado_mens_caus  = 0;
		$ld_total_ejecutado_mens_paga  = 0;
		$ld_total_ejecutado_acum_comp  = 0;
		$ld_total_ejecutado_acum_caus  = 0;
		$ld_total_ejecutado_acum_paga  = 0;
		$ld_total_variacion_mens_comp  = 0;
	    $ld_total_variacion_acum_comp  = 0;
	    $ld_total_variacion_mens_caus  = 0;
	 if($lb_valido==false) // Existe algún error ó no hay registros
	 {
		print("<script language=JavaScript>");
		print(" alert('No hay nada que Reportar');"); 
		print(" close();");
		print("</script>");
	 }
	 else
	 {
		error_reporting(E_ALL);
		//set_time_limit(1800);
		$li_totrow=$io_report->DS->getRowCount("sc_cuenta");
		$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(3.5,3.5,3.5,3.5); // Configuración de los margenes en centímetros
		uf_print_encabezado_pagina("<b>Listado de Cuentas Contables</b>","Desde ".$ls_cuentadesde." hasta ".$ls_cuentahasta,$io_pdf); // Imprimimos el encabezado de la página
		$io_pdf->ezStartPageNumbers(550,50,10,'','',1); // Insertar el número de página
		for($li_i=1;$li_i<=$li_totrow;$li_i++)
		{
			$thisPageNum=$io_pdf->ezPageCount;
			$li_totprenom=0;
			$ldec_mondeb=0;
			$ldec_monhab=0;
			$li_totant=0;
			$ls_cuenta=rtrim($io_report->DS->getValue("sc_cuenta",$li_i));
			$ls_denominacion=rtrim($io_report->DS->getValue("denominacion",$li_i));
			$li_totfil=0;
			$as_cuenta="";
			for($li=$li_total;$li>1;$li--)
			{
				$li_ant=$ia_niveles_scf[$li-1];
            }
            $ldec_totcomsiniva = $ldec_totcomsiniva + $ldec_sinderiva;
            $ldec_basimpga = $ldec_totbasimp9 + $ldec_totbasimp25;
            //Total Base Imponible Compras Internas Afectadas en Alicuota General + Adicional(9% y 25%).
            $ldec_totgenadi = $ldec_totimp9 + $ldec_totimp25;
            //Total Compras Internas Afectadas en Alicuota Reducida. Impuestos al 9% y 25%.
            $ldec_totbaseimp = $ldec_totbaseimp + $ls_basnota;
            if ($ldec_totcomsiniva < 0 && $ldec_totcomsiniva > -0.004) {
                $ldec_totcomsiniva = abs($ldec_totcomsiniva);
            }
        }
    }
    //fin del while
    //uf_print_encabezado_pagina($ls_mes,$ls_ano,$ld_tot_basimp,$ld_tot_sinderiva,$ld_monimp14,$ld_monimp8,$io_pdf);
    $ldec_totgenadi = $ldec_totimp9 + $ldec_totimp25;
    //Total Compras Internas Afectadas en Alicuota Reducida. Impuestos al 14% y 25%.
    uf_print_encabezado_pagina($ls_mes, $ls_agno, $ldec_totbaseimp, $ldec_totcomsiniva, $ldec_totimp9, $ldec_totimp8, $ldec_totgenadi, &$io_pdf);
    uf_insert_seguridad($ls_periodo);
} else {
    print "<script language=JavaScript>";
    print "alert('No hay Registros para Mostrar');";
    print "close();";
    print "</script>";
}
$io_pdf->ezStream();
// Mostramos el reporte
unset($io_report);
unset($io_funciones);
unset($io_fun_nomina);
?>
 
				$li_montotcar=$io_report->DS->data["montotcar"][$li_i];
				$numalet->setNumero($li_monto);
				$ls_monto= $numalet->letra();
				$li_monto=number_format($li_monto,2,",",".");
				$li_monbasimptot=number_format($li_monbasimptot,2,",",".");
				$li_montotcar=number_format($li_montotcar,2,",",".");
				$ld_fecregsol=$io_funciones->uf_convertirfecmostrar($ld_fecregsol);
				if($ls_codpro!="----------")
				{
					$ls_codigo=$ls_codpro;
				}
				else
				{
					$ls_codigo=$ls_cedbene;
				}						
				uf_print_encabezado_pagina($ls_titulo,$ls_numsol,$ld_fecregsol,$ls_dentipsol,&$io_pdf);
				uf_print_cabecera($ls_numsol,$ls_coduniadm,$ls_denuniadm,$ls_denfuefin,$ls_codigo,$ls_nombre,$ls_consol,&$io_pdf);
				$io_report->ds_detalle->reset_ds();
				$lb_valido=$io_report->uf_select_dt_solicitud($ls_numsol); // Cargar el DS con los datos del reporte
				if($lb_valido)
				{
					$li_totrowdet=$io_report->ds_detalle->getRowCount("codigo");
					$la_data="";
					for($li_s=1;$li_s<=$li_totrowdet;$li_s++)
					{
						$ls_codigo=$io_report->ds_detalle->data["codigo"][$li_s];
						$ls_tipo=$io_report->ds_detalle->data["tipo"][$li_s];
						$ls_denominacion=$io_report->ds_detalle->data["denominacion"][$li_s];
						$ls_unidad=$io_report->ds_detalle->data["unidad"][$li_s];
						$li_cantidad=$io_report->ds_detalle->data["cantidad"][$li_s];
						$li_cosuni=$io_report->ds_detalle->data["monpre"][$li_s];
    // Cargar el DS con los datos de la cabecera del reporte
}
if ($lb_valido == false) {
    print "<script language=JavaScript>";
    print " alert('No hay nada que Reportar');";
    print " close();";
    print "</script>";
} else {
    error_reporting(E_ALL);
    $io_pdf = new Cezpdf('LETTER', 'landscape');
    // Instancia de la clase PDF
    $io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
    // Seleccionamos el tipo de letra
    $io_pdf->ezSetCmMargins(11.7, 4, 1, 2);
    // Configuración de los margenes en centímetros
    uf_print_encabezado_pagina($io_pdf);
    // Imprimimos el encabezado de la página
    $li_totrow = $io_report->DS->getRowCount("tipproben");
    for ($li_i = 1; $li_i <= $li_totrow && $lb_valido; $li_i++) {
        $li_total_pagado = 0;
        $li_total_retencion = 0;
        $li_total_impuesto = 0;
        $ls_tipproben = $io_report->DS->data["tipproben"][$li_i];
        $ls_nompro = $io_report->DS->data["nompro"][$li_i];
        $ls_nacpro = $io_report->DS->data["nacpro"][$li_i];
        $ls_rifpro = $io_report->DS->data["rifpro"][$li_i];
        $ls_nitpro = $io_report->DS->data["nitpro"][$li_i];
        $ls_dirpro = $io_report->DS->data["dirpro"][$li_i];
        $ls_telpro = $io_report->DS->data["telpro"][$li_i];
        $ls_nombene = $io_report->DS->data["nombene"][$li_i];
        $ls_apebene = $io_report->DS->data["apebene"][$li_i];
            $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>";
        }
    }
}
				print("<script language=JavaScript>");
				print(" alert('No hay nada que Reportar');"); 
				print(" close();");
				print("</script>");
			}
			else // Imprimimos el reporte
			{
				$li_totrow=$io_report->io_sql->num_rows($rs_data);
				$li_totrowtot=$li_totrowtot+$li_totrow;
				$li_k=0;
				while($row=$io_report->io_sql->fetch_row($rs_data))
				{
					$li_k=$li_k+1;
					$ls_codsolvia= $row["codsolvia"];
					$io_encabezado=$io_pdf->openObject();
					uf_print_encabezado_pagina($ls_codsolvia,$io_encabezado,$io_pdf); // Imprimimos el encabezado de la página
					$ls_cedper= $row["cedper"];
					$ls_nomper= $row["nomper"]." ".$row["apeper"];
					$ls_cargo= $row["cargo"];
					$ls_desuniadm= $row["desuniadm"];
					$ls_codcueban = $row["codcueban"];
					$ls_tipcuebanper= $row["tipcuebanper"];
					$ls_desded= $row["desded"];
					$ls_destipper= $row["destipper"];			
					$ls_codclavia= $row["codclavia"];
					$ld_fecsalvia= $row["fecsalvia"];
					$ld_fecregvia= $row["fecregvia"];
					$li_numdiavia= $row["numdiavia"];
					$ls_denmis= $row["denmis"];
					$li_acompanante= $row["acompanante"];
					uf_print_cabecera($ls_cedper,$ls_nomper,$ls_desuniadm,$ls_codcueban,$ls_tipcuebanper,$ls_desded,$ls_destipper,
			$ls_nomban		= $class_report->uf_select_data($io_sql,"SELECT nomban FROM scb_banco WHERE codban ='".$ls_codban."' AND codemp='".$ls_codemp."'","nomban");
			$ls_ctaban		= $ds_voucher->data["ctaban"][$li_i];
			$ls_chevau		= $ds_voucher->data["chevau"][$li_i];
			$ld_fecmov	  	= $io_funciones->uf_convertirfecmostrar($ds_voucher->data["fecmov"][$li_i]);
			$ls_nomproben 	= $ds_voucher->data["nomproben"][$li_i];
			$ls_solicitudes = $class_report->uf_select_solicitudes($ls_numdoc,$ls_codban,$ls_ctaban);
			$ls_conmov		= $ds_voucher->getValue("conmov",$li_i);
			$ldec_monret	= $ds_voucher->getValue("monret",$li_i);
			$ldec_monto		= $ds_voucher->getValue("monto",$li_i);
			//$ldec_total		= $ldec_monto-$ldec_monret;
			$ldec_total		= $ldec_monto;
			//Asigno el monto a la clase numero-letras para la conversion.
			$numalet->setNumero($ldec_total);
			//Obtengo el texto del monto enviado.
			$ls_monto= $numalet->letra();
			uf_print_encabezado_pagina(number_format($ldec_total,2,",","."),$ls_nomproben,$ls_monto,$_SESSION["la_empresa"]["ciuemp"].", ".$ld_fecmov,$io_pdf); // Imprimimos el encabezado de la p�gina
			uf_print_cabecera($ls_numdoc,$ls_nomban,$ls_ctaban,$ls_chevau,$ls_nomproben,$ls_solicitudes,$ls_conmov,$io_pdf); // Imprimimos la cabecera del registro
			
			$ds_dt_scg->data=$class_report->uf_cargar_dt_scg($ls_numdoc,$ls_codban,$ls_ctaban,$ls_codope); // Obtenemos el detalle del reporte
			$la_items = array('0'=>'scg_cuenta','1'=>'debhab');
			$la_suma  = array('0'=>'monto');
			$ds_dt_scg->group_by($la_items,$la_suma,'scg_cuenta');
			$li_totrow_det=$ds_dt_scg->getRowCount("scg_cuenta");
			$ds_dt_spg->data=$class_report->uf_cargar_dt_spg($ls_numdoc,$ls_codban,$ls_ctaban,$ls_codope);
			$la_items = array('0'=>'estpro','1'=>'spg_cuenta');
			$la_suma  = array('0'=>'monto');
			$ds_dt_spg->group_by($la_items,$la_suma,'spg_cuenta');
			$li_totrow_spg=$ds_dt_spg->getRowCount("spg_cuenta");
			///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
			// Ciclo para unir en una sola matriz los detalles de presupuesto y los contables para proceder luego a imprimirlos.
			///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
				   {
				     $ls_denmun = $io_report->uf_select_denominacion('sigesp_municipio','denmun',"WHERE codpai='".$ls_codpai."' AND codest='".$ls_codest."' AND codmun='".$ls_codmun."'");				   
				   }
				$ls_codpar = $row["codpar"];
				if ($ls_codpar!="---")
				   {
				     $ls_denpar = $io_report->uf_select_denominacion('sigesp_parroquia','denpar',"WHERE codpai='".$ls_codpai."' AND codest='".$ls_codest."' AND codmun='".$ls_codmun."' AND codpar='".$ls_codpar."'");				   
				   }
				$ls_codmon = $row["codmon"];
				if ($ls_codmon!="---")
				   {
				     $ls_moneda = $io_report->uf_select_denominacion('sigesp_moneda','denmon',"WHERE codmon='".$ls_codmon."'");   
				   }
				
				uf_print_encabezado_pagina($ls_estcondat,$ls_numordcom,$ld_fecordcom,$ls_codpro,$ls_nompro,$ls_rifpro,$ls_dirpro,
	                                       $ls_telpro,$ls_denfuefin,$ls_coduniadm,$ls_denuniadm,$ls_obsordcom,
										   $ls_nomdep,$ls_dirdep,$ls_diaplacom,$ls_seguro,$ld_porseg,$ld_monseg,$ls_forpagcom,$ls_conentord,
										   $ld_monantpag,&$io_pdf);
			   /////DETALLE  DE  LA ORDEN DE COMPRA
			   $rs_datos = $io_report->uf_select_detalle_orden_imprimir($ls_numordcom,$ls_estcondat,&$lb_valido);
			   if ($lb_valido)
			   {
		     	 $li_totrows = $io_sql->num_rows($rs_datos);
				 if ($li_totrows>0)
				 {
				    $li_i = 0;
				    while($row=$io_sql->fetch_row($rs_datos))
					{
						$li_i++;
						$ls_codartser=$row["codartser"];
						$ls_denartser=$row["denartser"];
						if($ls_estcondat=="B")
				$ls_lugentdir=$row["lugentdir"];
				$ls_estlugcom=$row["estlugcom"];
				if($ls_tiporeporte==0)
				{
					$ld_montotaux=$row["montotaux"];
					$ld_montotaux=number_format($ld_montotaux,2,",",".");
				}
				$numalet->setNumero($ld_montot);
				$ls_monto= $numalet->letra();
				$ld_montot=number_format($ld_montot,2,",",".");
				$ld_monsubtot=number_format($ld_monsubtot,2,",",".");
				$ld_monimp=number_format($ld_monimp,2,",",".");
				$ld_fecordcom=$io_funciones->uf_convertirfecmostrar($ld_fecordcom);
		 
				uf_print_encabezado_pagina($ls_estcondat,$ls_numordcom,$ld_fecordcom,$ls_coduniadm,$ls_denuniadm,
				                           $ls_lugentdir,$ls_estlugcom,$ls_codpro,$ls_nompro,$ls_obscom,$ls_rifpro,
										   $ls_diaplacom,$ls_dirpro,$ls_forpagcom,&$io_pdf);
				/////DETALLE  DE  LA ORDEN DE COMPRA
			   $rs_datos = $io_report->uf_select_detalle_orden_imprimir($ls_numordcom,$ls_estcondat,&$lb_valido);
			   if ($lb_valido)
			   {
		     	 $li_totrows = $io_sql->num_rows($rs_datos);
				 if ($li_totrows>0)
				 {
				    $li_i = 0;
				    while($row=$io_sql->fetch_row($rs_datos))
					{
						$li_i=$li_i+1;
						$ls_codartser=$row["codartser"];
						$ls_denartser=$row["denartser"];
						if($ls_estcondat=="B")
             $ls_consol = $io_report->DS->data["consol"][$li_i];
             $ls_numdoc = $io_report->DS->data["numdoc"][$li_i];
             $ls_numref = $io_report->DS->data["numref"][$li_i];
             $ld_fecemidoc = $io_funciones->uf_convertirfecmostrar($io_report->DS->data["fecemidoc"][$li_i]);
             $li_montotdoc = number_format($io_report->DS->data["montotdoc"][$li_i], 2, ',', '.');
             $li_monobjret = number_format($io_report->DS->data["monobjret"][$li_i], 2, ',', '.');
             $li_retenido = number_format($io_report->DS->data["retenido"][$li_i], 2, ',', '.');
             $li_porcentaje = number_format($io_report->DS->data["porcentaje"][$li_i], 2, ',', '.');
             if ($ls_codigo != $ls_codigoant) {
                 if ($li_z >= 1) {
                     uf_print_firma($io_pdf);
                     $io_pdf->ezNewPage();
                 }
                 $ls_codigoant = $ls_codigo;
             }
             uf_print_encabezado_pagina($ls_titulo, $ls_numsol, $io_pdf);
             uf_print_encabezado($ls_agente, $ls_nombre, $ls_rif, $ls_nit, $ls_consol, $io_pdf);
             uf_print_detalle($ls_numsol, $ld_fecemidoc, $ls_numdoc, $li_monobjret, $li_porcentaje, $li_retenido, $io_pdf);
             uf_print_firma($io_pdf);
             if ($li_i < $li_total) {
                 $io_pdf->ezNewPage();
             }
         }
     }
 }
 if ($lb_valido) {
     $io_pdf->ezStopPageNumbers(1, 1);
     // Detenemos la impresión de los números de página
     $io_pdf->ezStream();
     // Mostramos el reporte
 } else {
$ld_baseimp = 0;
$arremp = $_SESSION["la_empresa"];
$ls_codemp = $arremp["codemp"];
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf = new Cezpdf('LEGAL', 'landscape');
// Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
// Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(3.5, 3, 2.5, 2.5);
// Configuracin de los margenes en centmetros
uf_print_titulo(&$io_pdf);
$io_pdf->ezStartPageNumbers(970, 40, 10, '', '', 1);
// Insertar el nmero de pgina
$lb_valido = $io_report->uf_select_report_libcompra($as_fechadesde, $as_fechahasta, &$rs_resultado);
uf_print_encabezado_pagina($ls_titulo, $ls_mesletras, $ls_agno, &$io_pdf);
uf_print_cabecera(&$io_pdf);
$ldec_totimp8 = 0;
//Variable de tipo acumulador que almacenara el monto total de los impuestos a 8%.
$ldec_totimp9 = 0;
//Variable de tipo acumulador que almacenara el monto total de los impuestos a 14%.
$ldec_totimp25 = 0;
//Variable de tipo acumulador que almacenara el monto total de los impuestos a 25%.
$ldec_totbasimp8 = 0;
$ldec_totbasimp9 = 0;
$ldec_totbasimp25 = 0;
$ldec_totcomsiniva = 0;
if ($lb_valido) {
    $li = 0;
    while ($row = $io_report->io_sql->fetch_row($rs_resultado)) {
        $li++;
	$li_totrow=$io_report->ds_disponibilidad->getRowCount("codban");

	if($li_totrow<=0)
	{
		?>
		<script language=javascript>
		 alert('No hay datos a reportar');
		 close();
		</script>
		<?php
		exit();
	}
	$io_pdf=new Cezpdf('LETTER','landscape'); // Instancia de la clase PDF
	$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
	$io_pdf->ezSetCmMargins(3.5,3.5,3.5,3.5); // Configuración de los margenes en centímetros
	uf_print_encabezado_pagina("<b>Disponibilidad Financiera $ls_tipbol</b>","<b>Detallada al</b> ".$ld_fecha,$io_pdf); // Imprimimos el encabezado de la página
	$io_pdf->ezStartPageNumbers(700,50,10,'','',1); // Insertar el número de página
	$li_aux=0;
	$ldec_mondeb=0;
	$ldec_monhab=0;
	$ldec_monant=0;
	for($i=1;$i<=$li_totrow;$i++)
	{
		$li_aux=$li_aux+1;
		$li_totprenom=0;
		$li_totant=0;
		$ls_codban=$io_report->ds_disponibilidad->getValue("codban",$i);
		$ls_nomban=$io_report->ds_disponibilidad->getValue("nomban",$i);	
		if($i>1)
		{
			$ls_nombananterior=$io_report->ds_disponibilidad->getValue("nomban",$i-1);
							         $li_i = 0;
								     while($row=$io_sql->fetch_row($rs_datos))
								          {
									        $li_i++;
										    $ls_codigo       = $row["codite"];
										    $ls_denite       = $row["denite"];
										    $ld_canite       = number_format($row["canite"],2,',','.');
									        $la_datos[$li_i] = array('codigo'=>$ls_codigo,'denominacion'=>$ls_denite,'cantidad'=>$ld_canite);
									      }
				    		       }
						        else
							       {
							         $lb_valido = false;
							       }
						      }
					       uf_print_encabezado_pagina($ls_titulo,$ls_numsolcot,$ls_fecsolcot,$ls_tipo,$ls_obssolcot,$io_pdf);
					       uf_print_datos_proveedor($ls_codpro,$ls_nompro,$ls_dirpro,$ls_telpro,$ls_mailpro,$ls_rifpro,$io_pdf);
					       uf_print_detalle($la_datos,$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>");
			     }
				    $ls_simmon = "$";
			    }
				$numalet->setNumero($ld_montot);
				$ls_monto= $numalet->letra();
				$ld_montot=number_format($ld_montot,2,",",".");
				$ld_monsubtot=number_format($ld_monsubtot,2,",",".");
				$li_tasa=number_format($li_tasa,2,",",".");
				$ld_monimp=number_format($ld_monimp,2,",",".");
				$li_totconv=number_format($li_totconv,2,",",".");
				$ld_fecordcom=$io_funciones->uf_convertirfecmostrar($ld_fecordcom);
				if($li_tasa==0)
				{
					$li_tasa="";
					$li_totconv="";
				}
				uf_print_encabezado_pagina($ls_estcondat,$ls_numordcom,$ld_fecordcom,&$io_pdf);		 
				uf_print_cuadros_superiores($ls_estlugcom,$ls_concom,$ls_nompro,$ls_dirpro,$ls_telpro,$li_diaplacom,$ls_forpagcom,
										    $ls_lugentdir,&$io_pdf);
				    /////DETALLE  DE  LAS  CUENTAS DE GASTOS DE LA ORDEN DE COMPRA
					$rs_datos_cuenta=$io_report->uf_select_cuenta_gasto($ls_numordcom,$ls_estcondat,&$lb_valido); 
					if($lb_valido)
					{
						 $li_totrows = $io_sql->num_rows($rs_datos_cuenta);
						 if ($li_totrows>0)
						 {
							$li_s = 0;
							while($row=$io_sql->fetch_row($rs_datos_cuenta))
							{
								$li_s=$li_s+1;
								$ls_codestpro1=trim($row["codestpro1"]);
								$ls_codestpro2=trim($row["codestpro2"]);
 $ls_obssol = $io_report->DS->data["obssol"][$li_i];
 $li_monsol = $io_report->DS->data["monsol"][$li_i];
 $numalet->setNumero($li_monsol);
 $ls_monto = $numalet->letra();
 $li_monsol = number_format($li_monsol, 2, ",", ".");
 $ld_fecemisol = $io_funciones->uf_convertirfecmostrar($ld_fecemisol);
 if ($ls_codpro != "----------") {
     $ls_codproben = $ls_codpro;
 } else {
     $ls_codproben = $ls_cedbene;
 }
 if ($ls_tiporeporte == 0) {
     $li_monsolaux = $io_report->DS->data["monsolaux"][$li_i];
     $li_monsolaux = number_format($li_monsolaux, 2, ",", ".");
 }
 uf_print_encabezado_pagina($ls_titulo, $ls_numsol, $ld_fecemisol, $ls_codproben, $ls_nomproben, $ls_rifpro, $ls_consol, $ls_monto, $li_monsol, &$io_pdf);
 //////////////////////////  GRID RECEPCIONES DE DOCUMENTOS		//////////////////////////////////////
 $io_report->ds_detalle->reset_ds();
 $lb_valido = $io_report->uf_select_rec_doc_solicitud($ls_numsol);
 // Cargar el DS con los datos del reporte
 if ($lb_valido) {
     $li_totrowdet = $io_report->ds_detalle_rec->getRowCount("numrecdoc");
     $la_data = "";
     $li_totsubtot = 0;
     $li_tottot = 0;
     $li_totcar = 0;
     $li_totded = 0;
     for ($li_s = 1; $li_s <= $li_totrowdet; $li_s++) {
         $ls_numrecdoc = $io_report->ds_detalle_rec->data["numrecdoc"][$li_s];
         $ld_fecemidoc = $io_report->ds_detalle_rec->data["fecemidoc"][$li_s];
         $ls_numdoccomspg = $io_report->ds_detalle_rec->data["numdoccomspg"][$li_s];
				$ld_perentdesde=$io_funciones->uf_convertirfecmostrar($ld_perentdesde);
				$ld_perenthasta=$io_funciones->uf_convertirfecmostrar($ld_perenthasta);
				if($ls_tiporeporte==0)
				{
					$ld_montotaux=$row["montotaux"];
					$ld_montotaux=number_format($ld_montotaux,2,",",".");
				}
				$numalet->setNumero($ld_montot);
				$ls_monto= $numalet->letra();
				$ld_montot=number_format($ld_montot,2,",",".");
				$ld_monsubtot=number_format($ld_monsubtot,2,",",".");
				$ld_monimp=number_format($ld_monimp,2,",",".");
				$ld_fecordcom=$io_funciones->uf_convertirfecmostrar($ld_fecordcom);
		 
				uf_print_encabezado_pagina($ls_estcondat,$ls_numordcom,$ld_fecordcom,$ls_coduniadm,$ls_denuniadm,
				                           $ls_codfuefin,$ls_denfuefin,$ls_codpro,$ls_nompro,$ls_obscom,$ls_rifpro,
										   $ls_diaplacom,$ls_dirpro,$ls_forpagcom,$ld_perentdesde,$ld_perenthasta,&$io_pdf);
				/////DETALLE  DE  LA ORDEN DE COMPRA
			   $rs_datos = $io_report->uf_select_detalle_orden_imprimir($ls_numordcom,$ls_estcondat,&$lb_valido);
			   if ($lb_valido)
			   {
		     	 $li_totrows = $io_sql->num_rows($rs_datos);
				 if ($li_totrows>0)
				 {
				    $li_i = 0;
				    while($row=$io_sql->fetch_row($rs_datos))
					{
						$li_i=$li_i+1;
						$ls_codartser=$row["codartser"];
						$ls_denartser=$row["denartser"];
						if($ls_estcondat=="B")
	  if ($lb_valido==false)
		 {
		   print("<script language=JavaScript>");
		   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(6.2,4,3,3); // Configuración de los margenes en centímetros
			$ls_titulo = "<b>SOLICITUD DE MODIFICACIÓN PRESUPUESTARIA Nº. ".$ls_comprobante."</b>";
			uf_print_encabezado_pagina($ls_titulo,$ls_procede,$ld_fecha,$io_pdf); // Imprimimos el encabezado de la página
			$li_total   = count($ia_niveles_scg);
			$li_numrows = 0;
			
			$lb_ok= $io_report->uf_select_dt_comprobante($ls_codemp,$ls_procede,$ls_comprobante,$ld_fecha,&$li_numrows,$rs_dat);
			if ($li_numrows==0)
			   {
				 print("<script language=JavaScript>");
				 print(" alert('No hay nada que Reportar');"); 
				 print(" close();");
				 print("</script>");
			   }
			else
			  {
				 $li_pos = 0;
				 $lb_impreso = false;
    print "<script language=JavaScript>";
    print " alert('No hay nada que Reportar');";
    print " close();";
    print "</script>";
} else {
    error_reporting(E_ALL);
    set_time_limit(1800);
    $io_pdf = new Cezpdf('LEGAL', 'landscape');
    // Instancia de la clase PDF
    $io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
    // Seleccionamos el tipo de letra
    $io_pdf->ezSetCmMargins(3.5, 3, 3, 3);
    // Configuración de los margenes en centímetros
    $ld_fecha = $io_report->ds->data["feccmp"][1];
    $ld_fechaaux = $io_funciones->uf_convertirfecmostrar($ld_fecha);
    uf_print_encabezado_pagina($ls_titulo, $ls_cmpmov, $ld_fechaaux, $io_pdf);
    // Imprimimos el encabezado de la página
    $li_totrow = $io_report->ds->getRowCount("cmpmov");
    for ($li_i = 1; $li_i <= $li_totrow; $li_i++) {
        $io_pdf->transaction('start');
        // Iniciamos la transacción
        $li_numpag = $io_pdf->ezPageCount;
        // Número de página
        $li_totprenom = 0;
        $li_totant = 0;
        $ls_codcau = $io_report->ds->data["codcau"][$li_i];
        $ls_dencau = $io_report->ds->data["dencau"][$li_i];
        $ls_descmp = $io_report->ds->data["descmp"][$li_i];
        uf_print_cabecera($ls_codemp, $ls_nomemp, $ls_codcau, $ls_dencau, $ls_descmp, $io_pdf);
        // Imprimimos la cabecera del registro
        $lb_valido = $io_report->uf_siv_load_dt_movreasignacion($ls_codemp, $ls_cmpmov, $ls_codcau);
} else {
    /////////////////////////////////         SEGURIDAD               ////////////////////////////////////////////////////
    $ls_desc_event = "Generó un reporte de Relacion de Bienes Muebles Faltantes. Desde el activo   " . $ls_coddesde . " hasta   " . $ls_codhasta;
    $io_fun_activos->uf_load_seguridad_reporte("SAF", "sigesp_saf_r_activo.php", $ls_desc_event);
    ////////////////////////////////         SEGURIDAD               /////////////////////////////////////////////////////
    error_reporting(E_ALL);
    set_time_limit(1800);
    $io_pdf = new Cezpdf('LEGAL', 'landscape');
    // Instancia de la clase PDF
    $io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
    // Seleccionamos el tipo de letra
    $io_pdf->ezSetCmMargins(3.5, 3, 3, 3);
    // Configuración de los margenes en centímetros
    $io_pdf->ezStartPageNumbers(940, 50, 10, '', '', 1);
    // Insertar el número de página
    uf_print_encabezado_pagina($ls_titulo, "", $ld_fecha, $io_pdf);
    // Imprimimos el encabezado de la página
    $li_totrow = $io_report->ds->getRowCount("cmpmov");
    $i = 0;
    for ($li_i = 1; $li_i <= $li_totrow; $li_i++) {
        $io_pdf->transaction('start');
        // Iniciamos la transacción
        $li_numpag = $io_pdf->ezPageCount;
        // Número de página
        $ls_cmpmov = $io_report->ds->data["cmpmov"][$li_i];
        $ls_coduniadm = $io_report->ds->data["coduniadm"][$li_i];
        $ld_feccmp = $io_report->ds->data["feccmp"][$li_i];
        $ld_feccmp = $io_funciones->uf_convertirfecmostrar($ld_feccmp);
        $lb_valido = $io_report->uf_saf_load_dt_relbiemuefal($ls_codemp, $ls_coduniadm, $ls_cmpmov, $ld_desde, $ld_hasta, $ls_coddesde, $ls_codhasta, $ls_grupo, $ls_subgrupo, $ls_seccion, $li_orden);
        // Obtenemos el detalle del reporte
        if ($lb_valido) {
	}
	if($lb_valido==false) // Existe algún error ó no hay registros
	{
		print("<script language=JavaScript>");
		print(" alert('No hay nada que Reportar');"); 
		//print(" close();");
		print("</script>");
	}
	else // Imprimimos el reporte
	{
		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(3.6,2.5,3,3); // Configuración de los margenes en centímetros
		uf_print_encabezado_pagina($io_pdf); // Imprimimos el encabezado de la página
		$io_pdf->ezStartPageNumbers(580,50,7,'','',1); // Insertar el número de página	
		$li_totrow=$io_report->DS->getRowCount("codper");		
		$li_numrowtot=$io_report->io_sql->num_rows($rs_data);
		$li_numrowtot2=$io_report->io_sql->num_rows($rs_data);		
		$i=0;
		$j=0;
		$ld_neto1=0;
		$ld_neto2=0;
		if ($li_numrowtot>0)
		{
			while ($li_numrowtot2>0)
			{    
			     $li_numrowtot2=$li_numrowtot2-1;
			     $row=$io_report->io_sql->fetch_row($rs_data);				 
			 	 $ls_cedper=$row["cedper"];
	}
	if(($lb_valido==false) || ($io_report->rs_data->RecordCount()==0)) // Existe algún error ó no hay registros
	{
		print("<script language=JavaScript>");
		print(" alert('No hay nada que Reportar');"); 
		print(" close();");
		print("</script>");
	}
	else // Imprimimos el reporte
	{
		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(3,1,1,2); // Configuración de los margenes en centímetros
		uf_print_encabezado_pagina($ls_titulo,$ls_desnom,$ls_periodo,$io_pdf); // Imprimimos el encabezado de la página
		$li_totrow=$io_report->rs_data->RecordCount();
		$li_i=1;
		while((!$io_report->rs_data->EOF)&&($lb_valido))
		{
			$li_toting=0;
			$li_totded=0;
			$ls_codper=$io_report->rs_data->fields["codper"];
			$ls_cedper=$io_report->rs_data->fields["cedper"];
			$ls_nomper=$io_report->rs_data->fields["apeper"].", ".$io_report->rs_data->fields["nomper"];
			$ls_descar=$io_report->rs_data->fields["descar"];
			$ls_codcueban=$io_report->rs_data->fields["codcueban"];
			$li_total=$io_report->rs_data->fields["total"];
			$ls_unidad=$io_report->rs_data->fields["minorguniadm"].$io_report->rs_data->fields["ofiuniadm"].
					   $io_report->rs_data->fields["uniuniadm"].$io_report->rs_data->fields["depuniadm"].
					   $io_report->rs_data->fields["prouniadm"];
		$ls_bolivares="Bs.F.";
	}
	error_reporting(E_ALL);
	set_time_limit(3000);	
	$io_pdf=new class_pdf('LETTER','landscape'); // Instancia de la clase PDF
	$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
	$io_pdf->numerar_paginas(7);	
	$io_pdf->set_margenes(0,20,0,0);	
	$ls_tipsolcot=$_GET["tipsolcot"];
	$ls_numanacot=$_GET["numanacot"];
	$ld_fecha=$_GET["fecha"];
	$ls_observacion=$_GET["observacion"];	
	$lb_valido=uf_insert_seguridad();
	if($lb_valido)
	{
		uf_print_encabezado_pagina($ls_numanacot,$ls_observacion,$ld_fecha,$io_pdf);
		$lb_valido=$io_class_report->uf_cargar_cotizaciones($ls_numanacot, $la_cotizaciones);
		if($lb_valido)
		{
			uf_print_proveedores($la_cotizaciones,$io_pdf);
			$lb_valido=$io_class_report->uf_select_items($ls_numanacot,$ls_tipsolcot,$la_items);
			if($lb_valido)
			{
				$io_pdf->set_margenes(20,20,0,0);
				uf_print_items($ls_tipsolcot,$la_items,$io_pdf);
				$la_ganadores=$io_class_report->uf_select_cotizacion_analisis($ls_numanacot,$ls_tipsolcot);
				uf_print_ganadores($ls_numanacot,$ls_tipsolcot,$la_ganadores,$io_pdf);
				$io_pdf->set_margenes(0,0,0,0);
				//uf_print_pie_pagina($io_pdf);
				$io_pdf->ezStream();
				unset($io_pdf);