diff --git a/App_Code/ClsInventarios.vb b/App_Code/ClsInventarios.vb
index 75e8cd605..fc9aacaa8 100644
--- a/App_Code/ClsInventarios.vb
+++ b/App_Code/ClsInventarios.vb
@@ -5158,7 +5158,7 @@ Public Class ClsInventarios
 
 #Region "INVENTARIOS - REPORTE DE MOVIMIENTOS DE PROVEEDOR"
 
-    Public Function GetRepMovimientosProveedor(CveEmpresa As Integer, CveConcepto As Integer, CveProveedor As Integer, FechaI As Date, FechaF As Date) As Boolean
+    Public Function GetRepMovimientosProveedor(CveEmpresa As Integer, CveConcepto As Integer, CveProveedor As Integer, CvePS As Integer, CveAlmacenOrigen As Integer, CveAlmacenDestino As Integer, FechaI As Date, FechaF As Date) As Boolean
         Dim Retorno As Boolean = False
         DataAdapter("PA_Inv_ProductosProveedor")
 
@@ -5166,6 +5166,9 @@ Public Class ClsInventarios
             .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
             .Add("@CveConcepto", SqlDbType.Int).Value = CveConcepto
             .Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor
+            .Add("@CvePS", SqlDbType.Int).Value = CvePS
+            .Add("@CveAlmacenOrigen", SqlDbType.Int).Value = CveAlmacenOrigen
+            .Add("@CveAlmacenDestino", SqlDbType.Int).Value = CveAlmacenDestino
             .Add("@FechaI", SqlDbType.Date).Value = FechaI
             .Add("@FechaF", SqlDbType.Date).Value = FechaF
         End With