This commit is contained in:
2025-05-30 08:02:12 -07:00
5 changed files with 44 additions and 85 deletions

View File

@@ -36536,6 +36536,7 @@ Partial Class Ventas
#Region "D E S C U E N T O S X R E M I S I O N D E N O T A D E C R E D I T O"
Protected Sub BtnAplicarRemisionNC_Click(sender As Object, e As EventArgs)
'LIMPIAR DATOS
Me.AplicaRNCXDetalle = False
Me.AplicaRNCBonificacionXDetalle = False
@@ -36551,6 +36552,16 @@ Partial Class Ventas
ListaNCBonificacion.Clear()
End If
TxtImportesRemisionesNC.Text = "0.00"
TxtNCImporte.Text = "0.00"
For Each gvr As GridViewRow In GvCxC.Rows
If gvr.RowType = DataControlRowType.DataRow Then
gvr.FCCheckBox("ChkCxC").Checked = False
gvr.FCTextBox("TxtImporte").Text = ""
End If
Next
Dim TotalRemNCAplicado As Decimal = 0
Dim ArrayNC As String() = UsuarioActual.Empresa.Funcionalidad(591).Split(",".ToCharArray())