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

Compras no actualizar total en compra nueva con xml

Browse Source
This commit is contained in:
rakcsle
2025-05-06 11:03:39 -07:00
parent 563de5b37f
commit 4e6e92d9e4
1 changed files with 9 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
Compras/Compras.aspx.vb
View File

@@ -1362,6 +1362,8 @@ Partial Class Compras_Compras
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then If Not IsPostBack Then
'ImgBtnBuscarOC.Attributes.Add("data-toggle", "tooltip") 'ImgBtnBuscarOC.Attributes.Add("data-toggle", "tooltip")
'ImgBtnBuscarOC.Attributes.Add("data-placement", "top") 'ImgBtnBuscarOC.Attributes.Add("data-placement", "top")
@@ -17609,10 +17611,15 @@ Partial Class Compras_Compras
If TxtDescuento.Text.ToDouble > 0 Then TrDescuento.Visible = True If TxtDescuento.Text.ToDouble > 0 Then TrDescuento.Visible = True
If ActualizaTotales And (UsuarioActual.CveEmpresa = 72 Or Not CveCompraFactura > 0) Then If ActualizaTotales And (UsuarioActual.CveEmpresa = 72 Or Not CveCompraFactura > 0) Then
TxtTotal.Text = Total.ToString.FormatoNumero()
If CveCompra > 0 AndAlso CveCompraFactura = 0 Then If Not (CveFactura > 0 And CveCompra <= 0) Then
TxtTotal.Text = Total.ToString.FormatoNumero()
ElseIf CveCompra > 0 AndAlso CveCompraFactura = 0 Then 'Compra manual que ya estaba registrada
TxtTotal.Text = Total.ToString.FormatoNumero()
TxtIVA.Text = IVA.ToString.FormatoNumero() TxtIVA.Text = IVA.ToString.FormatoNumero()
End If End If
End If End If
Else Else