unset($la_dataper);
				$io_report->uf_print_detalle_metas_x_personal($ls_nroreg,$ld_fechades,$ld_fechahas,$ls_codperdes,$ls_codperhas);// Cargar el DS con los datos del reporte
				$li_totrow1=$io_report->ds_detalle->getRowCount("codmeta");
				for($li_p=1;$li_p<=$li_totrow1;$li_p++)
				{
					$ls_codigo=$io_report->ds_detalle->data["codmeta"][$li_p];
					$ls_meta=$io_report->ds_detalle->data["meta"][$li_p];
					$ls_valor=$io_report->ds_detalle->data["valor"][$li_p];
					$ls_fechaeje=$io_report->ds_detalle->data["feceje"][$li_p];
					$ls_obse=$io_report->ds_detalle->data["obsmet"][$li_p];
					$ls_fechaeje=$io_funciones->uf_formatovalidofecha($ls_fechaeje);
					$ls_fechaeje=$io_funciones->uf_convertirfecmostrar($ls_fechaeje);
					$la_detalle[$li_p]=array('codigo'=>$ls_codigo,'meta'=>$ls_meta,
										  'valor'=>$ls_valor,'fechaeje'=>$ls_fechaeje,'obse'=>$ls_obse);
				} //fin del for
				uf_print_detalle($la_detalle,$li_totrow1,$io_pdf);
				if($li_aux<$li_totrow)
				{
					$io_pdf->ezNewPage(); // Insertar una nueva página
				}
			}// fin del for
		 }  // fin del else
 		if($lb_valido) // Si no ocurrio ningún error
				{
					$io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página
					$io_pdf->ezStream(); // Mostramos el reporte
				}
				else // Si hubo algún error
				{
					print("<script language=JavaScript>");
					print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); 
								          {
									        $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>");
			     }
	        } 
	   }			
			if((($ls_codope=="DP")||($ls_codope=="NC")))
			{
				if ($ls_estmov!='A')
				   {
				     $ldec_totaldebitos=$ldec_totaldebitos+$ldec_monto; 
				   }
				else
				   {
				     $ldec_totalcreditos=$ldec_totalcreditos+$ldec_monto;
				   }								
			}
			$ld_mon      = number_format($ldec_monto,2,",",".");
			$la_data[$i] = array('fecha'=>$ld_fecmov,'documento'=>$ls_numdoc,'operacion'=>$ls_codope,'proveedor'=>$ls_nomproben,'monto'=>$ld_mon);
			
		}
		uf_print_detalle($la_data,&$io_pdf);
		$ldec_saldo         = $ldec_totalcreditos-$ldec_totaldebitos;//Calculo del saldo total para todas las cuentas
		$ldec_totalcreditos = number_format($ldec_totalcreditos,2,",",".");
		$ldec_totaldebitos  = number_format($ldec_totaldebitos,2,",",".");
		$ldec_saldo         = number_format($ldec_saldo,2,",",".");
		uf_print_totales($ldec_totaldebitos,$ldec_totalcreditos,$ldec_saldo,&$io_pdf);
		if($lb_valido) // Si no ocurrio ningún error
		{
			$io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página
			$io_pdf->ezStream(); // Mostramos el reporte
		}
		else  // Si hubo algún error
		{
			print("<script language=JavaScript>");
			print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); 
			print(" close();");
                 $ld_fecfac = $io_funciones->uf_convertirfecmostrar($io_report->ds_detalle->data["fecfac"][$li_i]);
                 $ls_numfac = $io_report->ds_detalle->data["numfac"][$li_i];
                 $ls_numref = $io_report->ds_detalle->data["numcon"][$li_i];
                 $li_baseimp = $io_report->ds_detalle->data["basimp"][$li_i];
                 $li_porimp = $io_report->ds_detalle->data["porimp"][$li_i];
                 $li_totimp = $io_report->ds_detalle->data["totimp"][$li_i];
                 $li_totalbaseimp = $li_totalbaseimp + $li_baseimp;
                 $li_totalmontoimp = $li_totalmontoimp + $li_totimp;
                 $li_baseimp = number_format($li_baseimp, 2, ",", ".");
                 $li_porimp = number_format($li_porimp, 4, ",", ".");
                 $li_totimp = number_format($li_totimp, 2, ",", ".");
                 $la_data[$li_i] = array('numero' => $li_i, 'numsop' => $ls_numsop, 'fecfac' => $ld_fecfac, 'numfac' => $ls_numfac, 'numref' => $ls_numref, 'baseimp' => $li_baseimp, 'porimp' => $li_porimp, 'totimp' => $li_totimp);
             }
             $li_totalbaseimp = number_format($li_totalbaseimp, 2, ",", ".");
             $li_totalmontoimp = number_format($li_totalmontoimp, 2, ",", ".");
             uf_print_detalle($la_data, $li_totalbaseimp, $li_totalmontoimp, $ls_rifagenteret, &$io_pdf);
             unset($la_data);
         }
     }
     $io_report->DS->reset_ds();
     if ($li_z < $li_totrow - 1) {
         $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 {
     print "<script language=JavaScript>";
					   else
						  {
							$ls_cuentaspg   = "";	
							$ls_estpro      = "";	  
							$ldec_monto_spg = "";
						  }
					   $la_data[$li_s]=array('spg_cuenta'=>$ls_cuentaspg,'estpro'=>$ls_estpro,'monto_spg'=>$ldec_monto_spg,'scg_cuenta'=>$ls_scg_cuenta,'debe'=>$ldec_mondeb,'haber'=>$ldec_monhab);
					 }
			   }
			if (empty($la_data))
			   {
				 $ls_cuentaspg	 = '';
				 $ls_estpro		 = '';
				 $ldec_monto_spg = '';
				 $ls_scg_cuenta  = '';
				 $ldec_mondeb	 = '';
				 $ldec_monhab	 = '';
				 $la_data[1]=array('spg_cuenta'=>$ls_cuentaspg,'estpro'=>$ls_estpro,'monto_spg'=>$ldec_monto_spg,'scg_cuenta'=>$ls_scg_cuenta,'debe'=>$ldec_mondeb,'haber'=>$ldec_monhab);
				 $la_data[2]=array('spg_cuenta'=>$ls_cuentaspg,'estpro'=>$ls_estpro,'monto_spg'=>$ldec_monto_spg,'scg_cuenta'=>$ls_scg_cuenta,'debe'=>$ldec_mondeb,'haber'=>$ldec_monhab);
				 $la_data[3]=array('spg_cuenta'=>$ls_cuentaspg,'estpro'=>$ls_estpro,'monto_spg'=>$ldec_monto_spg,'scg_cuenta'=>$ls_scg_cuenta,'debe'=>$ldec_mondeb,'haber'=>$ldec_monhab);
			   }
			uf_print_detalle(array('title'=>'Detalle Presupuestario Pago','title2'=>'Detalle Contable Pago'),$la_data,$io_pdf);
		}
		$io_pdf->ezStopPageNumbers(1,1);
		$io_pdf->ezStream();
		unset($io_pdf);
		unset($class_report);
		unset($io_funciones);
	}
?> 
        $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, 4.5, 3, 3);
        // Configuración de los margenes en centímetros
        $io_pdf->ezStartPageNumbers(570, 47, 8, '', '', 1);
        // Insertar el número de página
        $li_totrow = $io_report->DS->getRowCount("sig_cuenta");
        for ($li_i = 1; $li_i <= $li_totrow; $li_i++) {
            $ls_spgcuenta = trim($io_report->DS->data["sig_cuenta"][$li_i]);
            $ls_spgdenominacion = $io_report->DS->data["spgdenominacion"][$li_i];
            $ls_scgcuenta = trim($io_report->DS->data["sc_cuenta"][$li_i]);
            $ls_scgdenominacion = $io_report->DS->data["scgdenominacion"][$li_i];
            $la_data[$li_i] = array('sig_cuenta' => $ls_spgcuenta, 'spgdenominacion' => $ls_spgdenominacion, 'sc_cuenta' => $ls_scgcuenta, 'scgdenominacion' => $ls_scgdenominacion);
        }
        uf_print_encabezado_pagina($ls_titulo, &$io_pdf);
        uf_print_detalle($la_data, $li_totrow, &$io_pdf);
    }
    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 {
        print "<script language=JavaScript>";
        print " alert('Ocurrio un error al generar el reporte. Intente de Nuevo');";
        print " close();";
        print "</script>";
    }
}
			                             $io_fun_nomina->uf_formatonumerico($ls_priquin_ahorro),
										 $io_fun_nomina->uf_formatonumerico($ls_segquin_ahorro),
										 $io_fun_nomina->uf_formatonumerico($ls_momto_neto_corriente),
										 $io_fun_nomina->uf_formatonumerico($ls_priquin_corriente),
										 $io_fun_nomina->uf_formatonumerico($ls_segquin_corriente),&$io_pdf);	
		   }
		   else
		   {		     
			 if ($ls_banco!=$ls_banco_aux)
			 {
			   $ls_banco_aux=$ls_banco;
			   uf_print_cabecera_banco($ls_banco, $ls_desban,&$io_pdf);
			 }	
			 uf_print_detalle($ls_cuenta,$io_fun_nomina->uf_formatonumerico($ls_momto_neto_ahorro),
			                             $io_fun_nomina->uf_formatonumerico($ls_priquin_ahorro),
										 $io_fun_nomina->uf_formatonumerico($ls_segquin_ahorro),
										 $io_fun_nomina->uf_formatonumerico($ls_momto_neto_corriente),
										 $io_fun_nomina->uf_formatonumerico($ls_priquin_corriente),
										 $io_fun_nomina->uf_formatonumerico($ls_segquin_corriente),&$io_pdf);	
		   }
		   
		}///fin del for
		if($lb_valido) // Si no ocurrio ningún error
			{
				$io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página
				$io_pdf->ezStream(); // Mostramos el reporte
			}
		else  // Si hubo algún error
			{
				print("<script language=JavaScript>");
				print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); 
				print(" close();");
			 $ls_fecha_r=$io_report->ds_detalle->data["fecha"][$lp_i];			 
			 $ls_fecha_r=$io_funciones->uf_convertirfecmostrar($ls_fecha_r);
			// $ls_de=$io_report->ds_detalle->data["de"][$lp_i];			 
			// $ls_para=$io_report->ds_detalle->data["para"][$lp_i];
			// $ls_asunto=$io_report->ds_detalle->data["asunto"][$lp_i];
			 $ls_nomper=$io_report->ds_detalle->data["nomper"][$lp_i];
			 $ls_apeper=$io_report->ds_detalle->data["apeper"][$lp_i];
			 $ls_cedper=$io_report->ds_detalle->data["cedper"][$lp_i];
			 $ls_descar1=$io_report->ds_detalle->data["descar"][$lp_i];
			 $ls_descar2=$io_report->ds_detalle->data["denasicar"][$lp_i];
			 $ls_motivo=$io_report->ds_detalle->data["motivo"][$lp_i];
			 $ls_observacion=$io_report->ds_detalle->data["observacion"][$lp_i];
			 
		 	
			 uf_print_encabezado_pagina($ls_titulo,$ls_nroreg,$ls_fecha_r,$ls_de,$ls_para,$ls_asunto,&$io_pdf);	
		     uf_print_detalle($ls_apeper,$ls_nomper,$ls_cedper,$ls_descar,$ls_motivo,$ls_observacion,&$io_pdf);	

             if($lb_valido) // Si no ocurrio ningún error
		     {
			  $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página
			  $io_pdf->ezStream(); // Mostramos el reporte
		     }
            else // Si hubo algún error
		     {
			  print("<script language=JavaScript>");
			  print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); 
			//  print(" close();");
			  print("</script>");	
		    }

          }
				$ls_nivel_t=$io_report->ds_resultado->data["nivel_t"][$li_o];				
				$ld_saldo_t=$io_report->ds_resultado->data["saldo_t"][$li_o];						
				$ls_total_resultado=$ls_total_resultado+$ld_saldo_t;
				$ld_saldo_t=number_format($ld_saldo_t,2,",",".");				
				$la_data_t[$li_o]=array('cuenta_t'=>$ver,'denom_t'=>$ls_denom_t,'saldo_t'=>$ld_saldo_t);
			   
			}//for
			//------------------------fin de resultado del tesoro-------------------------------------------------------------
				
		    $total_activo_t=number_format($total_activo_t,2,",",".");		    
		    $total_pasivo_result= $ls_total_resultado+$ls_total_pasivo;
		    $total_pasivo_result=number_format( $total_pasivo_result,2,",",".");		
		    $ls_total_pasivo=number_format($ls_total_pasivo,2,",",".");	
		    $ls_total_ingreso=number_format($ls_total_ingreso,2,",",".");
		    $ls_total_gastos=number_format($ls_total_gastos,2,",",".");	
			uf_print_detalle($la_data,$la_data_p,$la_data_t,$total_activo_t,$ls_total_pasivo, $total_pasivo_result,$io_pdf); // Imprimimos el detalle 
			uf_print_detalle_2($la_data_h,$la_data_p_h,$io_pdf); // Imprimimos el detalle 
			uf_print_detalle_3($la_data_i,$la_data_g,$ls_total_ingreso,$ls_total_gastos,$io_pdf); // Imprimimos el detalle
			
			unset($la_data);
			unset($la_data_p);
			unset($la_data_t);
			unset($la_data_p_h);
			unset($la_data_i);
			unset($la_data_g);		
			$io_pdf->ezStopPageNumbers(1,1);
			if (isset($d) && $d)
			{
				$ls_pdfcode = $io_pdf->ezOutput(1);
				$ls_pdfcode = str_replace("\n","\n<br>",htmlspecialchars($ls_pdfcode));
				echo '<html><body>';
					$ld_fecvenc    = $io_report->ds_documentos->getValue("fecvenc",$y);
					$ls_numdoc	   = $io_report->ds_documentos->getValue("numdoc",$y);
					$ls_nomproben  = $io_report->ds_documentos->getValue("nomproben",$y);
					$ldec_monto    = $io_report->ds_documentos->getValue("monto",$y);
					$ls_estmov     = $io_report->ds_documentos->getValue("estmov",$y);
					$ld_numdoc     = $io_report->ds_documentos->getValue("numdoc",$y);
					$li_estentrega = $io_report->ds_documentos->getValue("emicheproc",$y);
					$ls_cedula	   = $io_report->ds_documentos->getValue("emicheced",$y);
					$ls_nombre	   = $io_report->ds_documentos->getValue("emichenom",$y);
					$ld_fecha      = $io_report->ds_documentos->getValue("emichefec",$y);
					$la_data[1]=array('fecemi'=>$ld_fecemi,'numdoc'=>$ls_numdoc,'beneficiario'=>$ls_nomproben,'monto'=>number_format($ldec_monto,2,",","."),'estmov'=>$ls_estmov,'fecvenc'=>$ld_fecvenc);
					if($y==1)
					{$li_showheaddings=1;}
					else
					{$li_showheaddings=0;}
					uf_print_detalle($la_data,array(0.95,0.95,0.95),array(1.5,1.5,1.5),$li_showheaddings,$io_pdf);
					if($li_estentrega==1)
					{
						$la_data_entrega[1]=array('fecemi'=>"Entregado el: ".$ld_fecha,'beneficiario'=>"Entregado a: ".$ls_nombre." C.I.: ".$ls_cedula);
						uf_print_detalle_entrega($la_data_entrega,array(1.5,1.5,1.5),array(0.95,0.95,0.95),0,$io_pdf);
					}
				}							
				unset($la_data);
			}
		}//for		
		$io_pdf->ezStopPageNumbers(1,1);
		if (isset($d) && $d)
		{
			$ls_pdfcode = $io_pdf->ezOutput(1);
		  	$ls_pdfcode = str_replace("\n","\n<br>",htmlspecialchars($ls_pdfcode));
		  	echo '<html><body>';
                    $ls_denest = 'Contabilizada';
                    break;
                case 'A':
                    $ls_denest = 'Anulada';
                    break;
            }
            $ls_descodope = "";
            switch ($ls_codope) {
                case "ND":
                    $ls_descodope = "Debito";
                    break;
                case "NC":
                    $ls_descodope = "Credito";
                    break;
            }
            $li_totmonndnc = $li_totmonndnc + $li_monto;
            $li_monto = number_format($li_monto, 2, ",", ".");
            $ld_fecope = $io_funciones->uf_convertirfecmostrar($ld_fecope);
            $la_data[$li_i] = array('numdc' => $ls_numdc, 'nombre' => $ls_nombre, 'fecope' => $ld_fecope, 'descodope' => $ls_descodope, 'status' => $ls_denest, 'monto' => $li_monto);
        }
        $li_totmonndnc = number_format($li_totmonndnc, 2, ",", ".");
        uf_print_encabezado_pagina($ls_titulo, &$io_pdf);
        uf_print_detalle($la_data, $li_i, $li_totmonndnc, &$io_pdf);
    }
    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
    }
}
Пример #12
0
			if(($ls_nomban1=="")&&($ls_tipcta1=="")&&($ls_ctaban1==""))
			{
				uf_print_cabecera($ls_nomban,$ls_tipcta,$ls_ctaban,$io_pdf);
				$ls_nomban1=$ls_nomban;
				$ls_tipcta1=$ls_tipcta;
				$ls_ctaban1=$ls_ctaban;
			}
			if(($ls_nomban1!=$ls_nomban)&&($ls_tipcta1!=$ls_tipcta)&&($ls_ctaban1!=$ls_ctaban))
			{
				uf_print_cabecera($ls_nomban,$ls_tipcta,$ls_ctaban,$io_pdf);
				$ls_nomban1=$ls_nomban;
				$ls_tipcta1=$ls_tipcta;
				$ls_ctaban1=$ls_ctaban;
			}

			uf_print_detalle($ls_numdoc,$ls_codope,$ld_fecmov,$ls_nomproben,number_format($ldec_monto,2,",","."),$ls_estmov,$ls_conmov,$io_pdf);

			//Obtengo el detalle contable del movimiento.
			unset($ds_dt_scg->data);
			$ds_dt_scg->data=$class_report->uf_cargar_dt_scg($ls_numdoc,$ls_codban,$ls_ctaban,$ls_codope,$ls_estmov);
			$li_totscg=$ds_dt_scg->getRowCount("scg_cuenta");
			if($li_totscg>0)
			{
				for($li_a=1;$li_a<=$li_totscg;$li_a++)
				{
					$ls_debhab=$ds_dt_scg->getValue("debhab",$li_a);
					if($ls_debhab=="D")
					{
						$ldec_mondeb=number_format($ds_dt_scg->getValue("monto",$li_a),2,",",".");
						$ldec_monhab="";
					}
				  //------------------------------------------------------------------------------
				  $ld_asignado               = number_format($ld_asignado,2,",",".");
				  $ld_modificado             = number_format($ld_modificado,2,",",".");
				  $ld_programado             = number_format($ld_programado,2,",",".");
				  $ld_compromiso             = number_format($ld_compromiso,2,",",".");
				  $ld_causado                = number_format($ld_causado,2,",",".");
				  $ld_pagado                 = number_format($ld_pagado,2,",",".");
				  $ld_programado_acum        = number_format($ld_programado_acum,2,",",".");
				  $ld_compromiso_acum        = number_format($ld_compromiso_acum,2,",",".");
				  $ld_causado_acum           = number_format($ld_causado_acum,2,",",".");
				  $ld_pagado_acum            = number_format($ld_pagado_acum,2,",",".");
				  $ld_disp_fecha             = number_format($ld_disp_fecha,2,",",".");
				
				  
				  uf_print_detalle($ls_partida,$ls_generica,$ls_especifica,$ls_subesp,$ls_denominacion,$ld_asignado,
	                               $ld_modificado,$ld_programado,$ld_compromiso,$ld_causado,$ld_pagado,
							       $ld_programado_acum, $ld_compromiso_acum,$ld_causado_acum, $ld_pagado_acum,
								   $ld_disp_fecha,&$io_pdf); // Imprimimos el detalle
								   
				 		
					  							 						   
			}//for
		
		
		///-----------------------totales por partidas-------------------------------------------------
		
		             $ld_asignado_partida       = number_format($ld_asignado_partida,2,",",".");
				     $ld_modificado_partida     = number_format($ld_modificado_partida,2,",",".");
				     $ld_programado_partida     = number_format($ld_programado_partida,2,",",".");
				     $ld_compromiso_partida     = number_format($ld_compromiso_partida,2,",",".");
				     $ld_causado_partida        = number_format($ld_causado_partida,2,",",".");
				     $ld_pagado_partida         = number_format($ld_pagado_partida,2,",",".");
    $li_exisfinal = 0.0;
    $li_tot_inc = 0.0;
    $li_tot_desinc = 0.0;
    $li_exisfinal = $li_tot_exi_mes_ant + $li_tot_inc_mes - $li_tot_desinc_mes - $li_tot_desinc_060_mes;
    $li_tot_inc = $li_tot_exi_mes_ant + $li_tot_inc_mes;
    $li_tot_inc = $io_fun_activos->uf_formatonumerico($li_tot_inc);
    $li_tot_desinc = $li_exisfinal + $li_tot_desinc_mes + $li_tot_desinc_060_mes;
    $li_tot_desinc = $io_fun_activos->uf_formatonumerico($li_tot_desinc);
    $li_tot_exi_mes_ant = $io_fun_activos->uf_formatonumerico($li_tot_exi_mes_ant);
    $li_tot_inc_mes = $io_fun_activos->uf_formatonumerico($li_tot_inc_mes);
    $li_tot_desinc_mes = $io_fun_activos->uf_formatonumerico($li_tot_desinc_mes);
    $li_tot_desinc_060_mes = $io_fun_activos->uf_formatonumerico($li_tot_desinc_060_mes);
    $li_exisfinal = $io_fun_activos->uf_formatonumerico($li_exisfinal);
    uf_print_cabecera($ls_estemp, '', $ls_denuniadm, $io_pdf);
    // Imprimimos la cabecera del registro
    uf_print_detalle($li_tot_exi_mes_ant, $li_tot_inc_mes, $li_tot_desinc_060_mes, $li_tot_desinc_mes, $li_exisfinal, $li_tot_inc, $li_tot_desinc, $io_pdf);
    // Imprimimos el detalle
    uf_print_firmas(&$io_pdf);
    if ($lb_valido_exi || $lb_valido_inc || $lb_valido_desinc || $lb_valido_desinc_060) {
        $io_pdf->ezStopPageNumbers(1, 1);
        $io_pdf->ezStream();
    } else {
        print "<script language=JavaScript>";
        print " alert('No hay nada que Reportar');";
        print " close();";
        print "</script>";
    }
    unset($io_pdf);
}
unset($io_report);
unset($io_funciones);
             $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 {
     print "<script language=JavaScript>";
     print " alert('Ocurrio un error al generar el reporte. Intente de Nuevo');";
						$ldec_monto   = $io_report->ds_data->getValue("monto",$y);					
						$ld_fecha      = $io_report->ds_data->getValue("fecmov",$y);			
						$ld_feccad     =$io_report->ds_data->getValue("feccad",$y);
						$ld_total_monto=$ld_total_monto+$ldec_monto;
						$la_data[1]    =array('numdoc'=>$ls_numdoc,'fecmov'=>$ld_fecha,'feccad'=>$ld_feccad,'beneficiario'=>$ls_nomproben,'monto'=>number_format($ldec_monto,2,",","."));
						
						if ($y==1)
						{
							$ls_show=1;
						}
						else
						{
							$ls_show=0;
						}
						
						uf_print_detalle($la_data,$ls_show,$io_pdf);
						
					}	
					$ld_total_monto=number_format($ld_total_monto,2,",",".");
					uf_print_pie_cabecera($ld_total_monto,$li_total,$io_pdf);						
					unset($la_data);
				}
				else
				{
					$lb_valido2=false;
				}
			}
		}//for	
		
		if ($lb_valido2)
		{
						case "V4":
							$li_apor=$io_fun_nomina->uf_formatonumerico(abs($io_report->DS_detalle->data["valsal"][$li_s]));
							$li_totapor=$li_totapor+$io_report->DS_detalle->data["valsal"][$li_s];
							break;
							
						case "W4":
							$li_apor=$io_fun_nomina->uf_formatonumerico(abs($io_report->DS_detalle->data["valsal"][$li_s]));
							$li_totapor=$li_totapor+$io_report->DS_detalle->data["valsal"][$li_s];
							break;
					}
					$la_data[$li_s]=array('codigo'=>$ls_codconc,'nombre'=>$ls_nomcon,'asignacion'=>$li_asig,
										  'deduccion'=>$li_dedu,'aporte'=>$li_apor);
				}
				$io_report->DS_detalle->resetds("codconc");
				uf_print_detalle($ls_descripcion,$la_data,$io_pdf); // Imprimimos el detalle 
				$li_totasig=$io_fun_nomina->uf_formatonumerico($li_totasig);
				$li_totdedu=$io_fun_nomina->uf_formatonumerico($li_totdedu);
				$li_totapor=$io_fun_nomina->uf_formatonumerico($li_totapor);
				uf_print_total($li_totasig,$li_totdedu,$li_totapor,$io_pdf); // Imprimimos el pie de la cabecera
			}
			$rs_data->MoveNext();
		}
		$io_report->DS->resetds("cedper");
		if($lb_valido) // Si no ocurrio ningún error
		{
			$io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página
			$io_pdf->ezStream(); // Mostramos el reporte
		}
		else  // Si hubo algún error
		{
				$li_aux=1;
				$la_aux=array();
				$lb_print=false;
				for($li_i=1;$li_i<=$x;$li_i++)
				{				
					if($li_aux<=7)
					{
						$la_aux[$li_aux]=$la_data[$li_i];
						$li_aux++;
						$lb_print=false;				
					}
					else
					{
						$li_aux=1;
						$li_i--;
						$lb_print=true;								
					}
					if($lb_print || $li_i==$x)
					{
						uf_print_detalle(array('title'=>'Detalle Presupuestario Pago','title2'=>'Detalle Contable Pago'),$la_aux,$io_pdf); // Imprimimos el detalle 								
						$la_aux=array();
						if($li_i<$x)
							$io_pdf->ezNewPage();
					}
				}
			}
			uf_print_firmas($io_pdf) ;
		}	
	 $io_pdf->ezStream();	
 }
?> 
                 $li_totalivaret = $li_totalivaret + $li_ivaret;
                 $li_totdersiniva = number_format($li_totdersiniva, 2, ",", ".");
                 $li_siniva = number_format($li_siniva, 2, ",", ".");
                 $li_coniva = number_format($li_coniva, 2, ",", ".");
                 $li_baseimp = number_format($li_baseimp, 2, ",", ".");
                 $li_porimp = number_format($li_porimp, 2, ",", ".");
                 $li_totimp = number_format($li_totimp, 2, ",", ".");
                 $li_ivaret = number_format($li_ivaret, 2, ",", ".");
                 $la_data[$li_i] = array('numope' => $ls_numope, 'fecfac' => $ld_fecfac, 'numfac' => $ls_numfac, 'numref' => $ls_numref, 'numnotdeb' => $ls_numnotdeb, 'numnotcre' => $ls_numnotcre, 'tiptrans' => $ls_tiptrans, 'numfacafec' => $ls_numfacafec, 'totalconiva' => $li_coniva, 'compsinderiva' => $li_totdersiniva, 'baseimp' => $li_baseimp, 'porimp' => $li_porimp, 'totimp' => $li_totimp, 'ivaret' => $li_ivaret, 'numdoc' => $ls_numdoc, 'totalsiniva' => $li_siniva);
             }
             $li_totalconiva = number_format($li_totalconiva, 2, ",", ".");
             $li_totalsiniva = number_format($li_totalsiniva, 2, ",", ".");
             $li_totalbaseimp = number_format($li_totalbaseimp, 2, ",", ".");
             $li_totalmontoimp = number_format($li_totalmontoimp, 2, ",", ".");
             $li_totalivaret = number_format($li_totalivaret, 2, ",", ".");
             uf_print_detalle($la_data, $li_totalconiva, $li_totalsiniva, $li_totalbaseimp, $li_totalmontoimp, $li_totalivaret, &$io_pdf);
             unset($la_data);
         }
     }
     uf_print_firmas(&$io_pdf);
     if ($li_z < $li_totrow - 1) {
         $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 {
     print "<script language=JavaScript>";
				$ls_montohab=0;
				$total_saldo=$total_saldo+$ls_saldo;
				$total_debe=$total_debe+$ls_monto;
			}
			else
			{
				$ls_montodebe=0;
				$ls_montohab=$ls_monto;
				$ls_totalhaber=$ls_totalhaber+$ls_monto;
				$total_haber=$total_haber+$ls_monto;
				
			}
			
			$ls_fecha=$io_funciones->uf_convertirfecmostrar($ls_fecha);
			uf_print_detalle($ls_numdoc,$ls_fecha,$ls_tipo, $ls_concepto,
			                 number_format($ls_montodebe,2,",","."), 
			                 number_format($ls_montohab,2,",","."), $ls_contable,&$io_pdf);				
		}// fin del for
		if ($total>0)
		{	
			uf_print_total(number_format($ls_totaldebe,2,",","."),
						   number_format($ls_totalhaber,2,",","."),
						   number_format($ls_saldo,2,",","."),
						   &$io_pdf);
			uf_print_total_general(number_format($total_debe,2,",","."),
								   number_format($total_haber,2,",","."),
								   number_format($total_saldo,2,",","."),
								   &$io_pdf);
		}		
		if(($lb_valido)&&($total>0)) // Si no ocurrio ningún error
		{
		 $ldec_monhab=$ldec_monhab+$ldec_creditos;
		 $ldec_monant=$ldec_monant+$ldec_saldo_ant;	
						   
	}
	$la_columna=array('nomban'=>'<b>Banco</b>','tipcta'=>'<b>Tipo Cuenta</b>','dencta'=>'<b>Denominacion Cta.</b>','ctaban'=>'<b>Cuenta</b>','periodo'=>'<b>Año</b>','anterior'=>'<b>Anterior</b>',
					  'debitos'=>'<b>debitos</b>','creditos'=>'<b>Creditos</b>','saldo'=>'<b>Saldo</b>');
	$la_config=array('showHeadings'=>1, // Mostrar encabezados
			 'showLines'=>0, // Mostrar Líneas
			 'shaded'=>0, // Sombra entre líneas
			 'shadeCol'=>array(0.95,0.95,0.95), // Color de la sombra
			 'shadeCol2'=>array(1.5,1.5,1.5), // Color de la sombra
			 'xOrientation'=>'center', // Orientación de la tabla
			 'width'=>730, // Ancho de la tabla
			 'maxWidth'=>730,
			 'fontSize'=>8,
			 'titleFontSize'=>10,
			 'cols'=>array('nomban'=>array('justification'=>'left','width'=>85),'tipcta'=>array('justification'=>'center','width'=>80),
						   'dencta'=>array('justification'=>'center','width'=>80),'ctaban'=>array('justification'=>'center','width'=>130),
						   'periodo'=>array('justification'=>'center','width'=>35),'anterior'=>array('justification'=>'right','width'=>80),
						   'debitos'=>array('justification'=>'right','width'=>80),'creditos'=>array('justification'=>'right','width'=>80),
						   'saldo'=>array('justification'=>'right','width'=>80))); // Ancho Máximo de la tabla
	uf_print_detalle($la_columna,$la_config,$la_data,$io_pdf); // Imprimimos el detalle 
	unset($la_data);
	$ldec_saldo_total=$ldec_total_saldo_ant+$ldec_totaldebitos-$ldec_totalcreditos;
	uf_print_totales(number_format($ldec_total_saldo_ant,2,",","."),number_format($ldec_totaldebitos,2,",","."),number_format($ldec_totalcreditos,2,",","."),number_format($ldec_saldo_total,2,",","."),$io_pdf); // Imprimimos el detalle
	$io_pdf->ezStopPageNumbers(1,1);
	$io_pdf->ezStream();
	unset($io_pdf);
	unset($io_report);
	unset($io_funciones);
?> 
                        break;
                    case 'S':
                        $ls_denest = 'Programacion de Pago';
                        break;
                    case 'P':
                        $ls_denest = 'Pagada';
                        break;
                }
                $li_totmonsol = $li_totmonsol + $li_monsol;
                $li_monsol = number_format($li_monsol, 2, ",", ".");
                $ld_fecemisol = $io_funciones->uf_convertirfecmostrar($ld_fecemisol);
                $la_data[$li_j] = array('numsol' => $ls_numsol, 'fecemisol' => $ld_fecemisol, 'consol' => $ls_consol, 'denest' => $ls_denest, 'monsol' => $li_monsol);
            }
            $li_j = $li_j - 1;
            $ld_montotrep += $li_totmonsol;
            $ld_totmonsol = number_format($li_totmonsol, 2, ",", ".");
            uf_print_encabezado_pagina($ls_titulo, &$io_pdf);
            uf_print_cabecera($ls_codigo, $ls_nombre, &$io_pdf);
            uf_print_detalle($la_data, $li_j, $li_totmonsol, &$io_pdf);
            uf_print_totales($li_totrow, $ld_totmonsol, $ls_nombre, $io_pdf);
        }
        $ld_montotrep = number_format($ld_montotrep, 2, ",", ".");
        uf_print_totaldocumento($ld_montotrep, &$io_pdf);
    }
    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
    }
}
			{
				uf_print_cabecera1($io_pdf,$io_encabezado);	
				uf_print_detalle($ls_data,$io_pdf);
				$io_fun_nomina->uf_formatonumerico($ld_neto1);
				uf_print_total($i,$ld_neto1,$io_pdf);
				if($j > 0)
				{
					$io_pdf->stopObject($io_encabezado);
					$io_pdf->ezNewPage(); // Insertar una nueva página
					$io_pdf->ezSetCmMargins(3.6,2.5,3,3); // Configuración de los margenes en centímetros	
				}
			}
			if($j > 0)
			{			
				uf_print_cabecera2($io_pdf);	
				uf_print_detalle($ls_data2,$io_pdf);
				$io_fun_nomina->uf_formatonumerico($ld_neto2);
				uf_print_total($j,$ld_neto2,$io_pdf);
			}
			unset($ls_data);
			unset($ls_data2);
	    }
		$io_report->io_sql->free_result($rs_data);
		if (($lb_valido)&&($li_numrowtot>0)) // Si no ocurrio ningún error
		{
			$io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página
			$io_pdf->ezStream(); // Mostramos el reporte
		}
		else  // Si hubo algún error
		{
			print("<script language=JavaScript>");
             $ls_dended = $io_report->DS->data["dended"][$li_i];
             $ls_cheque = $io_report->DS->data["cheque"][$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_firmas($ls_nombre, $io_pdf);
                     $io_pdf->ezNewPage();
                 }
                 uf_print_encabezado($ls_agente, $ls_nombre, $ls_rif, $ls_nit, $ls_telefono, $ls_direccion, $ls_consol, $io_pdf);
                 $ls_codigoant = $ls_codigo;
             }
             uf_print_detalle($ls_numdoc, $ls_consol, $ld_fecemidoc, $li_monobjret, $li_retenido, $li_porcentaje, $ls_numref, $li_montotdoc, $ls_dended, $ls_cheque, $io_pdf);
         }
     }
 }
 if ($lb_valido) {
     uf_print_firmas($ls_nombre, $io_pdf);
     $io_pdf->ezStopPageNumbers(1, 1);
     // Detenemos la impresión de los números de página
     $io_pdf->ezStream();
     // Mostramos el reporte
 } else {
     print "<script language=JavaScript>";
     print " alert('Ocurrio un error al generar el reporte. Intente de Nuevo');";
     print " close();";
     print "</script>";
 }
						$li_cantartser=number_format($li_cantartser,2,",",".");
						$ld_preartser=number_format($ld_preartser,2,",",".");
						$ld_subtotartser=number_format($ld_subtotartser,2,",",".");
						$ld_totartser=number_format($ld_totartser,2,",",".");
						$ld_carartser=number_format($ld_carartser,2,",",".");
						$la_data[$li_i]=array('codigo'=>$ls_codartser,
						                      'denominacion'=>$ls_denartser,
											  'cantidad'=>$li_cantartser,
											  'unidad'=>$ls_unidad,
											  'cosuni'=>$ld_preartser,
											  'baseimp'=>$ld_subtotartser,
											  'porimp'=>$ld_porimp,
											  'cargo'=>$ld_carartser,
											  'montot'=>$ld_totartser);
					}
					uf_print_detalle($la_data,$ls_estcondat,&$io_pdf);
					unset($la_data);
				    /////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_codestpro3=trim($row["codestpro3"]);
						$ls_monto_spg2   = uf_convertir($la_data[$li_k]["monto_spg"]);
						$ls_monto_debe1  = uf_convertir($la_dataaux[$li_pos]["debe"]);
						$ls_monto_debe2  = uf_convertir($la_data[$li_k]["debe"]);
						$ls_monto_haber1 = uf_convertir($la_dataaux[$li_pos]["haber"]);
						$ls_monto_haber2 = uf_convertir($la_data[$li_k]["haber"]);
						$la_dataaux[$li_pos]["monto_spg"] = number_format(($ls_monto_spg1 + $ls_monto_spg2),2,",",".");
						if (($ls_monto_debe1 + $ls_monto_debe2) != 0)
							$la_dataaux[$li_pos]["debe"] = number_format(($ls_monto_debe1 + $ls_monto_debe2),2,",",".");
						else
							$la_dataaux[$li_pos]["debe"]="";
						if(($ls_monto_haber1 + $ls_monto_haber2) != 0)
							$la_dataaux[$li_pos]["haber"] = number_format(($ls_monto_haber1 + $ls_monto_haber2),2,",",".");
						else
							$la_dataaux[$li_pos]["haber"]="";
					}
					
				}
				
				$io_pdf->y=190;
				$io_pdf->y=440;	
				$io_pdf->set_margenes(138,70,$x_pos,0);
				uf_print_detalle($la_dataaux,$io_pdf,$x_pos); // Imprimimos el detalle 	
			}
			$io_pdf->ezStopPageNumbers(1,1);
			$io_pdf->ezStream();
			unset($io_pdf);
			unset($class_report);
			unset($io_funciones);
			
	}
?> 
					$li_inicio=$li_len-$li_totfil;
					if($li==$li_total)
					{
						$as_cuenta=substr($ls_cuenta_ant,$li_inicio,$li_fila);
					}
					else
					{
						$as_cuenta=substr($ls_cuenta_ant,$li_inicio,$li_fila)."-".$as_cuenta;
					}
				}
				$li_fila=$ia_niveles_scg[1]+1;
				$as_cuenta=substr($ls_cuenta_ant,0,$li_fila)."-".$as_cuenta;


			    uf_print_cabecera($as_cuenta,$ls_denominacion,$ld_saldo_ant,$io_pdf);
				uf_print_detalle($la_data,$io_pdf,$li_ocultar); // Imprimimos el detalle 
			  	$ld_totalsaldo_final=$ld_saldo_final;
				if($ld_totaldebe<0)
				{
			       $ld_totaldebe_aux=abs($ld_totaldebe);
				   $ld_totaldebe_aux=number_format($ld_totaldebe_aux,2,",",".");
				   $ld_totaldebe="(".$ld_totaldebe_aux.")";
				}
				else
				{
				  $ld_totaldebe=number_format($ld_totaldebe,2,",",".");
				}
				if($ld_totalhaber<0)
				{
			       $ld_totalhaber_aux=abs($ld_totalhaber);
				   $ld_totalhaber_aux=number_format($ld_totalhaber_aux,2,",",".");
						$ld_carartser    = $ld_totartser-$ld_subtotartser;
						$ld_preartser    = number_format($ld_preartser,2,",",".");
						$ld_subtotartser = number_format($ld_subtotartser,2,",",".");
						$ld_totartser	 = number_format($ld_totartser,2,",",".");
						$ld_carartser	 = number_format($ld_carartser,2,",",".");
						$la_data[$li_i]  = array('codigo'=>$ls_codartser,
						                         'denominacion'=>$ls_denartser,
											     'cantidad'=>number_format($li_cantartser,2,',','.'),
											     'precio'=>$ld_preartser,
											     'unidad'=>$ls_unidad,
												 'subtotal'=>$ld_subtotartser,
											     'cargo'=>$ld_carartser,
											     'montot'=>$ld_totartser);
					}
					
					uf_print_detalle($ls_estcondat,$la_data,$ld_monsubtot,$ld_monimp,$ld_montot,&$io_pdf);
					unset($la_data);
				    /////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);
						 if ($li_totrows>0)
						 {
							$li_s = 0;
							while($row=$io_sql->fetch_row($rs_datos_cuenta))
							{
								$li_s++;
								$ls_codestpro1 = trim($row["codestpro1"]);
								$ls_codestpro2 = trim($row["codestpro2"]);
								$ls_codestpro3 = trim($row["codestpro3"]);
					$la_valores["valorasig"]="";
					$la_valores["denomdedu"]="";
					$la_valores["valordedu"]="";
					if($li_s<=$li_asig)
					{
						$la_valores["denomasig"]=$la_data_a[$li_s]["denominacion"];
						$la_valores["valorasig"]=$la_data_a[$li_s]["valor"];
					}
					if($li_s<=$li_dedu)
					{
						$la_valores["denomdedu"]=$la_data_d[$li_s]["denominacion"];
						$la_valores["valordedu"]=$la_data_d[$li_s]["valor"];
					}
					$la_data[$li_s]=$la_valores;
				}
				uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle 
				$li_totnet=$li_toting-$li_totded;
				$li_toting=$io_fun_nomina->uf_formatonumerico($li_toting);
				$li_totded=$io_fun_nomina->uf_formatonumerico($li_totded);
				$li_totnet=$io_fun_nomina->uf_formatonumerico($li_totnet);
				uf_print_pie_cabecera($li_toting,$li_totded,$li_totnet,$ls_codcueban,$io_pdf); // Imprimimos pie de la cabecera
				uf_print_firmas($ls_cedper,$ls_nomper,&$io_pdf);
				unset($la_data_a);
				unset($la_data_d);
				unset($la_data);
				$io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera
				if($li_i<$li_totrow)
				{
					$io_pdf->ezNewPage(); // Insertar una nueva página
				}
			}
						     $ls_cuentaspg   = "";	
							 $ls_estpro      = "";	  
						 	 $ldec_monto_spg = "";
						   }
				      }
				   else
					  {
					    $ls_cuentaspg   = "";	
					    $ls_estpro      = "";	  
					    $ldec_monto_spg = "";
					  }
				   $la_data[$li_s]=array('spg_cuenta'=>$ls_cuentaspg,'estpro'=>$ls_estpro,'monto_spg'=>$ldec_monto_spg,'scg_cuenta'=>$ls_scg_cuenta,'descripcion'=>$ls_descripcion,'debe'=>$ldec_mondeb,'haber'=>$ldec_monhab);
			     }
		   }
		uf_print_detalle(array('title'=>'Detalle Contable Pago'),$la_data,$io_pdf);
		uf_print_autorizacion($io_pdf);	
		if ($io_pdf->ezPageCount==$thisPageNum)
		   {// 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');
			 $io_pdf->ezNewPage();
			 uf_print_cabecera($ls_numdoc,$ls_nomban,$ls_ctaban,$ls_chevau,$ls_nomproben,$ls_solicitudes,$ls_conmov,$io_pdf);
			 uf_print_detalle(array('title'=>'Detalle Contable Pago'),$la_data,$io_pdf);
		   }
	}
	$io_pdf->ezStream();
	unset($io_pdf,$class_report,$io_funciones);
?>