-

App_Code/ClsNominas.vb

@@ -2763,9 +2763,11 @@ Public Class ClsNominas
         End Try
         Return retorno
     End Function
+
     Public Function GetNominaEmpleado(CveProyecto As Integer, CveSubProyecto As Integer, CveTurno As Integer, CvePeriodo As Integer, CveEmpresa As Integer, Agrupador As Integer,
                                       Optional RegimenContratacion As Integer = 1, Optional CvePersonal As Integer = -1, Optional NetoxSalario As Decimal = 0, Optional Neto As Decimal = 0,
-                                      Optional CveTipoTrabajador As Integer = -1) As Boolean
+                                      Optional CveTipoTrabajador As Integer = -1, Optional EsSimulador As Boolean = False, Optional TipoPeriodo As Integer = -1, Optional AreaGeografica As String = "A",
+                                      Optional EjercicioSimula As Integer = -1, Optional FactorISimula As Decimal = 1.0493150684931D) As Boolean
         Dim retorno As Boolean = False
         Try
             DTSet = New DataSet()
@@ -2782,6 +2784,11 @@ Public Class ClsNominas
                 .Add("@NetoxSalario", SqlDbType.Decimal).Value = NetoxSalario
                 .Add("@Neto", SqlDbType.Decimal).Value = Neto
                 .Add("@CveTipoTrabajador", SqlDbType.Decimal).Value = CveTipoTrabajador
+                .Add("@EsSimulador", SqlDbType.Bit).Value = EsSimulador
+                .Add("@TipoPeriodo", SqlDbType.Int).Value = TipoPeriodo
+                .Add("@AreaGeografica", SqlDbType.VarChar).Value = AreaGeografica.ToUpper()
+                .Add("@EjercicioSimula", SqlDbType.Int).Value = EjercicioSimula
+                .Add("@FactorISimula", SqlDbType.Decimal).Value = FactorISimula
             End With