function uf_calcular_cargo() { //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_calcular_cargo // Access: private // Arguments: // Description: Funcin que obtiene e imprime los resultados de la busqueda del detalle de los cargos de la recepcion y calcula en base a los nuevos montos // Creado Por: Ing. Nelson Barraez // Fecha Creacin: 02/06/2007 Fecha ltima Modificacin : 03/06/2007 //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $io_funciones_sob; require_once("../../shared/class_folder/class_mensajes.php"); $io_mensajes=new class_mensajes(); require_once("../../shared/class_folder/class_funciones.php"); $io_funciones=new class_funciones(); require_once("../../shared/class_folder/grid_param.php"); $io_grid=new grid_param(); require_once("../../shared/class_folder/evaluate_formula.php"); $io_formula = new evaluate_formula(); $li_total=$io_funciones_sob->uf_obtenervalor("total",0); for($li=1;$li<=$li_total;$li++) { $lb_chk=$io_funciones_sob->uf_obtenervalor("chk".$li,0); $ls_codestpro=$io_funciones_sob->uf_obtenervalor("txtcodestpro".$li,""); $ls_formula=$io_funciones_sob->uf_obtenervalor("txtformula".$li,""); $ls_spgcuenta=$io_funciones_sob->uf_obtenervalor("txtspgcuenta".$li,""); $ls_scgcuenta=$io_funciones_sob->uf_obtenervalor("txtscgcuenta".$li,""); $ls_denscg=$io_funciones_sob->uf_obtenervalor("txtdenscgcuenta".$li,""); $ldec_baseimp=$io_funciones_sob->uf_obtenervalor("txtbaseimp".$li,""); $ls_dencuenta=$io_funciones_sob->uf_obtenervalor("txtdencuenta".$li,""); $ldec_baseaux=str_replace(".","",$ldec_baseimp); $ldec_baseaux=str_replace(",",".",$ldec_baseaux); if($lb_chk==1) { if ($ldec_baseaux>0) { $ldec_monto = $io_formula->uf_evaluar_formula($ls_formula,$ldec_baseaux); } else { $ldec_monto = 0; } $ldec_monto=round($ldec_monto,2); $lo_object[$li][1]="<input type=checkbox name=chk".$li." id=chk".$li." class=sin-borde onClick='javascript:ue_calcular($li);' checked>"; } else { $lo_object[$li][1]="<input type=checkbox name=chk".$li." id=chk".$li." class=sin-borde onClick='javascript:ue_calcular($li);' >"; $ldec_monto = 0; } $lo_object[$li][2]="<input type=text name=txtcodestpro".$li." class=sin-borde style=text-align:center size=37 value='".$ls_codestpro."' readonly><input type=hidden name=txtformula".$li." value='".$ls_formula."'>"; $lo_object[$li][3]="<input type=text name=txtspgcuenta".$li." class=sin-borde style=text-align:center size=16 value='".$ls_spgcuenta."' readonly><input type=hidden name=txtscgcuenta".$li." value='".$ls_scgcuenta."'><input type=hidden name=txtdenscgcuenta".$li." value='".$ls_denscg."'>"; $lo_object[$li][4]="<input type=text name=txtbaseimp".$li." class=sin-borde style=text-align:right size=20 value='".number_format($ldec_baseaux,2,",",".")."' onBlur='javascript:uf_format(this,true,$li);' onKeyPress=return(ue_formatonumero(this,'.',',',event));>"; $lo_object[$li][5]="<input type=text name=txtmonto".$li." class=sin-borde style=text-align:right size=20 value='".number_format($ldec_monto,2,",",".")."' readonly>"; $lo_object[$li][6]="<input type=text name=txtdencuenta".$li." class=sin-borde style=text-align:left size=50 value='".$ls_dencuenta."' readonly>"; } if($li==0) { $io_mensajes->uf_mensajes_ajax("Informacion","No hay datos para mostrar",true,"javascript: ue_close();"); } // Titulos del Grid de Bienes $lo_title[1]=" "; $lo_title[2]="Codigo Programatico"; $lo_title[3]="Codigo Estadistico"; $lo_title[4]="Base Imponible"; $lo_title[5]="Monto"; $lo_title[6]="Denominación"; print "<input name=totalrows type=hidden id=totalrows value=".($li-1).">"; print "<input name=selected type=hidden id=selected value=0>"; $io_grid->makegrid(($li-1),$lo_title,$lo_object,758,"Catalogo de Cargos","grid"); unset($io_mensajes); unset($io_funciones); unset($ls_codemp); }
} } ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// ///////////////////////////////////////////// Fin Operacion Nuevo /////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// //////////////////////////////////////// Operaciones de Insercion y Actualización ////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// if ($ls_operacion == "ue_guardar") { $lb_existe = $io_otroscreditos->uf_select_otroscreditos($ls_codemp, $ls_codigo); if ($lb_existe) { if ($ls_estatus == "NUEVO") { $io_msg->message("El Código del Crédito ya existe !!!"); $lb_valido = false; } elseif ($ls_estatus == "GRABADO") { $lb_valfor = $io_formula->uf_evaluar_formula($ls_formula, 10000); if ($lb_valfor) { if (array_key_exists("chklibcompras", $_POST)) { $li_estlibcompras = $_POST["chklibcompras"]; $lr_datos["estlibcompras"] = $li_estlibcompras; $ls_estlibcompras = "checked"; } else { $li_estlibcompras = 0; $lr_datos["estlibcompras"] = $li_estlibcompras; $ls_estlibcompras = ""; } $lb_valido = $io_otroscreditos->uf_update_otroscreditos($ls_codemp, $lr_datos, $li_estmodest, $la_seguridad, $ls_estcla); if ($lb_valido) { $io_sql->commit(); $io_msg->message("Registro Actualizado !!!"); $ls_codigo = $io_funciondb->uf_generar_codigo($lb_empresa, $ls_codemp, 'sigesp_cargos', 'codcar');