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 @@ <%-- 4 --%> - + <%-- 5 --%> @@ -796,7 +796,7 @@ <%-- 6 --%> - + <%-- 7 --%> <%-- 8 --%> @@ -827,13 +827,13 @@ <%-- 12 --%> - + <%-- 13 --%> - + 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