From 609a9059602325b0b99a9bbb5bb3fdc9c1a43ded Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Thu, 24 Mar 2022 12:24:22 -0700
Subject: [PATCH] -- mejoras

---
 Inventarios/ResguardoMaterial.aspx    | 21 ++++++++++-----------
 Inventarios/ResguardoMaterial.aspx.vb | 18 ++++++------------
 2 files changed, 16 insertions(+), 23 deletions(-)

diff --git a/Inventarios/ResguardoMaterial.aspx b/Inventarios/ResguardoMaterial.aspx
index de33bdc27..1d8247bd6 100644
--- a/Inventarios/ResguardoMaterial.aspx
+++ b/Inventarios/ResguardoMaterial.aspx
@@ -423,44 +423,43 @@
                                     <div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style='display:none;'")%>>
                                         <div class="rowpadding">
                                             <div class="row">
-                                                <label class="col-md-4 truncate" id="LblTipo" runat="server" style="max-width: 155px">
+                                                <label class="col-md-3 truncate" id="LblTipo" runat="server" style="max-width: 155px">
                                                 </label>
-                                                <div class="col-md-8">
+                                                <div class="col-md-9">
                                                     <asp:Label Text="" ID="LbTipoLiberacion" runat="server" />
                                                 </div>
                                             </div>
                                             <hr />
                                             <div class="row">
-                                                <label class="col-md-4 truncate" style="max-width: 155px">Almacén origen:</label>
-                                                <div class="col-md-8">
+                                                <label class="col-md-3 truncate" style="max-width: 155px">Almacén origen:</label>
+                                                <div class="col-md-9">
                                                     <asp:Label Text="" ID="LbAlmacenLiberacion" runat="server" />
                                                 </div>
                                             </div>
                                             <div class="row">
-                                                <label class="col-md-4 truncate" style="max-width: 155px">Almacén destino:</label>
-                                                <div class="col-md-8">
+                                                <label class="col-md-3 truncate" style="max-width: 155px">Almacén destino:</label>
+                                                <div class="col-md-9">
                                                     <asp:DropDownList ID="DdlAlmacenDestinoLiberacion" runat="server" CssClass="form-control input-sm select2me" Width="100%" DataTextField="Almacen" DataValueField="CveAlmacen" AutoPostBack="true"></asp:DropDownList>
                                                     <asp:RequiredFieldValidator InitialValue="-1" ID="RfvAlmacenDestinoLiberacion" Display="None" ValidationGroup="GrpGuardarLiberacion" runat="server" ControlToValidate="DdlAlmacenDestinoLiberacion" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />Es campo <b>''Almacén destino''</b> es necesario, por favor seleccione uno."></asp:RequiredFieldValidator>
                                                     <ajax:ValidatorCalloutExtender ID="VCEAlmacenDestinoLiberacion" runat="server" HighlightCssClass="vco" TargetControlID="RfvAlmacenDestinoLiberacion" Width="350px"></ajax:ValidatorCalloutExtender>
                                                 </div>
                                             </div>
                                             <div class="row">
-                                                <label class="col-md-4 truncate" style="max-width: 155px">Fecha:</label>
-                                                <div class="col-md-8">
+                                                <label class="col-md-3 truncate" style="max-width: 155px">Fecha:</label>
+                                                <div class="col-md-9">
                                                     <asp:Label Text="" ID="LbFechaLiberacion" runat="server" />
                                                 </div>
                                             </div>
 
                                             <div class="row">
-                                                <label class="col-md-4 truncate" style="max-width: 155px">
+                                                <label class="col-md-3 truncate" style="max-width: 155px">
                                                     Observaciones
                                                
                                                 </label>
-                                                <div class="col-md-8">
+                                                <div class="col-md-9">
                                                     <asp:TextBox ID="TxtObservacionesLiberacion" TextMode="MultiLine" Rows="2" CssClass="form-control input-sm" runat="server" MaxLength="200"></asp:TextBox>
                                                 </div>
                                             </div>
-
                                         </div>
                                     </div>
                                 </div>
diff --git a/Inventarios/ResguardoMaterial.aspx.vb b/Inventarios/ResguardoMaterial.aspx.vb
index f72af89ae..bec25ab8b 100644
--- a/Inventarios/ResguardoMaterial.aspx.vb
+++ b/Inventarios/ResguardoMaterial.aspx.vb
@@ -264,7 +264,7 @@ Partial Class Inventarios_ResguardoMaterial
             ''Almacen Destino
         Else
             'RESGUARDO
-            DdlAlmacen.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1) '.FiltraParametros("CveTipoAlmacen IN (1,2)") 'GlobalDTAlmacen(UsuarioActual.CveEmpresa)
+            DdlAlmacen.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen NOT IN (8)") 'GlobalDTAlmacen(UsuarioActual.CveEmpresa)
             DdlAlmacen.DataBind()
             DdlAlmacen.Items.Insert(0, New ListItem("Seleccione", "-1"))
             'Almacen Destino
@@ -672,18 +672,12 @@ Partial Class Inventarios_ResguardoMaterial
                 BtnGuardarLiberacion.Visible = False
 
                 GvMLiberacion.Columns(1).Visible = True
-
-
-
             Else
                 DVInformacionMoviminetoLiberacion.Visible = True
                 BtnGuardarLiberacion.Visible = True
                 GvMLiberacion.Columns(1).Visible = False
                 GvMLiberacion.Columns(1).HeaderText = ""
             End If
-
-
-
         End If
 
         UpGridLiberacion.Update()
@@ -738,10 +732,10 @@ Partial Class Inventarios_ResguardoMaterial
 
     Private Sub CargaGvMLiberacion()
 
-        GvMLiberacion.Columns(5).Visible = DtMovimientosLiberacion.MAX("Serie").ToString <> ""
-        GvMLiberacion.Columns(6).Visible = DtMovimientosLiberacion.MAX("AplicaLote").ToString = "True"
-        GvMLiberacion.Columns(7).Visible = DtMovimientosLiberacion.MAX("AplicaCaducidad").ToString = "True" ' .ToDate > MinFecha
-        GvMLiberacion.Columns(8).Visible = DtMovimientosLiberacion.MAX("CveSeccionAlmacen").ToString.ToEntero > 0 Or DtMovimientosLiberacion.MAX("AplicaSeccion") = "True"
+        GvMLiberacion.Columns(6).Visible = DtMovimientosLiberacion.MAX("Serie").ToString <> ""
+        GvMLiberacion.Columns(7).Visible = DtMovimientosLiberacion.MAX("AplicaLote").ToString = "True"
+        GvMLiberacion.Columns(8).Visible = DtMovimientosLiberacion.MAX("AplicaCaducidad").ToString = "True" ' .ToDate > MinFecha
+        GvMLiberacion.Columns(9).Visible = DtMovimientosLiberacion.MAX("CveSeccionAlmacen").ToString.ToEntero > 0 Or DtMovimientosLiberacion.MAX("AplicaSeccion") = "True"
 
 
         GvMLiberacion.DataSource = DtMovimientosLiberacion
@@ -914,7 +908,7 @@ Partial Class Inventarios_ResguardoMaterial
 
                         If ObjInventario.GetMovimientosDetalle(CveMovimientoSalida, UsuarioActual.CveEmpresa) Then
                             Dim CveSeccionAlmacen As Integer = 0
-                            Importe = ObjInventario.DtResultados.SUMD("Total").RoundAD
+                            Importe = ObjInventario.DtResultados.SUMD("Total").RoundSQL
                             For Each Dr As DataRow In ObjInventario.DtResultados.Rows
                                 If CBool(Dr("AplicaSeccion")) Then
                                     CveSeccionAlmacen = GlobalDTInvPSSeccionesAlmacen(UsuarioActual.CveEmpresa, DdlAlmacenDestino.SelectedValue.ToEntero, Dr("CvePS").ToString.ToEntero).FiltroPrimeroValor("CveSeccionAlmacen").ToEntero