Contabilidad2/RepEstadoResultadosHorizontal.aspx

@@ -3,6 +3,18 @@
 <asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
 </asp:Content>
 <asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
+    <link rel="stylesheet" href="https://www.amcharts.com/lib/3/plugins/export/export.css" type="text/css" media="all" />
+    <style>
+        #chartdiv {
+            width: 100%;
+            height: 500px;
+        }
+
+        .fa.fa-bar-chart {
+            width: 16px;
+            height: 14px;
+        }
+    </style>
 </asp:Content>
 <asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
 </asp:Content>
@@ -10,11 +22,9 @@
     <asp:Literal ID="LtTitulo" Text="Estado de Resultados" runat="server" />
 </asp:Content>
 <asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
-    
     <li>
         <asp:LinkButton ID="LnkExportar" runat="server"><i class="fa fa-ad-excel"></i> Generar Excel</asp:LinkButton>
     </li>
-
 </asp:Content>
 <asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
 
@@ -60,10 +70,11 @@
                                 </div>
 
 
-                                <label class="col-md-2" style="width: 80px;"  runat="server" id="LiSubProyectoLbl"><asp:Label runat="server" ID="LblSubProyecto" ></asp:Label>  </label>
+                                <label class="col-md-2" style="width: 80px;" runat="server" id="LiSubProyectoLbl">
+                                    <asp:Label runat="server" ID="LblSubProyecto"></asp:Label>
+                                </label>
                                 <div class="col-md-1 " runat="server" id="LiSubProyectoDdl">
                                     <asp:DropDownList ID="DdlSubproyecto" runat="server" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" CssClass="form-control input-sm select2me" Style="max-width: 200px !important;">
-                                        
                                     </asp:DropDownList>
                                 </div>
 
@@ -185,7 +196,7 @@
         </ajax:TabPanel>
 
 
-        <ajax:TabPanel ID="TabMensualH" runat="server" HeaderText="Menses">
+        <ajax:TabPanel ID="TabMensualH" runat="server" HeaderText="Meses">
             <ContentTemplate>
 
 
@@ -201,6 +212,8 @@
                                             <asp:TemplateField>
                                                 <ItemTemplate>
                                                     <%--<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>--%>
+                                                    <asp:HyperLink ID="Hypgrafica" runat="server" CssClass="Texto Hypgrafica" NavigateUrl="javascript:void(0);" onclick="return HandlerGraf(this, event);"><i class="fa fa-bar-chart" aria-hidden="true"></i></asp:HyperLink>
+
                                                     <asp:HyperLink ID="HLNombre" runat="server" Text='<%# Eval("Nombre")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
                                                 </ItemTemplate>
                                                 <ItemStyle HorizontalAlign="Left" />
@@ -309,6 +322,7 @@
                                             <asp:TemplateField>
                                                 <ItemTemplate>
                                                     <%--<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>--%>
+                                                    <asp:HyperLink ID="Hypgrafica" runat="server" CssClass="Texto Hypgrafica" NavigateUrl="javascript:void(0);" onclick="return HandlerGraf(this, event);"><i class="fa fa-bar-chart" aria-hidden="true"></i></asp:HyperLink>
                                                     <asp:HyperLink ID="HLNombre" runat="server" Text='<%# Eval("Nombre")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
                                                 </ItemTemplate>
                                                 <ItemStyle HorizontalAlign="Left" />
@@ -416,6 +430,7 @@
 
                                             <asp:TemplateField>
                                                 <ItemTemplate>
+                                                    <asp:HyperLink ID="Hypgrafica" runat="server" CssClass="Texto Hypgrafica" NavigateUrl="javascript:void(0);" onclick="return HandlerGraf(this, event);"><i class="fa fa-bar-chart" aria-hidden="true"></i></asp:HyperLink>
                                                     <asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
                                                 </ItemTemplate>
                                                 <ItemStyle HorizontalAlign="Left" />
@@ -756,9 +771,9 @@
             </ContentTemplate>
         </ajax:TabPanel>
 
-        <ajax:TabPanel ID="TabSubProyecto" runat="server" HeaderText="Sub Proyecto H.">
+        <ajax:TabPanel ID="TabSubProyecto" runat="server" HeaderText="Centros de costo">
             <ContentTemplate>
-                <div class="col-md-12">
+                <div class="">
                     <asp:UpdatePanel ID="UpDatosSubProyectoH" UpdateMode="Conditional" runat="server">
                         <ContentTemplate>
 
@@ -769,6 +784,7 @@
                                     <asp:TemplateField>
                                         <ItemTemplate>
                                             <%--<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>--%>
+                                            <asp:HyperLink ID="Hypgrafica" runat="server" CssClass="Texto Hypgrafica" NavigateUrl="javascript:void(0);" onclick="return HandlerGraf(this, event);"><i class="fa fa-bar-chart" aria-hidden="true"></i></asp:HyperLink>
                                             <asp:HyperLink ID="HLNombre" runat="server" Text='<%# Eval("Nombre")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
                                         </ItemTemplate>
                                         <ItemStyle HorizontalAlign="Left" />
@@ -839,6 +855,7 @@
 
                                     <asp:TemplateField>
                                         <ItemTemplate>
+                                            <asp:HyperLink ID="Hypgrafica" runat="server" CssClass="Texto Hypgrafica" NavigateUrl="javascript:void(0);" onclick="return HandlerGraf(this, event);"><i class="fa fa-bar-chart" aria-hidden="true"></i></asp:HyperLink>
                                             <asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
                                         </ItemTemplate>
                                         <ItemStyle HorizontalAlign="Left" />
@@ -910,6 +927,7 @@
 
                                     <asp:TemplateField>
                                         <ItemTemplate>
+                                            <asp:HyperLink ID="Hypgrafica" runat="server" CssClass="Texto Hypgrafica" NavigateUrl="javascript:void(0);" onclick="return HandlerGraf(this, event);"><i class="fa fa-bar-chart" aria-hidden="true"></i></asp:HyperLink>
                                             <asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
                                         </ItemTemplate>
                                         <ItemStyle HorizontalAlign="Left" />
@@ -982,7 +1000,137 @@
 
 
 
+    <div id="DivModalGrafica" class="modal ADS fade" role="dialog">
+        <asp:UpdatePanel class="modal-dialog modal-lg" runat="server" ID="UPModalProd" UpdateMode="Conditional">
+            <ContentTemplate>
+                <div class="modal-content">
+                    <div class="modal-header">
+                        <button type="button" class="close" data-dismiss="modal">&times;</button>
+                        <h4 class="modal-title">
+                            <asp:Label ID="LblTituloGrafica" CssClass="LblTituloGrafica" runat="server" ClientIDMode="Static" Text=""></asp:Label>
+                        </h4>
+                    </div>
+                    <div class="modal-body">
+                        <div class="row">
+                            <div class="col-md-2"></div>
+                            <label class="col-md-1 truncate">Grafica:</label>
+                            <div class="col-md-2">
+                                <asp:DropDownList ID="DdlGrafica" runat="server" AppendDataBoundItems="true" Class="DdlGrafica select2me">
+                                    <asp:ListItem Selected="True" Text="Barras" Value="1"></asp:ListItem>
+                                    <asp:ListItem Text="Pastel" Value="2"></asp:ListItem>
+                                </asp:DropDownList>
+                            </div>
+                        </div>
+                        <br />
+                        <div id="chartdiv"></div>
+                    </div>
+                    <div class="modal-footer">
+                        <button type="button" class="btn btn-danger" data-dismiss="modal">Cerrar</button>
+                    </div>
+                </div>
+            </ContentTemplate>
+        </asp:UpdatePanel>
+    </div>
 
 </asp:Content>
 <asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
+
+    <script src="https://www.amcharts.com/lib/3/amcharts.js"></script>
+    <script src="https://www.amcharts.com/lib/3/serial.js"></script>
+    <script src="https://www.amcharts.com/lib/3/pie.js"></script>
+    <script src="https://www.amcharts.com/lib/3/plugins/export/export.min.js"></script>
+    <link rel="stylesheet" href="https://www.amcharts.com/lib/3/plugins/export/export.css" type="text/css" media="all" />
+    <script src="https://www.amcharts.com/lib/3/themes/light.js"></script>
+
+    <script>
+        //Hypgrafica
+
+
+        //$("body").on("click", ".ajax__tab_outer .ajax__tab_inner .ajax__tab_tab,ul.nav.nav-tabs li", function () {
+        //    setTimeout(loadadscroll, 10);
+        //});
+        let cdatos;
+        let currentid = 1;
+        function HandlerGraf(obj, evt) {
+            //console.log(obj);
+            //console.log(evt);
+            $("#DivModalGrafica").modal();
+            cdatos = $(obj).data('values');
+            if (currentid == 1) {
+            CargaGraficaBarras();
+            } else {
+            CargaGraficaPastel();
+            }
+            $('.LblTituloGrafica').text($(obj).parent().text());
+            //debugger;
+        }
+        function CargaGraficaBarras() {
+            let data = cdatos;
+            var chart = AmCharts.makeChart("chartdiv", {
+                "type": "serial",
+                "theme": "light",
+                "dataProvider": data,
+                "startDuration": 2,
+                "valueAxes": [{
+                    "position": "left",
+                    "title": "Ventas"
+                }],
+                "graphs": [{
+                    "balloonText": "[[category]]: <b>[[value]]</b> [[Moneda]]",
+                    "colorField": "Color",
+                    "fillAlphas": 1,
+                    "lineAlpha": 0.1,
+                    "type": "column",
+                    "valueField": "Valor"
+                }],
+                "depth3D": 20,
+                "angle": 30,
+                "chartCursor": {
+                    "categoryBalloonEnabled": false,
+                    "cursorAlpha": 0,
+                    "zoomable": false
+                },
+                "categoryField": "Texto",
+                "categoryAxis": {
+                    "gridPosition": "start",
+                    "labelRotation": 90
+                },
+                "export": {
+                    "enabled": true
+                }
+            });
+        }
+
+        function CargaGraficaPastel() {
+            let data = cdatos;
+            var chart = AmCharts.makeChart("chartdiv", {
+                "type": "pie",
+                "theme": "light",
+                "dataProvider":
+                    data,
+                "valueField": "Valor",
+                "titleField": "Texto",
+                "outlineAlpha": 0.4,
+                "depth3D": 0,
+                "balloonText": "[[title]]<br><span style='font-size:14px'><b>[[value]]</b> ([[percents]]% [[Moneda]])</span>",
+                "angle": 0,
+                "export": {
+                    "enabled": true
+                }
+            });
+        }
+        function ADSBegin() {
+        $('.DdlGrafica').on('select2:select', function (e) {
+            var data = e.params.data;
+            //console.log(data);
+            currentid = data.id;
+            if (currentid == 1) {
+            CargaGraficaBarras();
+            } else {
+            CargaGraficaPastel();
+            }
+        });
+        $('.DdlGrafica').removeClass('DdlGrafica')
+        }
+    </script>
 </asp:Content>

Contabilidad2/RepEstadoResultadosHorizontal.aspx.vb

@@ -75,6 +75,23 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
         End Set
     End Property
 
+    Private Property listacolores As List(Of String)
+        Get
+            Return DirectCast(ViewState("listacolores"), List(Of String))
+        End Get
+        Set(value As List(Of String))
+            ViewState("listacolores") = value
+        End Set
+    End Property
+    Private Property listaCampos As List(Of String())
+        Get
+            Return DirectCast(ViewState("listaCampos"), List(Of String()))
+        End Get
+        Set(value As List(Of String()))
+            ViewState("listaCampos") = value
+        End Set
+    End Property
+
     'Private Property ReporteComplementario As Boolean
     '    Get
     '        ReporteComplementario = CBool(ViewState("ReporteComplementario").ToString)
@@ -235,7 +252,20 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
 
     Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
         If Not Page.IsPostBack Then
-
+            listacolores = New List(Of String)
+            listaCampos = New List(Of String())
+            listacolores.Add("#FF0F00")
+            listacolores.Add("#FF6600")
+            listacolores.Add("#F8FF01")
+            listacolores.Add("#04D215")
+            listacolores.Add("#2A0CD0")
+            listacolores.Add("#8A0CCF")
+            listacolores.Add("#CD0D74")
+            listacolores.Add("#754DEB")
+            listacolores.Add("#DDDDDD")
+            listacolores.Add("#999999")
+            listacolores.Add("#000000")
+            listacolores.Add("#FF0F00")
 
             TotalActualMes = 0
             TotalAnteriorMes = 0
@@ -859,6 +889,10 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
 
             End If
 
+            setgrafica(e)
+
+
+
 
             e.Row.FCHyperLink("HLEnero").ForeColor = If(e.Row.DataKey("Enero").ToDecimal < 0, Drawing.Color.Red, e.Row.FCHyperLink("HLEnero").ForeColor)
             e.Row.FCHyperLink("HLFebrero").ForeColor = If(e.Row.DataKey("Febrero").ToDecimal < 0, Drawing.Color.Red, e.Row.FCHyperLink("HLFebrero").ForeColor)
@@ -955,6 +989,10 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
                 End If
             End If
 
+
+            setgrafica(e)
+
+
             e.Row.FCHyperLink("HLEnero").ForeColor = If(e.Row.DataKey("Enero").ToDecimal < 0, Drawing.Color.Red, e.Row.FCHyperLink("HLEnero").ForeColor)
             e.Row.FCHyperLink("HLFebrero").ForeColor = If(e.Row.DataKey("Febrero").ToDecimal < 0, Drawing.Color.Red, e.Row.FCHyperLink("HLFebrero").ForeColor)
             e.Row.FCHyperLink("HLMarzo").ForeColor = If(e.Row.DataKey("Marzo").ToDecimal < 0, Drawing.Color.Red, e.Row.FCHyperLink("HLMarzo").ForeColor)
@@ -1017,6 +1055,8 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
                 e.Row.FCHyperLink("HLDiciembre").Text = e.Row.DataKey("Diciembre").ToDecimal.ToString("###,###,##0.00")
             End If
 
+            setgrafica(e)
+
             e.Row.FCHyperLink("HLEnero").ForeColor = If(e.Row.DataKey("Enero").ToDecimal < 0, Drawing.Color.Red, e.Row.FCHyperLink("HLEnero").ForeColor)
             e.Row.FCHyperLink("HLFebrero").ForeColor = If(e.Row.DataKey("Febrero").ToDecimal < 0, Drawing.Color.Red, e.Row.FCHyperLink("HLFebrero").ForeColor)
             e.Row.FCHyperLink("HLMarzo").ForeColor = If(e.Row.DataKey("Marzo").ToDecimal < 0, Drawing.Color.Red, e.Row.FCHyperLink("HLMarzo").ForeColor)
@@ -1035,6 +1075,23 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
 
     End Sub
 
+    Public Sub setgrafica(e As GridViewRowEventArgs)
+
+        Dim lista As New List(Of Object)
+        lista.Add(New With {.Texto = "Enero", .Valor = e.Row.DataKey("Enero").ToDecimal(), .Color = "#FF0F00"})
+        lista.Add(New With {.Texto = "Febrero", .Valor = e.Row.DataKey("Febrero").ToDecimal(), .Color = "#FF6600"})
+        lista.Add(New With {.Texto = "Marzo", .Valor = e.Row.DataKey("Marzo").ToDecimal(), .Color = "#F8FF01"})
+        lista.Add(New With {.Texto = "Abril", .Valor = e.Row.DataKey("Abril").ToDecimal(), .Color = "#04D215"})
+        lista.Add(New With {.Texto = "Mayo", .Valor = e.Row.DataKey("Mayo").ToDecimal(), .Color = "#2A0CD0"})
+        lista.Add(New With {.Texto = "Junio", .Valor = e.Row.DataKey("Junio").ToDecimal(), .Color = "#8A0CCF"})
+        lista.Add(New With {.Texto = "Julio", .Valor = e.Row.DataKey("Julio").ToDecimal(), .Color = "#CD0D74"})
+        lista.Add(New With {.Texto = "Agosto", .Valor = e.Row.DataKey("Agosto").ToDecimal(), .Color = "#754DEB"})
+        lista.Add(New With {.Texto = "Septiembre", .Valor = e.Row.DataKey("Septiembre").ToDecimal(), .Color = "#DDDDDD"})
+        lista.Add(New With {.Texto = "Octubre", .Valor = e.Row.DataKey("Octubre").ToDecimal(), .Color = "#999999"})
+        lista.Add(New With {.Texto = "Noviembre", .Valor = e.Row.DataKey("Noviembre").ToDecimal(), .Color = "#000000"})
+        lista.Add(New With {.Texto = "Diciembre", .Valor = e.Row.DataKey("Diciembre").ToDecimal(), .Color = "#FF0F00"})
+        e.Row.FCHyperLink("Hypgrafica").Attributes.Add("data-values", Newtonsoft.Json.JsonConvert.SerializeObject(lista))
+    End Sub
 #End Region
 
 
@@ -1445,7 +1502,7 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
             CType(GvIngresosSubProyectoH.Columns(IDX_LIMPIAR), BoundField).DataField = Nothing
             CType(GvIngresosSubProyectoH.Columns(IDX_LIMPIAR), BoundField).HeaderText = ""
         Next
-
+        listaCampos.Clear()
 
 
         If DtIngresosSubProyectoH.Rows.Count > 0 Then
@@ -1467,7 +1524,7 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
                             CType(GvTotalesSubProyectoH.Columns(IndexGv), BoundField).HeaderText = DTSubProyectosCabecerasH.Rows(IndexSubProyecto)(0).ToString
                             CType(GvGastosSubProyectoH.Columns(IndexGv), BoundField).HeaderText = DTSubProyectosCabecerasH.Rows(IndexSubProyecto)(0).ToString
                         End If
-
+                        listaCampos.Add(New String() {dCoumn.ColumnName.ToString(), DTSubProyectosCabecerasH.Rows(IndexSubProyecto)(0).ToString()})
                     Else
                         GvIngresosSubProyectoH.Columns(IndexGv).Visible = False
                         GvTotalesSubProyectoH.Columns(IndexGv).Visible = False
@@ -1631,9 +1688,8 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
                 e.Row.ControlStyle.Font.Bold = True
                 e.Row.ControlStyle.Font.Size = 13
             End If
-
-
             Dim CveCuenta As Integer = e.Row.DataKey("CveCuenta").ToEntero
+            setgraficaCC(e)
             'Dim CveSubProyecto As Integer = e.Row.DataKey("CveSubProyecto").ToEntero
             If e.Row.DBCampo("CtaMayor").ToString.ToEntero > 0 Then
 
@@ -1686,9 +1742,7 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
 
 
             End If
-
             e.Row.FCHyperLink("HLAnterior").Text = If(DdlDivisor.SelectedValue.ToEntero > 1, e.Row.DBCampo("ImporteAcumulado").ToString.ToDecimal.ToString("###,###,##0"), e.Row.DBCampo("ImporteAcumulado").ToString.ToDecimal.ToString("###,###,##0.00"))
-
             If e.Row.DBCampo("ImporteAcumulado").ToString.ToDouble < 0 Then
                 e.Row.FCHyperLink("HLAnterior").ForeColor = Drawing.Color.Red
             End If
@@ -1698,6 +1752,7 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
 
     Protected Sub GvGastosSubProyectoH_RowDataBound(sender As Object, e As GridViewRowEventArgs)
         If e.Row.RowType = DataControlRowType.DataRow Then
+            setgraficaCC(e)
             If e.Row.DBCampo("CtaMayor").ToString.ToEntero < 0 Then
                 TotalActualMes -= e.Row.DBCampo("ImporteActual").ToString.ToDouble
                 TotalAnteriorMes -= e.Row.DBCampo("ImporteAcumulado").ToString.ToDouble
@@ -1706,9 +1761,6 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
                 'e.Row.CssClass = "SubTotales"
                 e.Row.ControlStyle.Font.Bold = True
             End If
-
-
-
             If e.Row.DBCampo("ImporteAcumulado").ToString.ToDouble < 0 Then
                 e.Row.FCHyperLink("HLAnterior").ForeColor = Drawing.Color.Red
             End If
@@ -1716,18 +1768,27 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
     End Sub
 
     Protected Sub GvTotalesSubProyectoH_RowDataBound(sender As Object, e As GridViewRowEventArgs)
-
         If e.Row.RowType = DataControlRowType.Header Then
             '  e.Row.Attributes.Add("style", "display:none")
         End If
-
         If e.Row.RowType = DataControlRowType.DataRow Then
-
+            setgraficaCC(e)
             e.Row.Attributes.Add("style", "Font-weight: bold")
         End If
-
     End Sub
 
+    Public Sub setgraficaCC(e As GridViewRowEventArgs)
+        Dim lista As New List(Of Object)
+        Dim colorindex As Integer = 0
+        For Each campo As String() In listaCampos
+            lista.Add(New With {.Texto = campo(1), .Valor = e.Row.DBCampo(campo(0)).ToDecimal(), .Color = listacolores(colorindex)})
+            colorindex = colorindex + 1
+            If colorindex >= listacolores.Count Then
+                colorindex = 0
+            End If
+        Next
+        e.Row.FCHyperLink("Hypgrafica").Attributes.Add("data-values", Newtonsoft.Json.JsonConvert.SerializeObject(lista))
+    End Sub
 #End Region
 
 

Inventarios/RepTraspasoAlmacen.aspx

@@ -202,7 +202,7 @@
     <asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">
         <ContentTemplate>
             <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontró ningun Traspaso de Almacén"
-                ToolTip="Remisiones sin Facturar"
+                ToolTip="Remisiones sin Facturar" data-rows="2"
                 CssClass="table table-striped table-advance table-hover Widthall ScrollAD"
                 data-sort="true" GridLines="None">
                 <Columns>

Inventarios/RepTraspasoAlmacen.aspx.vb

@@ -107,10 +107,15 @@ Partial Class RepTraspasoAlmacen
 
                 e.Row.Cells(0).Text = String.Format("Folio: <a class=""texto"" style=""color:white;"" target='_blank' href='/Inventarios/EntradasSalidas.aspx?CveMovimiento={1}'>{0}</a> ", e.Row.DBCampo("FolioSalida"), e.Row.DBCampo("CveMovimientoSalida"))
                 e.Row.Cells(1).Text = String.Format("{0}", e.Row.DBCampo("FechaMovto").ToString.ToDate.ToShortDateString)
-                e.Row.Cells(3).Text = String.Format("Almacen Origen: {0}&nbsp;&nbsp;&nbsp;&nbsp; Almacen Destino: {1} &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Responsable: {2}", e.Row.DBCampo("Almacen"), e.Row.DBCampo("AlmacenDestino"), e.Row.DBCampo("Recibio"))
+                e.Row.Cells(2).Text = String.Format("<span style =""white-space: nowrap;"">{0}</span>", e.Row.DBCampo("Almacen"))
+                e.Row.Cells(3).Text = String.Format("<span style =""white-space: nowrap;"">{0}</span>", e.Row.DBCampo("AlmacenDestino"))
+                e.Row.Cells(4).Text = String.Format("Responsable: {0}", e.Row.DBCampo("Recibio"))
             ElseIf e.Row.DBCampo("FechaMovto") = "" Then
                 e.Row.CssClass = "Totales"
                 e.Row.Cells(0).Text = "Total General"
+                e.Row.Cells(2).Text = String.Format("<span style =""white-space: nowrap;"">Almacen Origen</span>")
+                e.Row.Cells(3).Text = String.Format("<span style =""white-space: nowrap;"">Almacen Destino</span>")
+            Else
             End If
 
         End If

Metronic/assets/admin/layout/css/custom.css

@@ -44,17 +44,18 @@ table > tr > th.adsCol, table.table > tr > th.adsCol {
 .AdsBody .ADSCroll::-webkit-scrollbar-track {
     -webkit-box-shadow: inset 0 0 6px rgba(0,0,0,0.3);
     background-color: #F5F5F5;
-    border-radius: 10px;
+    border-radius: 4px;
 }
 
 .AdsBody .ADSCroll::-webkit-scrollbar {
-    width: 10px;
+    width: 8px;
+    height:10px;
     background-color: #F5F5F5;
 }
 
 .AdsBody .ADSCroll::-webkit-scrollbar-thumb {
     background-color: #AAA;
-    border-radius: 10px;
+    border-radius: 4px;
     background-image: -webkit-linear-gradient(90deg, rgba(0, 0, 0, .2) 25%, transparent 25%, transparent 50%, rgba(0, 0, 0, .2) 50%, rgba(0, 0, 0, .2) 75%, transparent 75%, transparent)
 }
 

Scripts/custom.js

@@ -426,6 +426,7 @@ function ADScroller2() {
             contenedor.append(divcenter);
             divcenter.append(divcenterCols);
             divcolsScroll = $('<div class="ADSCroll" style="height:' + (heightGral - altoc1) + 'px;"></div>').append(TVisibleCols);
+            divcolsScroll.width(anchoc1);
             divcenterCols.append(divcolsScroll);
             divcenter.append(divcenterbody);
             divbodyScroll = $('<div class="ADSCroll" style="width:' + (widthGral - anchoc1) + 'px;height:' + (heightGral - altoc1 + 20) + 'px;"></div>').append(Tthis);
@@ -1818,6 +1819,7 @@ jQuery(document).ready(function () {
         loadAdDropzone();
         clonsbuttons(); 
         ADScroller2();
+        //setTimeout(ADScroller2, 500);
         $('body').removeClass('page-portlet-fullscreen');
 
         $('.form-md-floating-label input').each(function () {

Ventas/RepVentas.aspx.vb

@@ -766,7 +766,7 @@ Partial Class Ventas_RepVentas
         Dim json As String = Newtonsoft.Json.JsonConvert.SerializeObject(query)
         Select Case DdlGrafica.SelectedValue.ToEntero
             Case 1
-                RegistraScript($"CargaGraficaBarras({json})", "22")
+                RegistraScript($"CargaGraficaBarras({json});console.log({json})", "22")
             Case 2
                 RegistraScript($"CargaGraficaPastel({json})", "22")
         End Select

vwd.webinfo

@@ -104,6 +104,8 @@
     
   
     
+  
+