From 4941099a3ee768ea1f1f8d2a6f8bfb9582d44286 Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Mon, 25 Nov 2019 20:34:21 -0700 Subject: [PATCH] Modulo en inventarios --- App_Code/ClsInventarios.vb | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/App_Code/ClsInventarios.vb b/App_Code/ClsInventarios.vb index 2f992b6d2..a7ab7fdf6 100644 --- a/App_Code/ClsInventarios.vb +++ b/App_Code/ClsInventarios.vb @@ -958,7 +958,7 @@ Public Class ClsInventarios Optional CveMovimientoRelacionado As Integer = -1, Optional TipoCambio As Double = -1, Optional CveVendedor As Integer = -1, Optional CveCliente As Integer = -1, Optional MovimientoFijo As Boolean = False, Optional CveContrato As Integer = -1, Optional CveProveedor As Integer = -1, Optional Remision As String = "", Optional CveClienteSucursal As Integer = -1, Optional DepartamentoEntrega As String = "", Optional PedidoContrato As String = "", Optional GastoIndirecto As Double = -1, Optional CveChofer As Integer = -1, Optional Placa As String = "", Optional FechaEntrega As String = "", Optional EspecifUnidad As String = "", Optional ResponsableCarga As String = "", Optional ResponsableRecibio As String = "", Optional Identificacion As String = "", Optional Domicilio As String = "", - Optional Telefono As String = "", Optional Ciudad As String = "", Optional Licencia As String = "") As Integer + Optional Telefono As String = "", Optional Ciudad As String = "", Optional Licencia As String = "", Optional Modulo As String = "") As Integer Dim Retorno As Integer = -1 @@ -1010,7 +1010,8 @@ Public Class ClsInventarios .Add("@Domicilio", SqlDbType.VarChar).Value = Domicilio .Add("@Telefono", SqlDbType.VarChar).Value = Telefono .Add("@Ciudad", SqlDbType.VarChar).Value = Ciudad - .Add("@Licencia", SqlDbType.VarChar).Value = Licencia + .Add("@Licencia", SqlDbType.VarChar).Value = Licencia + .Add("@Modulo", SqlDbType.VarChar).Value = Modulo End With Try