-
@@ -2792,38 +2793,38 @@
}
- function FormatoMoneda6Decimales(t) {
+ function FormatoMoneda6Decimales(t) {
+
-
var input = t.value.replace(/[^0-9.]/g, "");
-
+
var firstDotIndex = input.indexOf(".");
if (firstDotIndex !== -1) {
-
+
var beforeDot = input.substring(0, firstDotIndex + 1);
var afterDot = input.substring(firstDotIndex + 1).replace(/\./g, "");
input = beforeDot + afterDot;
}
-
+
var decimalIndex = input.indexOf(".");
var integerPart = decimalIndex !== -1 ? input.slice(0, decimalIndex) : input;
var decimalPart = decimalIndex !== -1 ? input.slice(decimalIndex + 1) : "";
-
+
if (integerPart === "" && decimalIndex === 0) {
integerPart = "0";
}
-
+
if (decimalPart.length > 6) {
decimalPart = decimalPart.substring(0, 6);
}
-
+
var reversed = integerPart.split("").reverse().join("");
reversed = reversed.replace(/(\d{3})(?=\d)/g, "$1,");
integerPart = reversed.split("").reverse().join("");
-
+
t.value = decimalIndex !== -1
? integerPart + "." + decimalPart
: integerPart;
diff --git a/Ventas/ProductosServicios.aspx.vb b/Ventas/ProductosServicios.aspx.vb
index 170bc75b1..fb0440638 100644
--- a/Ventas/ProductosServicios.aspx.vb
+++ b/Ventas/ProductosServicios.aspx.vb
@@ -356,10 +356,18 @@ Partial Class ProductosyServicios
End If
- If CvePS > 0 And UsuarioActual.TienePermisoProceso(402) Then
- DVEditaUltimoCosto.Visible = True
+ If UsuarioActual.TienePermisoProceso(402) Then
+ If CvePS > 0 Then
+ LnkEditarUltimoCostoMostrarModal.Visible = True
+ Else
+ DivUltimoCosto.Visible = False
+ End If
+ TxtUltimoCosto.Visible = True
+
+ UpConta.Update()
End If
+
End If
End Sub
@@ -1423,6 +1431,13 @@ Partial Class ProductosyServicios
End Sub
Protected Sub BtnGuardar_Click(sender As Object, e As System.EventArgs) Handles BtnGuardar.Click
+ If UsuarioActual.Empresa.Funcionalidad(382) = "1" AndAlso CvePS <= 0 AndAlso DdlTipoPS.SelectedValue = "2" Then
+ If TxtUltimoCosto.Text.ToDecimal() <= 0 Then
+ Alert("El campo 'Ultimo costo' es requerido.", TipoMensaje.MsgAdvertencia)
+ Exit Sub
+ End If
+ End If
+
If DdlFraccionArancelaria.SelectedValue.ToEntero > 0 AndAlso TxtCodigo.Text.Trim.Length = 0 Then
Alert("El campo Numero de Parte / Código es requerido (al seleccionar una Fracción Arancelaria el campo Numero de Parte / Código se vuelve requerido).", TipoMensaje.MsgAdvertencia)
@@ -1583,7 +1598,7 @@ Partial Class ProductosyServicios
CveObjetoImpuesto:=DdlObjetoImpuesto.SelectedValue.ToEntero, Litraje:=TxtLitraje.Text.ToDecimal, RegistroRSCO:=TxtRegistroRSCO.Text, FechaVigenciaRSCO:=TxtFechaVigenciaRSCO.Text.ToDate, VigenciaIndeterminadaRSCO:=ChkFechaIndeterminadaRSCO.Checked,
NombreComercial:=TxtNombreComercial.Text.Trim, NotasAdicionales:=TxtEcommerceNota.Text.Trim, EcommerceEtiquetas:=TxtEcommerceEtiquetas.Text.Trim.Replace(".", ""), EcommercePrecio:=TxtEcommercePrecio.Text.Trim.ToDecimal,
CveClasificacionEcommerce:=DdlEcommerceClasificacion.SelectedValue.ToEntero, EcommerceCantidad:=TxtEcommerceCantidad.Text.Trim.ToDecimal, CodigoAlterno:=TxtCodigoAlterno.Text.Trim, PSAlterno:=TxtPSAlterno.Text.Trim, ProductoExhibicion:=ChkPSExhibicion.Checked,
- PorcentajeMinimoUtilidad:=TxtPorMinimoUtilidad.Text.ToDecimal(), CveSelectiva:=DdlSelectiva.SelectedValue.ToEntero()) > 0 Then
+ PorcentajeMinimoUtilidad:=TxtPorMinimoUtilidad.Text.ToDecimal(), CveSelectiva:=DdlSelectiva.SelectedValue.ToEntero(), UltimoCosto:=TxtUltimoCosto.Text.ToDecimal()) > 0 Then
ViewState("CvePS") = ObjProductosServicios.CvePS
For Each GVR As GridViewRow In GvImpuestosLocales.Rows
If GVR.FCCheckBox("ChkDeduccion").Checked Then