-- filtro empresa proyectados

2020-10-30 11:25:38 -07:00
parent 0350b1a2e8
commit 6fba8fe600
1 changed files with 2 additions and 2 deletions
--- a/App_Code/ClsInventarios.vb
+++ b/App_Code/ClsInventarios.vb
@@ -5259,13 +5259,13 @@ Public Class ClsInventarios
        Return Retorno
    End Function

-    Public Function DeleteMovimientosProyectados(TipoMovto As Integer) As Boolean
+    Public Function DeleteMovimientosProyectados(TipoMovto As Integer, CveEmpresa As Integer) As Boolean
        Dim Retorno As Boolean = False
        DataAdapter("Inv_MovimientosProyectadosDelete")

        With SqlAdapter.SelectCommand.Parameters
            .Add("@TipoMovto", SqlDbType.TinyInt).Value = TipoMovto
-
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
        End With

        Try