AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

--Bloqueo de precio para funcionalidad 109

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2024-02-22 13:33:27 -07:00
parent 7d33521768
commit b483069cf1
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Ventas/Ventas.aspx.vb
View File

@@ -8069,7 +8069,7 @@ Partial Class Ventas
End If End If
If UsuarioActual.TienePermisoProceso(68) Then If UsuarioActual.TienePermisoProceso(68) OrElse UsuarioActual.Empresa.Funcionalidad(109) = "1" Then
e.Row.FCTextBox("TxtPrecio").Enabled = False e.Row.FCTextBox("TxtPrecio").Enabled = False
e.Row.FCTextBox("TxtDescuento").Enabled = False e.Row.FCTextBox("TxtDescuento").Enabled = False
End If End If
@@ -24013,7 +24013,7 @@ Partial Class Ventas
Dim PrecioCompra = ObjPS.GetUltimoPrecioCompra(UsuarioActual.CveEmpresa, GvRow.DataKey("CvePS").ToEntero()) Dim PrecioCompra = ObjPS.GetUltimoPrecioCompra(UsuarioActual.CveEmpresa, GvRow.DataKey("CvePS").ToEntero())
If PrecioCompra > 0 Then If PrecioCompra > 0 Then
HdnTotalCompra.Value = (PrecioCompra * GvRow.DataKey("Cantidad").ToDouble() * 1.16).ToString() HdnTotalCompra.Value = (PrecioCompra * GvRow.DataKey("Cantidad").ToDouble() * 1.16).ToString()
LblPrecioCompra.Text = $"PU Compra: {(PrecioCompra * 1.16).FormatoNumero(2)}" LblPrecioCompra.Text = $"PU Compra: {(PrecioCompra).FormatoNumero(2)}"
End If End If
End Using End Using