From d3c18557354792f5c1d4e588db295254f26260c5 Mon Sep 17 00:00:00 2001 From: HECTOR RODRIGUEZ Date: Tue, 22 Jun 2021 01:05:17 -0700 Subject: [PATCH] mostrar con incono si aplica NC --- PortalProveedor/PortalProveedor.aspx | 8 +++++++- PortalProveedor/PortalProveedor.aspx.vb | 8 ++++++++ 2 files changed, 15 insertions(+), 1 deletion(-) diff --git a/PortalProveedor/PortalProveedor.aspx b/PortalProveedor/PortalProveedor.aspx index acdd6b0e0..a3ecb0e30 100644 --- a/PortalProveedor/PortalProveedor.aspx +++ b/PortalProveedor/PortalProveedor.aspx @@ -193,7 +193,13 @@ - + + Aplica NC + + + + + <%----%> diff --git a/PortalProveedor/PortalProveedor.aspx.vb b/PortalProveedor/PortalProveedor.aspx.vb index 370954255..c9293c7b6 100644 --- a/PortalProveedor/PortalProveedor.aspx.vb +++ b/PortalProveedor/PortalProveedor.aspx.vb @@ -511,11 +511,19 @@ Partial Class Portal_PortalProveedor e.Row.Cells(7).HorizontalAlign = HorizontalAlign.Right e.Row.Cells(8).HorizontalAlign = HorizontalAlign.Right + e.Row.Cells(9).Width = Unit.Percentage(10) + If e.Row.DBCampo("Saldo").ToDouble < 0 Then e.Row.Cells(5).ForeColor = Drawing.Color.Red If e.Row.DBCampo("DiasVencidos").ToDouble > 0 AndAlso CType(sender, GridView).ID = "GvCxP" Then e.Row.Cells(3).ForeColor = Drawing.Color.Red If e.Row.DBCampo("CveCompra") = "" Then e.Row.BackColor = Drawing.Color.LightGray + End If + + If e.Row.DBCampo("CveCompraNC").ToEntero > 0 Then + e.Row.FCHyperLink("HplNC").Visible = True + e.Row.FCHyperLink("HplNC").ImageUrl = "/Imagenes/flag_green.png" + e.Row.FCHyperLink("HplNC").ToolTip = "Notas de Crédito Aplicadas" End If If CType(sender, GridView).ID = "GvCxPHistorial" Then