diff --git a/App_Code/ClsInventarios.vb b/App_Code/ClsInventarios.vb
index f7709355b..56e51aaa3 100644
--- a/App_Code/ClsInventarios.vb
+++ b/App_Code/ClsInventarios.vb
@@ -1486,7 +1486,7 @@ Public Class ClsInventarios
     End Function
     Public Function GetKardexAlmacenHorizontal(CvePS As Integer, FechaFin As Date, CveAlmacen As Integer, CveUnidadMedida As Integer, CveProveedor As Integer, CveTipoAlmacen As Integer,
                                                IncluyeTransitorios As Integer, CveClasificacion As Integer, CveUsuario As Integer, CveEmpresa As Integer, Optional CondicionExistencias As Integer = 0,
-                                               Optional Orden As Integer = -1, Optional Marcas As String = "-1", Optional @IncluyeProyectado As Integer = -1) As Boolean
+                                               Optional Orden As Integer = -1, Optional Marcas As String = "-1", Optional IncluyeProyectado As Integer = -1) As Boolean
         Dim Retorno As Boolean = False
 
         DataAdapter("PA_Inv_KardexAlmacenHorizontalGet")
@@ -1506,7 +1506,7 @@ Public Class ClsInventarios
             .Add("@ExistenciasCondicion", SqlDbType.Int).Value = CondicionExistencias
             .Add("@Orden", SqlDbType.Int).Value = Orden
             .Add("@Marcas", SqlDbType.VarChar).Value = Marcas
-            .Add("@IncluyeProyectado", SqlDbType.TinyInt).Value = @IncluyeProyectado
+            .Add("@IncluyeProyectado", SqlDbType.TinyInt).Value = IncluyeProyectado
         End With
 
         Try