diff --git a/App_Code/ClsInventarios.vb b/App_Code/ClsInventarios.vb
index 0697147af..3fb9d858b 100644
--- a/App_Code/ClsInventarios.vb
+++ b/App_Code/ClsInventarios.vb
@@ -1069,7 +1069,7 @@ Public Class ClsInventarios
     Public Function UpdateMovimiento(CveMovimiento As Integer, CveAlmacen As Integer, CveConcepto As Integer, CveMoneda As Integer, FechaMovto As DateTime, Folio As Integer, CveUsuario As Integer, CveEmpresa As Integer, CveCompra As Integer,
                                      CveVenta As Integer, CveSubProyecto As Integer, CveActivoFijo As Integer, Optional CvePersonal As Integer = -1, Optional Guia As String = "", Optional Observaciones As String = "", Optional Recibio As String = "", Optional TipoCambio As Double = -1, Optional CveCliente As Integer = -1, Optional CveProveedor As Integer = -1, Optional Remision As String = "") As Boolean
 
-        Dim Retorno = False
+        Dim Retorno As Boolean = False
 
         DataAdapter("PA_Inv_MovimientosUpdate")
 
@@ -3694,7 +3694,7 @@ Public Class ClsInventarios
     End Function
 
     Public Function AddConsignaciones(CveProveedor As Integer, CveCompra As Integer, SerieFolio As String, Fecha As Date, CveUsuario As Integer) As Integer
-        Dim Retorno = -1
+        Dim Retorno As Integer = -1
 
         DataAdapter("PA_Inv_ConsignacionesAdd")