--precio de compra al aplicar descuento

2024-02-13 19:11:41 -07:00
parent 522ee6ec2b
commit f3e7e83660
3 changed files with 8 additions and 3 deletions
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -23977,6 +23977,7 @@ Partial Class Ventas
                Dim PrecioCompra = ObjPS.GetUltimoPrecioCompra(UsuarioActual.CveEmpresa, GvRow.DataKey("CvePS").ToEntero())
                If PrecioCompra > 0 Then
                    HdnTotalCompra.Value = (PrecioCompra * GvRow.DataKey("Cantidad").ToDouble() * 1.16).ToString()
+                    LblPrecioCompra.Text = $"PU Compra: {(PrecioCompra * 1.16).FormatoNumero(2)}"
                End If
            End Using