diff --git a/Compras/RepComprasDetalle.aspx.vb b/Compras/RepComprasDetalle.aspx.vb index 060289af1..d1c57402a 100644 --- a/Compras/RepComprasDetalle.aspx.vb +++ b/Compras/RepComprasDetalle.aspx.vb @@ -397,8 +397,8 @@ Partial Class Compras_RepComprasDetalle ImprimirPDF(String.Format("{0}Formatos\Remesa.rdlc", UsuarioActual.Empresa.Ruta), DtDatos.FiltraParametros("CveCompra > 0"), params, "Remesa", RDSName:="DsCompras") End Sub Protected Sub LnkExportar_Click(sender As Object, e As EventArgs) Handles LnkExportar.Click - GvDatos.ExportToExcel("ReporteComprasDetalles" & Now.ToShortDateString) - 'GenerarPDF("EXCEL") + 'GvDatos.ExportToExcel("ReporteComprasDetalles" & Now.ToShortDateString) + GenerarPDF("EXCEL") End Sub Protected Sub LnkPdf_Click(sender As Object, e As EventArgs) diff --git a/Ventas/MetasVendedores.aspx b/Ventas/MetasVendedores.aspx index 46c64406e..b22cc2c93 100644 --- a/Ventas/MetasVendedores.aspx +++ b/Ventas/MetasVendedores.aspx @@ -183,6 +183,21 @@ + + + + + + + + + + + + + + + diff --git a/Ventas/MetasVendedores.aspx.vb b/Ventas/MetasVendedores.aspx.vb index e362df89f..fdb6b508a 100644 --- a/Ventas/MetasVendedores.aspx.vb +++ b/Ventas/MetasVendedores.aspx.vb @@ -75,9 +75,21 @@ Partial Class MetasVendedores Protected Sub GV_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GV.RowDataBound If e.Row.RowType = DataControlRowType.DataRow Then + e.Row.FCLabel("lblRealMesPorcentaje").Text = String.Format("{0}{1}", e.Row.FCLabel("lblRealMesPorcentaje").Text, "%") + e.Row.FCLabel("lblVarVSAAPerc").Text = String.Format("{0}{1}", e.Row.FCLabel("lblVarVSAAPerc").Text, "%") Select Case e.Row.DataKey("Etiqueta") Case "Vendedor" e.Row.CssClass = "Vendedor" + e.Row.FCLabel("lblRealMes").Text = "" + e.Row.FCLabel("lblVtaMesAA").Text = "" + e.Row.FCLabel("lblObjMes").Text = "" + e.Row.FCLabel("lblRealAcumulado").Text = "" + e.Row.FCLabel("lblRealMesPorcentaje").Text = "" + e.Row.FCLabel("lblAAntAcumulado").Text = "" + e.Row.FCLabel("lblObjAcumulado").Text = "" + e.Row.FCLabel("lblVarVSAAPerc").Text = "" + e.Row.FCLabel("lblVarVSAA").Text = "" + e.Row.FCLabel("lblVarVSObjAcum").Text = "" Case "Categoria" e.Row.CssClass = "Totales" Case "Clasificacion"