$ls_numerox=$_POST["txtnumero_x"]; $ls_numeroy=$_POST["txtnumero_y"]; $ls_informacionx=$_POST["txtinformacion_x"]; $ls_informaciony=$_POST["txtinformacion_y"]; $ls_elaboradoporx = $_POST["txtelaboradopor_x"]; $ls_elaboradopory = $_POST["txtelaboradopor_y"]; if($ls_operacion=="NUEVO") { uf_obtener_data_archivo(); } elseif($ls_operacion=="GUARDAR") { if(file_exists($ls_archivo)) { $ls_cadena_guardar=uf_convertir($ls_montox)."-".uf_convertir($ls_montoy)."-".uf_convertir($ls_destinox)."-".uf_convertir($ls_destinoy)."-".uf_convertir($ls_montoletras1x)."-".uf_convertir($ls_montoletras1y)."-".uf_convertir($ls_montoletras2x)."-".uf_convertir($ls_montoletras2y)."-".uf_convertir($ls_fechax)."-".uf_convertir($ls_fechay)."-".uf_convertir($ls_anox)."-".uf_convertir($ls_anoy)."-".uf_convertir($ls_noendosablex)."-".uf_convertir($ls_noendosabley)."-".uf_convertir($ls_caducax)."-".uf_convertir($ls_caducay)."-".uf_convertir($ls_conceptox)."-".uf_convertir($ls_conceptoy)."-".uf_convertir($ls_informacionx)."-".uf_convertir($ls_informaciony)."-".uf_convertir($ls_numerox)."-".uf_convertir($ls_numeroy)."-".uf_convertir($ls_elaboradoporx)."-".uf_convertir($ls_elaboradopory); $archivo = fopen($ls_archivo, "w"); $lb_exito=fwrite($archivo,$ls_cadena_guardar); fclose($archivo); if($lb_exito==false) { print "<script>"; print "alert('Ocurrio un error, favor intentar de nuevo');"; print "</script>"; } else { print "<script>"; print "alert('Las medidas fueron actualizadas');"; print "</script>"; }
} } if(!$lb_existe) { $li_index=count($la_dataaux)+1; $la_dataaux[$li_index]=$la_data[$li_k]; } else { $ls_monto_spg1 = uf_convertir($la_dataaux[$li_pos]["monto_spg"]); $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;
function uf_print_detalle($la_data,&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_detalle // Acess: private // Arguments: la_data // arreglo de información // io_pdf // Objeto PDF // Description: función que imprime el detalle // Creado Por: Ing. Laura Cabré // Fecha Creación: 22/11/2006 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_pdf->ezSetDy(-15); $la_opciones=array('left'=>28); $la_titulos[0]["1"]="<b>FECHA</b>"; $la_titulos[0]["2"]="<b>DOCUMENTO</b>"; $la_titulos[0]["3"]="<b>PROVEEDOR/BENEFICIARIO</b>"; $la_titulos[0]["4"]="<b>MONTO</b>"; $la_anchos_col = array(20,35,90,40); $la_justificaciones = array("center","center","left","right"); $la_justificaciones_titulos = array("center","center","center","center"); $la_opciones_data = array("color_texto" => array(0,0,0), "anchos_col" => $la_anchos_col, "tamano_texto"=> 9, "lineas"=>1, "alineacion_col"=>$la_justificaciones, "margen_horizontal"=>2, "margen_vertical"=>1); $la_opciones_titulos = array("color_texto" => array(0,0,0), "anchos_col" => $la_anchos_col, "tamano_texto"=> 8, "lineas"=>1, "alineacion_col"=>$la_justificaciones_titulos, "margen_horizontal"=>2, "margen_vertical"=>1); for($li_i=0;$li_i<count($la_data);$li_i++) { $la_data_aux=array(); $la_data_aux=$la_data[$li_i]["data"]; $ls_nombre=$la_data[$li_i]["nombre"]; $ls_tipo=$la_data[$li_i]["tipo"]; if(count($la_data_aux)>0) { $io_pdf->ezText("<b>".$ls_tipo." ".$ls_nombre."</b>",9,$la_opciones); $io_pdf->add_tabla(10,$la_titulos,$la_opciones_titulos); $io_pdf->ezSetDy(-0.5); $io_pdf->add_tabla(10,$la_data_aux,$la_opciones_data); $io_pdf->ezSetDy(-15); //------Imprimiendo el total---------------- $li_total=0; for($li_k=0;$li_k<count($la_data_aux);$li_k++) { $li_total=$li_total+uf_convertir($la_data_aux[$li_k]["monto"]); } $io_pdf->ezSetDy(-10); $la_opciones_2=array('left'=>250); $li_pos=$io_pdf->y; $io_pdf->ezText("<b>TOTAL $ls_nombre EN TRANSITO</b>",9,$la_opciones_2);// $io_pdf->y=$li_pos; if($ls_tipo=="MAS") $la_data_monto[0]["1"]="<b>".number_format($li_total,2,",",".")."</b>"; else $la_data_monto[0]["1"]="<b>".number_format($li_total,2,",",".")."</b>"; $la_justificaciones = array(); $la_anchos_col = array(); $la_justificaciones = array("right"); $la_anchos_col = array(40); $la_opciones_monto = array("color_texto" => array(0,0,0), "anchos_col" => $la_anchos_col, "tamano_texto"=> 9, "lineas"=>0, "alineacion_col"=>$la_justificaciones, "margen_horizontal"=>2, "margen_vertical"=>1); $io_pdf->add_tabla(155,$la_data_monto,$la_opciones_monto); $io_pdf->ezSetDy(-15); } } }// end function uf_print_detalle
$ls_numnc =number_format($io_cmpret->ds_dt_cmpret->getValue("numnc",1),2,",","."); //$ls_tiptra=$io_cmpret->ds_dt_cmpret->getValue("tiptrans",1); $ldec_totconiva=number_format($io_cmpret->ds_dt_cmpret->getValue("totcmp_con_iva",1),2,",","."); $ldec_totsiniva=number_format($io_cmpret->ds_dt_cmpret->getValue("totcmp_sin_iva",1),2,",","."); $ldec_baseimp=number_format($io_cmpret->ds_dt_cmpret->getValue("basimp",1),2,",","."); $ldec_porimp=number_format($io_cmpret->ds_dt_cmpret->getValue("porimp",1),2,",","."); $ldec_totimp=number_format($io_cmpret->ds_dt_cmpret->getValue("totimp",1),2,",","."); $ldec_retmun=number_format($io_cmpret->ds_dt_cmpret->getValue("iva_ret",1),2,",","."); $ls_solpag=$io_cmpret->ds_dt_cmpret->getValue("numsop",1); } if($ls_operacion=="GUARDAR") { $io_cmpret->io_sql->begin_transaction(); $lb_valido=$io_cmpret->uf_update_dt_cmp_ret($ls_codret,$ls_numcom,$ls_numope,$ld_fecfac,$ls_numfac,$ls_numcon,uf_convertir($ldec_totsiniva),uf_convertir($ldec_totconiva),uf_convertir($ldec_baseimp),uf_convertir($ldec_porimp),uf_convertir($ldec_totimp),uf_convertir($ldec_retmun),$ls_solpag ); if($lb_valido) { $io_cmpret->io_sql->commit(); print "<script>"; print "alert('El comprobante fue modificado');"; print "opener.document.form1.operacion.value='CARGAR_DT';"; print "opener.document.form1.submit();"; print "</script>"; } else { $io_cmpret->io_sql->rollback(); } }
$ls_anox=$_POST["txtano_x"]; $ls_anoy=$_POST["txtano_y"]; $ls_noendosablex=$_POST["txtnoendosable_x"]; $ls_noendosabley=$_POST["txtnoendosable_y"]; $ls_caducax=$_POST["txtcaduca_x"]; $ls_caducay=$_POST["txtcaduca_y"]; //$ls_infoy=$_POST["txtinfo_x"]; if($ls_operacion=="NUEVO") { uf_obtener_data_archivo(); } elseif($ls_operacion=="GUARDAR") { if(file_exists($ls_archivo)) { $ls_cadena_guardar=uf_convertir($ls_montox)."-".uf_convertir($ls_montoy)."-".uf_convertir($ls_destinox)."-".uf_convertir($ls_destinoy)."-".uf_convertir($ls_montoletras1x)."-".uf_convertir($ls_montoletras1y)."-".uf_convertir($ls_montoletras2x)."-".uf_convertir($ls_montoletras2y)."-".uf_convertir($ls_fechax)."-".uf_convertir($ls_fechay)."-".uf_convertir($ls_anox)."-".uf_convertir($ls_anoy)."-".uf_convertir($ls_noendosablex)."-".uf_convertir($ls_noendosabley)."-".uf_convertir($ls_caducax)."-".uf_convertir($ls_caducay); $archivo = fopen($ls_archivo, "w"); $lb_exito=fwrite($archivo,$ls_cadena_guardar); fclose($archivo); if($lb_exito==false) { print "<script>"; print "alert('Ocurrio un error, favor intentar de nuevo');"; //print "location.href='sigespwindow_blank.php';"; print "</script>"; } else { print "<script>"; print "alert('Las medidas fueron actualizadas');"; //print "location.href='sigespwindow_blank.php';";