-

2024-01-11 08:33:51 -07:00
parent fcdc349efb ce121c2686
commit 8c5e8b78a8
19 changed files with 141 additions and 189 deletions
--- a/Inventarios/RecepcionAlmacen.aspx
+++ b/Inventarios/RecepcionAlmacen.aspx
@@ -192,7 +192,7 @@
                                       
                                        </div>
                                        <div class="col-md-10">
-                                            <asp:DropDownList ID="DdlAlmacen" runat="server" AutoPostBack="true" OnSelectedIndexChanged="DdlAlmacen_SelectedIndexChanged" DataTextField="Almacen" AppendDataBoundItems="true" DataValueField="CveAlmacen" CssClass="form-control input-sm select2me" Width="320px"></asp:DropDownList>
+                                            <asp:DropDownList ID="DdlAlmacen" runat="server"    DataTextField="Almacen" AppendDataBoundItems="true" DataValueField="CveAlmacen" CssClass="form-control input-sm select2me" Width="320px"></asp:DropDownList>
                                            <asp:RequiredFieldValidator ID="RFVAlmacen" runat="server" ControlToValidate="DdlAlmacen" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Almacen''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                            <ajax:ValidatorCalloutExtender ID="VCEAlmacen" runat="server" HighlightCssClass="vco" TargetControlID="RFVAlmacen" Width="350px"></ajax:ValidatorCalloutExtender>
                                        </div>
--- a/Inventarios/RecepcionAlmacen.aspx.vb
+++ b/Inventarios/RecepcionAlmacen.aspx.vb
@@ -474,7 +474,7 @@ Partial Class Inventarios_RecepcionAlmacen
            CargaPendientes()

            CargaPermisos()
-            If UsuarioActual.CveEmpresa.Contiene(72, 80) Then DdlAlmacen.AutoPostBack = True
+
            Dim PermisoEspecialCambioFecha As Boolean = False
            If UsuarioActual.CveUsuario.Contiene(100, 1937) Then PermisoEspecialCambioFecha = True

@@ -591,9 +591,7 @@ Partial Class Inventarios_RecepcionAlmacen
        UpGenerales.Update()
    End Sub

-    Protected Sub DdlAlmacen_SelectedIndexChanged(sender As Object, e As EventArgs)
-        RecargaporAlmacenes()
-    End Sub
+

    Private Sub RecargaporAlmacenes()
        CveTipoAlmacen = -1
--- 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>
--- 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>"