--GDiaz: forzar dev almacen al cancelar

This commit is contained in:
2024-12-05 18:38:47 -07:00
parent 95a7933124
commit 7ef68c6d3e
3 changed files with 459 additions and 446 deletions

View File

@@ -26667,7 +26667,13 @@ Partial Class Ventas
GenerarIxC = ChkGeneraIxC.Checked
End If
resp = ObjFacturaCancelacion.CancelarFactura(If(ChkDevAlm.Checked, 1, 0), ListaRemisionesCancelar, CveMotivoCancelacion:=DdlMotivoCancelacion.SelectedValue.ToEntero(), Motivo:=TxtMotivoCancelacion.Text.Trim(), CveEstadoCancelacion:=Me.CveEstadoCancelacion, AplicaCancelacionConPagos:=AplicaCancelacionConPagos, GeneraIxCconPago:=GenerarIxC)
Dim ForzarDevolucion As Boolean = False
If ChkDevAlm.Checked AndAlso UsuarioActual.CveEmpresa = 189 Then
ForzarDevolucion = True
End If
resp = ObjFacturaCancelacion.CancelarFactura(If(ChkDevAlm.Checked, 1, 0), ListaRemisionesCancelar, CveMotivoCancelacion:=DdlMotivoCancelacion.SelectedValue.ToEntero(), Motivo:=TxtMotivoCancelacion.Text.Trim(), CveEstadoCancelacion:=Me.CveEstadoCancelacion, AplicaCancelacionConPagos:=AplicaCancelacionConPagos, GeneraIxCconPago:=GenerarIxC, ForzarDevolucion:=ForzarDevolucion)
strMensaje.Append(resp.Mensaje)
Dim DtBonificaciones As DataTable = Nothing