diff --git a/App_Code/ClsInventarios.vb b/App_Code/ClsInventarios.vb
index 70e923f48..231b52111 100644
--- a/App_Code/ClsInventarios.vb
+++ b/App_Code/ClsInventarios.vb
@@ -1035,18 +1035,8 @@ Public Class ClsInventarios
             .Add("@CveClienteSucursal", SqlDbType.Int).Value = CveClienteSucursal
             .Add("@PedidoContrato", SqlDbType.VarChar).Value = PedidoContrato
             .Add("@GastoIndirecto", SqlDbType.Money).Value = GastoIndirecto
-            '.Add("@CveChofer", SqlDbType.Int).Value = CveChofer
-            '.Add("@CveCamion", SqlDbType.Int).Value = CveCamion
-            '.Add("@Placa", SqlDbType.VarChar).Value = Placa
-            '.Add("@FechaEntrega", SqlDbType.VarChar).Value = FechaEntrega
-            '.Add("@EspecifUnidad", SqlDbType.VarChar).Value = EspecifUnidad
             .Add("@ResponsableCarga", SqlDbType.VarChar).Value = ResponsableCarga
             .Add("@ResponsableRecibio", SqlDbType.VarChar).Value = ResponsableRecibio
-            '.Add("@Identificacion", SqlDbType.VarChar).Value = Identificacion
-            '.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("@Modulo", SqlDbType.VarChar).Value = Modulo
             .Add("@CveOP", SqlDbType.Int).Value = CveOP
             .Add("@CveEntregaAlmacen", SqlDbType.Int).Value = CveEntregaAlmacen
@@ -1077,7 +1067,6 @@ Public Class ClsInventarios
                                      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 Decimal = -1, Optional CveCliente As Integer = -1, Optional CveProveedor As Integer = -1, Optional Remision As String = "") As Boolean
 
         Dim Retorno As Boolean = False
-
         DataAdapter("PA_Inv_MovimientosUpdate")
 
         With SqlAdapter.SelectCommand.Parameters
@@ -1118,7 +1107,6 @@ Public Class ClsInventarios
     Public Function UpdateMovimientoPoliza(IDPoliza As Integer, CveMovimiento As Integer, CveEmpresa As Integer) As Boolean
 
         Dim Retorno As Boolean = False
-
         DataAdapter("PA_Inv_MovimientosPolizaUpdate")
 
         With SqlAdapter.SelectCommand.Parameters
@@ -1140,7 +1128,6 @@ Public Class ClsInventarios
     Public Function UpdateMovimientoGuia(Guia As String, CveMovimiento As Integer, CveEmpresa As Integer) As Boolean
 
         Dim Retorno As Boolean = False
-
         DataAdapter("PA_Inv_MovimientosPolizaUpdate")
 
         With SqlAdapter.SelectCommand.Parameters
@@ -1162,7 +1149,6 @@ Public Class ClsInventarios
     Public Function MovimientoRemove(CveMovimiento As Integer, CveEmpresa As Integer, Optional CveUsuario As Integer = -1) As Boolean
 
         Dim Retorno As Boolean = False
-
         DataAdapter("PA_Inv_MovimientosRemove")
 
         With SqlAdapter.SelectCommand.Parameters