From 3d032c7dfea3f5e70d1e394ac39c75c6ad9e4dc0 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Fri, 18 Aug 2023 17:47:06 -0700
Subject: [PATCH] =?UTF-8?q?--=20depuraci=C3=B3n?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 App_Code/ClsNominas.vb | 34 +++++++++++++++++-----------------
 1 file changed, 17 insertions(+), 17 deletions(-)

diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb
index 2161656b8..e08c5a988 100644
--- a/App_Code/ClsNominas.vb
+++ b/App_Code/ClsNominas.vb
@@ -774,25 +774,25 @@ Public Class ClsNominas
         Return Retorno
     End Function
 
-    Public Function UpdatePagoNomina(CvePeriodo As Integer, CveIE As Integer, CvePrePoliza As Integer, CveEmpresa As Integer) As Boolean
-        Dim Retorno As Boolean = False
-        DataAdapter("PA_Nom_PagoNominaUpdate")
+    'Public Function UpdatePagoNomina(CvePeriodo As Integer, CveIE As Integer, CvePrePoliza As Integer, CveEmpresa As Integer) As Boolean
+    '    Dim Retorno As Boolean = False
+    '    DataAdapter("PA_Nom_PagoNominaUpdate")
 
-        With SqlAdapter.SelectCommand.Parameters
-            .Add("@CvePeriodo", SqlDbType.Int).Value = CvePeriodo
-            .Add("@CveIE", SqlDbType.Int).Value = CveIE
-            .Add("@CvePrePoliza", SqlDbType.Int).Value = CvePrePoliza
-            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
-        End With
-        Try
-            SqlAdapter.Fill(Data)
-            Retorno = True
-        Catch ex As Exception
-            OnError("Ocurrió un error al actualizar el periodo.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
-        End Try
+    '    With SqlAdapter.SelectCommand.Parameters
+    '        .Add("@CvePeriodo", SqlDbType.Int).Value = CvePeriodo
+    '        .Add("@CveIE", SqlDbType.Int).Value = CveIE
+    '        .Add("@CvePrePoliza", SqlDbType.Int).Value = CvePrePoliza
+    '        .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+    '    End With
+    '    Try
+    '        SqlAdapter.Fill(Data)
+    '        Retorno = True
+    '    Catch ex As Exception
+    '        OnError("Ocurrió un error al actualizar el periodo.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+    '    End Try
 
-        Return Retorno
-    End Function
+    '    Return Retorno
+    'End Function
 
     'Public Function UpdateProvisionNomina(CvePeriodo As Integer, CvePrePoliza As Integer, CveEmpresa As Integer) As Boolean
     '    Dim Retorno As Boolean = False