From ce121c268622cb093ff187f5aca899015b8426b4 Mon Sep 17 00:00:00 2001
From: rakcsle <rakcsle.rakcsle@gmail.com>
Date: Wed, 10 Jan 2024 12:12:37 -0700
Subject: [PATCH] Rep Ventas. personalizar Detalles Descripcion Venta

---
 Inventarios/RepEntradasSalidas.aspx    |  2 +-
 Inventarios/RepEntradasSalidas.aspx.vb | 21 ++++++++++++++++++++-
 Ventas/RepVentaDetalle.aspx            | 13 ++++++++++++-
 Ventas/RepVentaDetalle.aspx.vb         |  7 +++++++
 4 files changed, 40 insertions(+), 3 deletions(-)

diff --git a/Inventarios/RepEntradasSalidas.aspx b/Inventarios/RepEntradasSalidas.aspx
index 8a60e98ab..4e6ef9959 100644
--- a/Inventarios/RepEntradasSalidas.aspx
+++ b/Inventarios/RepEntradasSalidas.aspx
@@ -209,7 +209,7 @@
     <asp:UpdatePanel ID="UpEncabezado" runat="server" UpdateMode="Conditional">
         <ContentTemplate> 
             <div id="dvCa" style="width:100%;visibility:hidden;top:40px">
-            <table id="dTable" class="correcto table  Widthall "><tr>                       
+            <table id="dTable" class="correcto table  Widthall " runat="server"><tr>                       
                 <td id="dvArt" runat="server" class="dataTables_scrollHead" style="text-align:center!important; font-size:14px;width:32.5%;"><b>Producto</b></td>                
                 <td id="dvCan" runat="server" class="dataTables_scrollHead" style="text-align:center!important; font-size:14px; border-right-color: white!important;border-left-color: white!important;width:30%;border-style: solid;"><b>Cantidad</b></td>                  
                 <td id="dvImp" runat="server"  class="dataTables_scrollHead" style="text-align:center!important;width: 37.5%;font-size:14px;"><b>Importe</b></td>
diff --git a/Inventarios/RepEntradasSalidas.aspx.vb b/Inventarios/RepEntradasSalidas.aspx.vb
index cb27e38cf..91441f19c 100644
--- a/Inventarios/RepEntradasSalidas.aspx.vb
+++ b/Inventarios/RepEntradasSalidas.aspx.vb
@@ -3,6 +3,7 @@ Option Strict On
 
 Imports System.Data
 Imports System.IO
+Imports DocumentFormat.OpenXml.Office2013.Excel
 Imports Extensiones
 Imports Microsoft.Reporting.WebForms
 
@@ -101,13 +102,31 @@ Partial Class Inventarios_ReporteEntradasSalidas
     Private Sub CargaPermisos()
         Dim TienePermisoImportes As Boolean = UsuarioActual.TienePermisoProceso(201)
 
+        If Not TienePermisoImportes Then
+            GvM.Columns(0).HeaderStyle.Width = 268
+            GvM.Columns(4).HeaderStyle.Width = 269
+            GvM.Columns(6).HeaderStyle.Width = 133
+            GvM.Columns(7).HeaderStyle.Width = 133
+            GvM.Columns(8).HeaderStyle.Width = 133
+            GvM.Columns(10).HeaderStyle.Width = 134
+            GvM.CssClass = "table table-smallpadding table-striped table-hover ScrollAD"
+            GvM.Width = 1074
+            dvArt.Attributes.Add("style", "text-align:center!important; font-size:14px;width:537px;")
+            dvCan.Attributes.Add("style", "text-align:center!important; font-size:14px; border-right-color: white!important;border-left-color: white!important;width:537px;border-style: solid;")
+            dTable.Attributes.Add("class", "correcto table")
+            dTable.Attributes.Add("style", "width:1074px;")
+        End If
+
         dvImp.Visible = TienePermisoImportes
+
         GvM.Columns(11).Visible = TienePermisoImportes
         GvM.Columns(12).Visible = TienePermisoImportes
         GvM.Columns(13).Visible = TienePermisoImportes
         GvM.Columns(14).Visible = TienePermisoImportes
         GvM.Columns(15).Visible = TienePermisoImportes
 
+
+
         If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then
             GvM.Columns(9).Visible = True
         End If
@@ -303,7 +322,7 @@ Partial Class Inventarios_ReporteEntradasSalidas
 
                 e.Row.CssClass = "Totales"
                 Dim Almacenes As String = If(DdlAlmacen.GetSelectedValuesM = "", "-1", DdlAlmacen.GetSelectedValuesM)
-                'e.Row.Cells(0).Text = $"<a class='Texto' href='./RepExistenciasCostos.aspx?CvePS={e.Row.DataKey("CvePS")}&CveMoneda={e.Row.DataKey("CveMoneda")}&CveProveedor={e.Row.DataKey("CveProveedor")}&CveConcepto={e.Row.DataKey("CveConcepto")}&FechaI={e.Row.DataKey("FechaF").ToDate().ToString("dd/MM/yyyy")}&FechaF={e.Row.DataKey("FechaF").ToDate().ToString("dd/MM/yyyy")}&CveAlmacen={e.Row.DataKey("CveAlmacen")}&CvePersonal={e.Row.DataKey("CvePersonal")}'>{e.Row.DataKey("Codigo")}</a>"
+                'e.Row.Cells(0).Text = $"<a Class='Texto' href='./RepExistenciasCostos.aspx?CvePS={e.Row.DataKey("CvePS")}&CveMoneda={e.Row.DataKey("CveMoneda")}&CveProveedor={e.Row.DataKey("CveProveedor")}&CveConcepto={e.Row.DataKey("CveConcepto")}&FechaI={e.Row.DataKey("FechaF").ToDate().ToString("dd/MM/yyyy")}&FechaF={e.Row.DataKey("FechaF").ToDate().ToString("dd/MM/yyyy")}&CveAlmacen={e.Row.DataKey("CveAlmacen")}&CvePersonal={e.Row.DataKey("CvePersonal")}'>{e.Row.DataKey("Codigo")}</a>"
                 e.Row.Cells(4).Text = $"<a class='Texto' href='./RepExistenciasCostos.aspx?CvePS={DdlPS.txtValue.Value}&CveMoneda={DdlMoneda.SelectedValue}&CveProveedor={DdlProveedor.txtValue.Value}&CveConcepto={DdlTipoMovimiento.SelectedValue}&FechaI={TxtFechaI.Text}&FechaF={TxtFechaF.Text}&CveAlmacen={Almacenes}&CvePersonal={DdlPersonal.SelectedValue}&Tipo={DdlMovs.SelectedValue.ToEntero}'>{e.Row.DataKey("PS")}</a>"
                 'e.Row.Cells(4).Text = $"<a class='Texto' href='./RepExistenciasCostos.aspx?CvePS={e.Row.DataKey("CvePS")}&CveMoneda={e.Row.DataKey("CveMoneda")}&CveProveedor={e.Row.DataKey("CveProveedor")}&CveConcepto={e.Row.DataKey("CveConcepto")}&FechaI={e.Row.DataKey("FechaF").ToDate().ToString("dd/MM/yyyy")}&FechaF={e.Row.DataKey("FechaF").ToDate().ToString("dd/MM/yyyy")}&CveAlmacen={e.Row.DataKey("CveAlmacen")}&CvePersonal={e.Row.DataKey("CvePersonal")}'>{e.Row.DataKey("PS")}</a>"
 
diff --git a/Ventas/RepVentaDetalle.aspx b/Ventas/RepVentaDetalle.aspx
index bf80fe55d..cb6dece06 100644
--- a/Ventas/RepVentaDetalle.aspx
+++ b/Ventas/RepVentaDetalle.aspx
@@ -579,12 +579,18 @@
                             <asp:Literal ID="LtlKm" runat="server" Text='<%# Eval("Kilometraje") %>'></asp:Literal>
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <%-- 39--%>
+                    <%-- 40--%>
                     <asp:TemplateField HeaderText="TC" Visible="false">
                         <ItemTemplate>
                             <asp:Literal ID="LtlTC" runat="server" Text='<%# Eval("TipoCambio") %>'></asp:Literal>
                         </ItemTemplate>
                     </asp:TemplateField>
+                     <%-- 41--%>
+                    <asp:TemplateField HeaderText="Descripción Venta" Visible="false">
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlDescripcionVenta" runat="server" Text='<%# Eval("DescripcionVenta") %>'></asp:Literal>
+                        </ItemTemplate>
+                     </asp:TemplateField>
 
                 </Columns>
             </asp:GridView>
@@ -732,6 +738,11 @@
                                         <td style="text-align: left;"> </td>                                   
                                         <td style="text-align: left;"><asp:CheckBox ID="ChkKilometraje" runat="server" Visible="False" Text="&nbsp; Kilometraje" /></td>                           
                                     </tr>
+                                    <tr>
+                                        <td style="text-align: left;"></td>
+                                        <td style="text-align: left;"> </td>                                   
+                                        <td style="text-align: left;"><asp:CheckBox ID="ChkDescripcionVenta" runat="server" Visible="true" Text="&nbsp; Descripción Venta" /></td>                           
+                                    </tr>
  
                                 </tbody>
                             </table> 
diff --git a/Ventas/RepVentaDetalle.aspx.vb b/Ventas/RepVentaDetalle.aspx.vb
index b292cf75f..302599684 100644
--- a/Ventas/RepVentaDetalle.aspx.vb
+++ b/Ventas/RepVentaDetalle.aspx.vb
@@ -705,6 +705,8 @@ Partial Class RepVentaDetalle
 
         If ChkTC.Checked Then ListPersonalizada.Add("TC")
 
+        If ChkDescripcionVenta.Checked Then ListPersonalizada.Add("DescripcionVenta")
+
         If objUsuario.AddUsuariosPersonalizaciones(UsuarioActual, "RepVentaDetalles.aspx", String.Join("|", ListPersonalizada)) Then
             'Alert("Personalizacion guardada")
         End If
@@ -889,6 +891,9 @@ Partial Class RepVentaDetalle
                     Case "Kilometraje"
                         ChkKilometraje.Checked = True
                         Exit Select
+                    Case "DescripcionVenta"
+                        ChkDescripcionVenta.Checked = True
+                        Exit Select
                     Case Else
                         Exit Select
                 End Select
@@ -947,6 +952,8 @@ Partial Class RepVentaDetalle
         GvDatos.Columns(38).Visible = ChkUsoCFDI.Checked
         GvDatos.Columns(39).Visible = ChkKilometraje.Checked
         GvDatos.Columns(40).Visible = ChkTC.Checked
+        GvDatos.Columns(41).Visible = ChkDescripcionVenta.Checked
+
 
         Personalizo = 1
         If Personalizo = 1 Then