diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb
index 285a6d765..e64998d23 100644
--- a/App_Code/ClsNominas.vb
+++ b/App_Code/ClsNominas.vb
@@ -1861,8 +1861,9 @@ Public Class ClsNominas
 #End Region
 
 
-    Public Function GetInversionNomina(Optional FechaInicio As String = "", Optional FechaFin As String = "", Optional CveProyecto As Integer = -1,
-                                       Optional CveSubProyecto As Integer = -1, Optional Cve1 As Integer = -1, Optional Cve2 As Integer = -1,
+    Public Function GetInversionNomina(CveEmpresa As Integer, Optional FechaInicio As String = "", Optional FechaFin As String = "",
+                                       Optional CveProyecto As Integer = -1, Optional CveSubProyecto As Integer = -1,
+                                       Optional Cve1 As Integer = -1, Optional Cve2 As Integer = -1,
                                        Optional CveStr1 As String = "-1", Optional CveStr2 As String = "-1") As Boolean
         Dim Retorno As Boolean = False
         DataAdapter("PA_Nom_InversionNominaGET")
@@ -1875,6 +1876,7 @@ Public Class ClsNominas
             .Add("Cve2", SqlDbType.Int).Value = Cve2
             .Add("CveStr1", SqlDbType.Int).Value = CveStr1
             .Add("CveStr2", SqlDbType.Int).Value = CveStr2
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
         End With
         Try
             SqlAdapter.Fill(Data)