GDiaz Pendientes de implementación 2025-01-09

Compras/Compras.aspx.vb

@@ -1406,6 +1406,9 @@ Partial Class Compras_Compras
 
             End If
 
+
+            CargarCentrosDeCosto(Nothing, Nothing, Nothing, LblSubProyecto)
+
             'Carga Proveedor
             If Request("CveProveedor") IsNot Nothing AndAlso IsNumeric(Request("CveProveedor")) AndAlso Request("CveProveedor").ToEntero > 0 Then
                 ViewState("CveProveedor") = Request("CveProveedor")
@@ -1502,6 +1505,9 @@ Partial Class Compras_Compras
                 DVModalAnticipoFechaEjecucion.Visible = True
                 HlEvento.Visible = True
                 HlEvento.NavigateUrl = "/OI/PopUpAgenda.aspx?CveTipoEvento=2&CveCompra=" & CveCompra & "&TB_iframe=true&height=370&width=600;"
+                If UsuarioActual.CveEmpresa = 189 Then
+                    BtnCancelarCompra.Visible = False
+                End If
             Else
 
                 ViewState("CveProveedor") = -1