From b29d81b472305a5db745f549e8abde6b437e3804 Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Wed, 10 Feb 2021 12:55:45 -0700
Subject: [PATCH] BDH ScoreCard

---
 Ventas/CatMetasVendedores.aspx    |  2 +-
 Ventas/CatMetasVendedores.aspx.vb | 15 +++++++++------
 Ventas/MetasVendedores.aspx       | 23 +++++++++++++++++++----
 Ventas/MetasVendedores.aspx.vb    |  8 +++++---
 4 files changed, 34 insertions(+), 14 deletions(-)

diff --git a/Ventas/CatMetasVendedores.aspx b/Ventas/CatMetasVendedores.aspx
index 366e385c0..98b8d61e6 100644
--- a/Ventas/CatMetasVendedores.aspx
+++ b/Ventas/CatMetasVendedores.aspx
@@ -22,7 +22,7 @@
 <asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
     <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
         <ContentTemplate>
-            <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CveMeta,CveVendedor,CveMarca,CveClasificacion,CveClasificacionSup,Vendedor,MesAño,Marca,Clasificacion,MetaCantidad,MetaImporte" EmptyDataText="No se encontraron Motivo de Baja Registrados" ToolTip="Listado de Metas Vendedor" CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; text-align: center;width:100%" GridLines="None">
+            <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CveMeta,CveVendedor,CveMarca,CveClasificacion,CveClasificacionSup,Vendedor,MesAño,Marca,Clasificacion,MetaCantidad,MetaImporte" EmptyDataText="No se encontraron metas registradas" ToolTip="Listado de Metas Vendedor" CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; text-align: center;width:100%" GridLines="None">
                 <Columns>
                     <asp:TemplateField HeaderText ="Vendedor" ItemStyle-HorizontalAlign="Left">
                         <ItemTemplate>
diff --git a/Ventas/CatMetasVendedores.aspx.vb b/Ventas/CatMetasVendedores.aspx.vb
index 0f1e9f8f5..5a956cdb6 100644
--- a/Ventas/CatMetasVendedores.aspx.vb
+++ b/Ventas/CatMetasVendedores.aspx.vb
@@ -42,13 +42,14 @@ Partial Class CatMetasVendedores
         DdlMarcas.DataBind()
         DdlMarcas.Items.Insert(0, New ListItem("Todos", "-1"))
 
-        DdlClasificacion.DataSource = GlobalDTClasificaciones(UsuarioActual.CveEmpresa)
+        DdlClasificacionSup.DataSource = GlobalDTClasificaciones(UsuarioActual.CveEmpresa)
+        DdlClasificacionSup.DataBind()
+        DdlClasificacionSup.Items.Insert(0, New ListItem("Todos", "-1"))
+
+        DdlClasificacion.DataSource = GlobalDTClasificaciones2(UsuarioActual.CveEmpresa)
         DdlClasificacion.DataBind()
         DdlClasificacion.Items.Insert(0, New ListItem("Todos", "-1"))
 
-        DdlClasificacionSup.DataSource = GlobalDTClasificaciones(UsuarioActual.CveEmpresa)
-        DdlClasificacionSup.DataBind()
-        DdlClasificacionSup.Items.Insert(0, New ListItem("Todos", "-1"))
     End Sub
 
     Protected Sub LnkAgregar_Click() Handles LnkAgregar.Click
@@ -100,8 +101,10 @@ Partial Class CatMetasVendedores
         CveMetaVendedor = GvRow.DataKey("CveMeta").ToEntero
         DdlVendedores.SelectedValue = GvRow.DataKey("CveVendedor")
         TxtFechaI.Text = GvRow.DataKey("MesAño")
-        DdlClasificacionSup.SelectedValue = GvRow.DataKey("CveClasificacionSup")
-        DdlClasificacion.SelectedValue = GvRow.DataKey("CveClasificacion")
+
+        DdlClasificacionSup.SelectedValueExist(GvRow.DataKey("CveClasificacionSup"))
+        DdlClasificacion.SelectedValueExist(GvRow.DataKey("CveClasificacion"))
+
         DdlMarcas.SelectedValue = GvRow.DataKey("CveMarca")
         TxtMetaCantidad.Text = GvRow.DataKey("MetaCantidad")
         TxtMetaImporte.Text = GvRow.DataKey("MetaImporte")
diff --git a/Ventas/MetasVendedores.aspx b/Ventas/MetasVendedores.aspx
index efb1b7674..54b52aa47 100644
--- a/Ventas/MetasVendedores.aspx
+++ b/Ventas/MetasVendedores.aspx
@@ -154,6 +154,11 @@
                                 <asp:Label ID="lblRealMes" runat="server" Target="_blank" Text='<%# Eval("RealMes").ToString() %>'> </asp:Label>
                             </ItemTemplate>
                         </asp:TemplateField>
+                        <asp:TemplateField HeaderText="Real Mes %" ItemStyle-HorizontalAlign="Center">
+                            <ItemTemplate>
+                                <asp:Label ID="lblRealMesPorcentaje" runat="server" Target="_blank" Text='<%# Eval("RealMesPorcentaje").ToString() %>'> </asp:Label>
+                            </ItemTemplate>
+                        </asp:TemplateField>
                         <asp:TemplateField HeaderText="Venta Mes Año Anterior" ItemStyle-HorizontalAlign="Center">
                             <ItemTemplate>
                                 <asp:Label ID="lblVtaMesAA" runat="server" Target="_blank" Text='<%# Eval("VtaMesAA").ToString() %>'> </asp:Label>
@@ -164,14 +169,24 @@
                                 <asp:Label ID="lblObjMes" runat="server" Target="_blank" Text='<%# Eval("ObjMes").ToString() %>'> </asp:Label>
                             </ItemTemplate>
                         </asp:TemplateField>
+                        <asp:TemplateField HeaderText="Var Mes A.A" ItemStyle-HorizontalAlign="Center">
+                            <ItemTemplate>
+                                <asp:Label ID="lblVarMesAA" runat="server" Target="_blank" Text='<%# Eval("VarMesAA").ToString() %>'> </asp:Label>
+                            </ItemTemplate>
+                        </asp:TemplateField>
+                        <asp:TemplateField HeaderText="Var Mes Obj" ItemStyle-HorizontalAlign="Center">
+                            <ItemTemplate>
+                                <asp:Label ID="lblVarMesObj" runat="server" Target="_blank" Text='<%# Eval("VarMesObj").ToString() %>'> </asp:Label>
+                            </ItemTemplate>
+                        </asp:TemplateField>
                         <asp:TemplateField HeaderText="Real Acumulado" ItemStyle-HorizontalAlign="Center">
                             <ItemTemplate>
                                 <asp:Label ID="lblRealAcumulado" runat="server" Target="_blank" Text='<%# Eval("RealAcumulado").ToString() %>'> </asp:Label>
                             </ItemTemplate>
                         </asp:TemplateField>
-                        <asp:TemplateField HeaderText="Real Mes Porcentaje" ItemStyle-HorizontalAlign="Center">
+                        <asp:TemplateField HeaderText="Real Acumulado %" ItemStyle-HorizontalAlign="Center">
                             <ItemTemplate>
-                                <asp:Label ID="lblRealMesPorcentaje" runat="server" Target="_blank" Text='<%# Eval("RealMesPorcentaje").ToString() %>'> </asp:Label>
+                                <asp:Label ID="lblRealAcumuladoPorcentaje" runat="server" Target="_blank" Text='<%# Eval("RealAcumuladoPorcentaje").ToString() %>'> </asp:Label>
                             </ItemTemplate>
                         </asp:TemplateField>
                         <asp:TemplateField HeaderText="A. Ant. Acumulado" ItemStyle-HorizontalAlign="Center">
@@ -184,11 +199,11 @@
                                 <asp:Label ID="lblObjAcumulado" runat="server" Target="_blank" Text='<%# Eval("ObjAcumulado").ToString() %>'> </asp:Label>
                             </ItemTemplate>
                         </asp:TemplateField>
-                        <asp:TemplateField HeaderText="%Var vs AA" ItemStyle-HorizontalAlign="Center">
+<%--                        <asp:TemplateField HeaderText="%Var vs AA" ItemStyle-HorizontalAlign="Center">
                             <ItemTemplate>
                                 <asp:Label ID="lblVarVSAAPerc" runat="server" Target="_blank" Text='<%# Eval("VarVSAAPerc").ToString() %>'> </asp:Label>
                             </ItemTemplate>
-                        </asp:TemplateField>
+                        </asp:TemplateField>--%>
                         <asp:TemplateField HeaderText="Var vs AA" ItemStyle-HorizontalAlign="Center">
                             <ItemTemplate>
                                 <asp:Label ID="lblVarVSAA" runat="server" Target="_blank" Text='<%# Eval("VarVSAA").ToString() %>'> </asp:Label>
diff --git a/Ventas/MetasVendedores.aspx.vb b/Ventas/MetasVendedores.aspx.vb
index 41c71e9c0..458f35336 100644
--- a/Ventas/MetasVendedores.aspx.vb
+++ b/Ventas/MetasVendedores.aspx.vb
@@ -47,7 +47,7 @@ Partial Class MetasVendedores
         DdlClasificaciones.DataBind()
         DdlClasificaciones.Items.Insert(0, New ListItem("Todos", "-1"))
 
-        DdlClasificacion2.DataSource = GlobalDTClasificaciones(UsuarioActual.CveEmpresa)
+        DdlClasificacion2.DataSource = GlobalDTClasificaciones2(UsuarioActual.CveEmpresa)
         DdlClasificacion2.DataBind()
         DdlClasificacion2.Items.Insert(0, New ListItem("Todos", "-1"))
 
@@ -75,8 +75,10 @@ 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, "%")
+            e.Row.FCLabel("lblRealMesPorcentaje").Text = String.Format("{0}{1}", e.Row.FCLabel("lblRealMesPorcentaje").Text, "%")
+            e.Row.FCLabel("lblRealAcumuladoPorcentaje").Text = String.Format("{0}{1}", e.Row.FCLabel("lblRealAcumuladoPorcentaje").Text, "%")
+            'e.Row.FCLabel("lblVarVSAAPerc").Text = String.Format("{0}{1}", e.Row.FCLabel("lblVarVSAAPerc").Text, "%")
+
             Select Case e.Row.DataKey("Etiqueta")
                 Case "GrupoSuperior"
                     e.Row.CssClass = "GrupoSuperior"