diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 43418882f..d7e1240dd 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -4313,16 +4313,16 @@ Partial Class Compras_Compras
 
         '------------------ INICIA VALIDACIONES ------------------
 
-        If UsuarioActual.CveEmpresa.Contiene(13, 83) Then
+        'If UsuarioActual.CveEmpresa.Contiene(13, 83) Then
 
 
-            Dim AnioFactura As Integer = TxtFecha.Text.ToDate.Year
-            Dim Fecha28Dic As Date = New Date(2024, 12, 28)
-            If NowADS() >= Fecha28Dic AndAlso TxtFecha.Text.ToDate.Year < 2025 Then
-                Alert("A partir del 28 de diciembre de 2024 no se pueden registrar facturas de 2024.", TipoMensaje.MsgAdvertencia)
-                Exit Sub
-            End If
-        End If
+        '    Dim AnioFactura As Integer = TxtFecha.Text.ToDate.Year
+        '    Dim Fecha28Dic As Date = New Date(2024, 12, 28)
+        '    If NowADS() >= Fecha28Dic AndAlso TxtFecha.Text.ToDate.Year < 2025 Then
+        '        Alert("A partir del 28 de diciembre de 2024 no se pueden registrar facturas de 2024.", TipoMensaje.MsgAdvertencia)
+        '        Exit Sub
+        '    End If
+        'End If
 
         If Not ValidaPresupuesto(2) Then
             Exit Sub
diff --git a/Compras/eFacturas.aspx.vb b/Compras/eFacturas.aspx.vb
index 641e5d482..ac6c94e32 100644
--- a/Compras/eFacturas.aspx.vb
+++ b/Compras/eFacturas.aspx.vb
@@ -1122,13 +1122,13 @@ Partial Class Compras_eFacturas
                 e.Row.FCCheckBox("chkRegistraFactura").Visible = False
             End If
 
-            If UsuarioActual.CveEmpresa.Contiene(13, 83) Then
+            'If UsuarioActual.CveEmpresa.Contiene(13, 83) Then
 
-                Dim Fecha28Dic As Date = New Date(2024, 12, 28)
-                If NowADS() >= Fecha28Dic AndAlso e.Row.DBCampo("FechaFactura").ToDate.Year < 2025 Then
-                    e.Row.FCHyperLink("HplAgregar").Visible = False
-                End If
-            End If
+            '    Dim Fecha28Dic As Date = New Date(2024, 12, 28)
+            '    If NowADS() >= Fecha28Dic AndAlso e.Row.DBCampo("FechaFactura").ToDate.Year < 2025 Then
+            '        e.Row.FCHyperLink("HplAgregar").Visible = False
+            '    End If
+            'End If
 
         End If
     End Sub