コード例 #1
0
				$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)
			{
				$denominacion ="";
			    }
				$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_codestpro3=trim($row["codestpro3"]);
								$ls_codestpro4=trim($row["codestpro4"]);