From 806d86e2ce3e77cd64eeb9e810d880b3f413a62c Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Fri, 10 Jan 2025 08:00:05 -0700
Subject: [PATCH] -- activar bloqueo 2024 EMD

---
 Compras/Compras.aspx      |  8 ++++----
 Compras/eFacturas.aspx.vb | 13 ++++++-------
 2 files changed, 10 insertions(+), 11 deletions(-)

diff --git a/Compras/Compras.aspx b/Compras/Compras.aspx
index b105b0f5c..efdd39edf 100644
--- a/Compras/Compras.aspx
+++ b/Compras/Compras.aspx
@@ -785,7 +785,7 @@
                                                 </ItemTemplate>
                                             </asp:TemplateField>
                                             <%-- 4 --%>
-                                            <asp:BoundField DataField="Obs" ItemStyle-Width="300px" />
+                                            <asp:BoundField DataField="Obs" ItemStyle-Width="250px" />
                                             <%-- 5 --%>
                                             <asp:TemplateField ItemStyle-Width="150px" ItemStyle-HorizontalAlign="Left">
                                                 <ItemTemplate>
@@ -796,7 +796,7 @@
                                                 </ItemTemplate>
                                             </asp:TemplateField>
                                             <%-- 6 --%>
-                                            <asp:BoundField DataField="TipoGasto" ItemStyle-Width="177px" />
+                                            <asp:BoundField DataField="TipoGasto" ItemStyle-Width="125px" />
                                             <%-- 7 --%>
                                             <asp:BoundField DataField="PU" DataFormatString="{0:#,##0.00####}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="100px" />
                                             <%-- 8 --%>
@@ -827,13 +827,13 @@
                                             </asp:TemplateField>
 
                                             <%-- 12 --%>
-                                            <asp:TemplateField ItemStyle-HorizontalAlign="Center"  ItemStyle-Width="45px">
+                                            <asp:TemplateField ItemStyle-HorizontalAlign="Center"  ItemStyle-Width="40px">
                                                 <ItemTemplate>
                                                     <asp:LinkButton ID="imgE" runat="server" AlternateText="Editar" CausesValidation="False" CssClass="btn btn-circle btn-sm green" OnClick="Edit_Click" Text="<i class='fa fa-pencil'></i>" />
                                                 </ItemTemplate>
                                             </asp:TemplateField>
                                             <%-- 13 --%>
-                                            <asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="45px">
+                                            <asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="40px">
                                                 <ItemTemplate>
                                                     <asp:LinkButton ID="imgD" runat="server" AlternateText="Eliminar" CausesValidation="False" CommandName="Delete" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="confirmar" data-btn-ok-label="si" />
                                                 </ItemTemplate>
diff --git a/Compras/eFacturas.aspx.vb b/Compras/eFacturas.aspx.vb
index ac6c94e32..8b50e4c87 100644
--- a/Compras/eFacturas.aspx.vb
+++ b/Compras/eFacturas.aspx.vb
@@ -1122,13 +1122,12 @@ Partial Class Compras_eFacturas
                 e.Row.FCCheckBox("chkRegistraFactura").Visible = False
             End If
 
-            '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
+            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
 
         End If
     End Sub