- ventas relacionadas

2020-01-31 13:26:15 -07:00
parent f03cb6bc69
commit 80ab861146
5 changed files with 50 additions and 5 deletions
--- a/Inventarios/RecepcionUsados.aspx.vb
+++ b/Inventarios/RecepcionUsados.aspx.vb
@@ -1138,7 +1138,7 @@ Partial Class Inventarios_RecepcionUsados
                                Exit For
                            End If

-                            If CveVenta > 0 AndAlso Not ObjVentas.UpdateVentaUsadoRecibido(CveVenta, Dr("CvePS").ToString.ToEntero, True) Then
+                            If CveVenta > 0 AndAlso Not ObjVentas.UpdateVentaUsadoRecibido(CveVenta, Dr("CvePS").ToString.ToEntero, True, CveMovimiento) Then
                                Mensaje = "Error al actualizar el recibo de los usados"
                                ErrorMovInv = True
                                Exit For