PHP uf_print_piecabecera函数代码示例

			$ls_monto=$io_report->rs_data->fields["monto"];
			$ls_totalpersona=$ls_totalpersona+$ls_totalper;
			$ls_totalmonto=$ls_totalmonto+$ls_monto;			
			$la_data[$li_i]=array('codigo'=>$ls_codconc,'nombre'=>$ls_nomcon,'personal'=>number_format($ls_totalper,0,"","."), 'asignacion'=>number_format($ls_monto,2,",","."));	
			$li_i++;
			$io_report->rs_data->MoveNext();					  		
		}
		if ($li_i>1)	
		{
			$ls_denominacion="CUADRE DE INGRESO DE PENSIONES TODOS LOS PAGOS";		
			uf_print_cabecera($ls_denominacion, $io_pdf);
			uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle
			$ls_denominacion="Totales Ingresos todos los Pagos";
			$ls_totalpersona=number_format($ls_totalpersona,0,"",".");
			$ls_totalmonto=number_format($ls_totalmonto,2,",",".");
			uf_print_piecabecera($ls_denominacion, $ls_totalpersona,$ls_totalmonto,&$io_pdf);
			unset($la_data);
		}
		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>");		
		}
		unset($io_pdf);

									$ls_codestpro=$ls_codestpro1." - ".$ls_codestpro2." - ".$ls_codestpro3." - ".$ls_codestpro4." - ".$ls_codestpro5;
								}
								
								$li_montocta=$io_report->ds_cuentas->data["monto"][$li_s];
								$li_montocta=number_format($li_montocta,2,",",".");
								
								$la_data[$li_s]=array('programatica'=>$ls_codestpro,'spg_cuenta'=>$ls_spgcuenta,
								                      'denominacion'=>$ls_dencuenta,'monto'=>$li_montocta);
							}	
							uf_print_detalle_cuentas($la_data,$ls_monto,&$io_pdf);
							unset($la_data);
						}
					}
				}
			}
		}
		uf_print_piecabecera($li_monbasimptot,$li_montotcar,$li_monto,$ls_monto,&$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>");		
		}
	}
?>

				}
				$io_report->DS_detalle->resetds("cedper");
				if(!empty($la_data))
				{
					uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle 
					$li_total=$li_total+$li_subtot;
					$ls_descripcion="Pago por Taquilla";
					$li_subtot=$io_fun_nomina->uf_formatonumerico($li_subtot);
					uf_print_pie_detalle($ls_descripcion,$li_subtot,$io_pdf); // Imprimimos pie de la cabecera
				}
				unset($la_data);
			}
			$io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera
			unset($io_cabecera);
			$li_total=$io_fun_nomina->uf_formatonumerico($li_total);
			uf_print_piecabecera($li_total,$io_pdf);
			$io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página
			$io_pdf->stopObject($io_encabezado);
			unset($io_encabezado);
		}
		$io_report->DS->resetds("codban");
		if($lb_valido) // Si no ocurrio ningún error
		{
			$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>");		

		       }
	     	}
		}
		if($ls_estlugcom==0)
		{
		   $ls_estlugcom="Nacional";
		}
		else
		{
		    $ls_estlugcom="Extranjero";
		}
/*		if(($ls_despai=='---seleccione---')||($ls_desest=='---seleccione---')||($ls_denmun=='---seleccione---')||())
		{
		
		}*/
		uf_print_piecabecera($ld_monsubtot,$ld_monimp,$ld_montot,$ls_monto,$ls_estlugcom,$ls_denmon,$ls_tasa,$ls_despai,
		                     $ls_desest,$ls_denmun,$ls_denpar,$ls_obsordcom,$ls_montodivi,&$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>");		
	}
	unset($io_report);
	unset($io_funciones);

					$ls_apenomper=$io_report->DS_detalle->data["apeper"][$li_s].", ". $io_report->DS_detalle->data["nomper"][$li_s];
					$li_empleado=$io_fun_nomina->uf_formatonumerico(abs($io_report->DS_detalle->data["personal"][$li_s]));
					$li_patron=$io_fun_nomina->uf_formatonumerico(abs($io_report->DS_detalle->data["patron"][$li_s]));
					$li_total= abs($io_report->DS_detalle->data["personal"][$li_s])+ abs($io_report->DS_detalle->data["patron"][$li_s]);
					$li_emp_total=$li_emp_total+abs($io_report->DS_detalle->data["personal"][$li_s]);
					$li_pat_total=$li_pat_total+abs($io_report->DS_detalle->data["patron"][$li_s]);
					$li_tot_total=$li_tot_total+$li_total;
					$li_total=$io_fun_nomina->uf_formatonumerico(abs($li_total));
					$la_data[$li_s]=array('nro'=>$li_s,'cedula'=>$ls_cedper,'nombre'=>$ls_apenomper,'empleado'=>$li_empleado,'patron'=>$li_patron,'total'=>$li_total);
				}
				$io_report->DS_detalle->resetds("cedper");
				uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle 
				$li_emp_total=$io_fun_nomina->uf_formatonumerico(abs($li_emp_total));
				$li_pat_total=$io_fun_nomina->uf_formatonumerico(abs($li_pat_total));
				$li_tot_total=$io_fun_nomina->uf_formatonumerico(abs($li_tot_total));
				uf_print_piecabecera($li_emp_total,$li_pat_total,$li_tot_total,$io_pdf); // Imprimimos el pie de la cabecera
				$io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera
				if($li_i<$li_totrow)
				{
					$io_pdf->ezNewPage(); // Insertar una nueva página
				}
				unset($io_cabecera);
				unset($la_data);
			}
		}
		$io_report->DS->resetds("codconc");
		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
		}

				$li_totalasignacion=$io_fun_nomina->uf_formatonumerico($li_totalasignacion);
				$li_totaldeduccion=$io_fun_nomina->uf_formatonumerico($li_totaldeduccion);
				$li_totalaporte=$io_fun_nomina->uf_formatonumerico($li_totalaporte);
				$li_total_neto=$io_fun_nomina->uf_formatonumerico($li_total_neto);
				uf_print_piecabecera($li_totalasignacion,$li_totaldeduccion,$li_totalaporte,$li_total_neto,$ls_obsrecper,$io_pdf); // Imprimimos el pie de la cabecera*/
				if ($io_pdf->ezPageCount==$li_numpag)
				{// 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(); // Insertar una nueva página
					uf_print_cabecera($ls_cedper,$ls_apenomper,$ls_descar,$ls_desuniadm,$ld_fecingper,$ls_codcueban,$io_pdf); // Imprimimos la cabecera del registro
					uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle 
					uf_print_piecabecera($li_totalasignacion,$li_totaldeduccion,$li_totalaporte,$li_total_neto,$ls_obsrecper,$io_pdf); // Imprimimos el pie de la cabecera*/
				}
			}
			unset($la_data);			
			$io_report->rs_data->MoveNext();			
		}
		$li_totasi=$io_fun_nomina->uf_formatonumerico($li_totasi);
		$li_totded=$io_fun_nomina->uf_formatonumerico($li_totded);
		$li_totapo=$io_fun_nomina->uf_formatonumerico($li_totapo);
		$li_totgeneral=$io_fun_nomina->uf_formatonumerico($li_totgeneral);
		uf_print_piepagina($li_totasi,$li_totded,$li_totapo,$li_totgeneral,$io_pdf);
		uf_print_firmas(&$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

			$ls_nomcon=$io_report->DS->data["nomcon"][$li_i];
			$li_monact=$io_fun_nomina->uf_formatonumerico(abs($io_report->DS->data["actual"][$li_i]));
			$li_monpre=$io_fun_nomina->uf_formatonumerico(abs($io_report->DS->data["previo"][$li_i]));
			$li_monmov=$io_report->DS->data["actual"][$li_i]-$io_report->DS->data["previo"][$li_i];
			$li_monmov=$io_fun_nomina->uf_formatonumerico($li_monmov);
			$la_data[$li_i]=array('codigo'=>$ls_codconc,'nombre'=>$ls_nomcon,'anterior'=>$li_monpre,'movimiento'=>$li_monmov,'actual'=>$li_monact);
			$li_totprevio=$li_totprevio+abs($io_report->DS->data["previo"][$li_i]);
			$li_totactual=$li_totactual+abs($io_report->DS->data["actual"][$li_i]);
			$li_totmovimiento=$li_totmovimiento+($io_report->DS->data["actual"][$li_i]-$io_report->DS->data["previo"][$li_i]);
		}
		$io_report->DS->resetds("codconc");
		uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle 
		$li_totprevio=$io_fun_nomina->uf_formatonumerico($li_totprevio);
		$li_totactual=$io_fun_nomina->uf_formatonumerico($li_totactual);
		$li_totmovimiento=$io_fun_nomina->uf_formatonumerico($li_totmovimiento);
		uf_print_piecabecera($li_totprevio,$li_totactual,$li_totmovimiento,$li_totrow,$io_pdf); // Imprimimos el pie de la cabecera
		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>");		
		}
		unset($io_pdf);
	}
	unset($io_report);

		{
			uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle 
		}
		else
		{
			print("<script language=JavaScript>");
			print(" alert('No hay nada que reportar!');"); 
			print(" close();");
			print("</script>");		
		}
		$li_totgeneral=$li_totasi-$li_totded;
		$li_totasi=$io_fun_nomina->uf_formatonumerico($li_totasi);
		$li_totded=$io_fun_nomina->uf_formatonumerico($li_totded);
		$li_totapo=$io_fun_nomina->uf_formatonumerico($li_totapo);
		$li_totgeneral=$io_fun_nomina->uf_formatonumerico($li_totgeneral);
		uf_print_piecabecera($li_totasi,$li_totded,$li_totapo,$li_totgeneral,$io_pdf); // Imprimimos el pie de la cabecera
		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>");		
		}
		unset($io_pdf);
	}
	unset($io_report);

					uf_print_cabecera($ls_denominacion,&$io_pdf);
					uf_print_detalle($la_data1,$io_pdf); // Imprimimos el detalle
					$ls_denom="Total Asignaciones";
					uf_print_piecabecera($ls_denom, $ls_persona_tot1,number_format($ls_monto_tot1,2,",","."),&$io_pdf);
					$monto_total=$monto_total+($ls_monto_tot1);
		            $personal_total=$personal_total+($ls_persona_tot1);
					$io_pdf->ezSetDy(-5);
					unset($la_data1);
				}
				if($ls_deduc>0)
				{
					$ls_denominacion="Deducciones";
					uf_print_cabecera($ls_denominacion,&$io_pdf);
					uf_print_detalle($la_data2,$io_pdf); // Imprimimos el detalle
					$ls_denom="Total Deducciones";
					uf_print_piecabecera($ls_denom, $ls_persona_tot2,number_format($ls_monto_tot2,2,",","."),&$io_pdf);
					$monto_total2=$monto_total2+($ls_monto_tot2);
		            $personal_total2=$personal_total2+($ls_persona_tot2);	
					$io_pdf->ezSetDy(-5);			
					unset($la_data2);								
				}
			}	
			$io_report->rs_data->MoveNext();					
		}//fin del for	
		if ($monto_total>0)
		{
			$io_pdf->ezSetDy(-5);
			$ls_denom="TOTAL GENERAL ASIGNACIONES";
			uf_print_piecabecera2($ls_denom,number_format($monto_total,2,",","."),&$io_pdf);
		}
		

						uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle 
						uf_print_piedetalle($li_total,$ls_desuniadm,$io_pdf); // Imprimimos el pie de la cabecera
					}
				}
				else
				{
					$io_pdf->transaction('commit');
				}
			}
			unset($la_data);
			$io_report->rs_data->MoveNext();			
		}
		$li_total_neto=$io_fun_nomina->uf_formatonumerico($li_total_neto);
		$io_pdf->EzsetDy(-2);
		$li_s = $li_s-1;
		uf_print_piecabecera($li_total_neto,$li_s,$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>");		
		}
		unset($io_pdf);
	}
	unset($io_report);

								$li_valsal2=0;
								$li_valsal_sentencia=0;


						}
						
						
						
				
		
		}
			
		
		 // Imprimimos el detalle 
		uf_print_detalle($la_data,$io_pdf);		
		uf_print_piecabecera($io_fun_nomina->uf_formatonumerico($li_total),$li_contador,$ls_desuniadmact,$io_pdf);
		$monto_total = $monto_total + $li_total;		
		$ultima_linea = $io_pdf->y;
		$io_pdf->filledRectangle(96,$ultima_linea-10,600,1); // Imprimimos el fin del reporte
		$io_pdf->ezText('   ',12,array('justification' => 'full'));
		uf_imprime_totales($contador_personas,$io_fun_nomina->uf_formatonumerico($cesta_tot-$deducciones_tot) ,$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();");

			$ls_cedper=$io_report->DS->data["cedper"][$li_i];
			$ls_nomper=$io_report->DS->data["apeper"][$li_i].", ".$io_report->DS->data["nomper"][$li_i];
			$ls_estado1=$io_report->DS->data["est1cestic"][$li_i];
			$ls_estado2=$io_report->DS->data["est2cestic"][$li_i];
			$li_ticket=abs($io_report->DS->data["valsal"][$li_i])/abs($io_report->DS->data["moncestic"][$li_i]);
			$li_valsal=$io_fun_nomina->uf_formatonumerico(abs($io_report->DS->data["valsal"][$li_i]));
			$li_total=$li_total+abs($io_report->DS->data["valsal"][$li_i]);
			$li_totalticket=$li_totalticket+$li_ticket;
			$li_ticket=$io_fun_nomina->uf_formatonumerico($li_ticket);
			$la_data[$li_contador]=array('nro'=>$li_contador,'cedula'=>$ls_cedper,'nombre'=>$ls_nomper,'estado1'=>$ls_estado1,'estado2'=>$ls_estado2,'ticket'=>$li_ticket,'valor'=>$li_valsal);
		}
		$io_report->DS->resetds("cedper");
		uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle 
		$li_total=$io_fun_nomina->uf_formatonumerico($li_total);
		$li_totalticket=$io_fun_nomina->uf_formatonumerico($li_totalticket);
		uf_print_piecabecera($li_total,$li_totalticket,$io_pdf); // Imprimimos el fin del reporte
		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>");		
		}
		unset($io_pdf);
	}
	unset($io_report);

			}
                        
                  
               	
			$io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera
			unset($io_cabecera);
			//$li_total=$io_fun_nomina->uf_formatonumerico($li_total);
			//uf_print_piecabecera($li_total,$io_pdf);
			$io_report->rs_data->MoveNext();
                        
                        
                        
                        
                        }//endwhile; endforeach;
                        $li_total=$io_fun_nomina->uf_formatonumerico($li_total);
                        uf_print_piecabecera($li_total,$io_pdf,$li_nro_total);
		}
                
               
               
		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>");		

					$la_data[$li_s]=array('codigo'=>$ls_codper,'nombre'=>$ls_apenomper,'tipo'=>$ls_destippre,'estatus'=>$ls_stapre,
										  'fecha'=>$ld_fecpre,'monto'=>$li_monpre,'amortizado'=>$li_monamopre,'cuotas'=>$li_numcuopre,
										  'saldo'=>$li_saldo);
					$li_totprestamo=$li_totprestamo+$io_report->DS_detalle->data["monpre"][$li_s];
					$li_totamortizado=$li_totamortizado+$io_report->DS_detalle->data["monamopre"][$li_s];
					$li_totcuota=$li_totcuota+$io_report->DS_detalle->data["numcuopre"][$li_s];
					$li_totsaldo=$li_totsaldo+($io_report->DS_detalle->data["monpre"][$li_s]-$io_report->DS_detalle->data["monamopre"][$li_s]);
					$li_tottra=$li_tottra+1;
				}
				$io_report->DS_detalle->resetds("codper");
				uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle 
				$li_totprestamo=$io_fun_nomina->uf_formatonumerico(abs($li_totprestamo));
				$li_totamortizado=$io_fun_nomina->uf_formatonumerico(abs($li_totamortizado));
				$li_totcuota=abs($li_totcuota);
				$li_totsaldo=$io_fun_nomina->uf_formatonumerico(abs($li_totsaldo));
				uf_print_piecabecera($li_tottra,$li_totprestamo,$li_totamortizado,$li_totcuota,$li_totsaldo,$io_pdf); // Imprimimos el pie de la cabecera
				$io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera
				if($li_i<$li_totrow)
				{
					$io_pdf->ezNewPage(); // Insertar una nueva página
				}
				unset($io_cabecera);
				unset($la_data);
			}
		}
		$io_report->DS->resetds("codconc");
		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
		}

									$ls_codestpro=$ls_codestpro1.$ls_codestpro2.$ls_codestpro3;
								}
								else
								{
									$ls_codestpro=substr($ls_codestpro1,-2)."-".substr($ls_codestpro2,-2)."-".substr($ls_codestpro3,-2)."-".substr($ls_codestpro4,-2)."-".substr($ls_codestpro5,-2);
								}
								$ls_spg_cuenta=substr($ls_spg_cuenta,0,3)."-".substr($ls_spg_cuenta,3,2)."-".substr($ls_spg_cuenta,5,2)."-".substr($ls_spg_cuenta,7,2);
								$la_data[$li_s]=array('codestpro'=>$ls_codestpro,'denominacion'=>$ls_dencuenta,
													  'cuenta'=>$ls_spg_cuenta,'monto'=>$ld_monto);
							}
							//////////////////////////para calcular el monto total si tiene o no descuentos/////////////////
							$ls_monto_menos_desc=$ld_montot-$descuento;
							$ld_montot=number_format($ld_montot,2,",",".");
							$ls_monto_menos_desc=number_format($ls_monto_menos_desc,2,",",".");	
							/////////////////////////////////////////////////////////////////////////////////////////////////
							uf_print_piecabecera($ld_monsubtot,$ld_monimp,$ls_monto_menos_desc,$descuento,&$io_pdf);	
							uf_print_detalle_cuentas($la_data,&$io_pdf);
							uf_print_piecabecera_total($ld_montot,&$io_pdf);
							unset($la_data);
						}
				     }
			      }
		       }
	     	}
		}
		uf_monto_en_letras($ls_monto,&$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