From 84c9969f00de821768e367f78f33e246ca54da54 Mon Sep 17 00:00:00 2001
From: Oscar Irigoyen <rakcsle@outlook.com>
Date: Fri, 3 Mar 2023 09:55:17 -0700
Subject: [PATCH] Recepcion alamcen

---
 Compras/Compras.aspx.vb           |  4 +-
 Inventarios/RecepcionAlmacen.aspx | 78 +++++++++++++++++++------------
 OC/OC.aspx                        |  2 +-
 Sistemas/UsuarioDetalle.aspx.vb   |  3 ++
 4 files changed, 53 insertions(+), 34 deletions(-)

diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 9a557b9a8..dd5ed58af 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -5467,7 +5467,7 @@ Partial Class Compras_Compras
                                             ' If DdlMoneda.SelectedValue.ToEntero = 1 Or (DdlMoneda.SelectedValue.ToEntero > 1 AndAlso GlobalTipoCambio(TxtFecha.Text.ToDate) > 0) Then
 
                                             ''ALMACEN CONSIGNACION
-                                            If CveConsignacion > 0 Then
+                                            If CveConsignacion > 0 AndAlso CveCompraRefacturacion <= 0 Then
 
                                                 'actualizamos cvecompraconsignacion
                                                 For Each gvr As GridViewRow In GvInv.Rows
@@ -5590,7 +5590,7 @@ Partial Class Compras_Compras
                                                 Dim indice = 0
                                                 Dim ImporteConcepto As Decimal = 0
 
-                                                If DdlTipoComprobante.SelectedValue = "Fac" Then
+                                                If DdlTipoComprobante.SelectedValue = "Fac" AndAlso CveCompraRefacturacion <= 0 Then
 
                                                     For Each tCveAlmacen As Integer In ListAlmacenes
                                                         If GvInv.Rows(indice).FCDropDownList("DdlRecibirInv").SelectedValue = "1" Then
diff --git a/Inventarios/RecepcionAlmacen.aspx b/Inventarios/RecepcionAlmacen.aspx
index 35fdb222e..d66ae6da0 100644
--- a/Inventarios/RecepcionAlmacen.aspx
+++ b/Inventarios/RecepcionAlmacen.aspx
@@ -3,6 +3,11 @@
 <asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
 </asp:Content>
 <asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
+    <style>
+        #aDivCodigoSeriePS:hover{
+            color:black;
+        }
+    </style>
 </asp:Content>
 <asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
     <li>
@@ -454,51 +459,62 @@
 
     <%-- GV DATOS --%>
     <div class="portlet light smmallpadding bordered ">
-        <div class="portlet-title">
+        <div class="portlet-title xspadding">
             <div class="caption font-green">
                 <i class="icon-pin font-green"></i>
                 <span class="caption-subject bold uppercase">Entrada a Inventario</span>
             </div>
             <div class="actions">
-                <div class="btn-group">
+                <div class="btn-group">       
+                       
                 </div>
             </div>
             <div class="tools">
-                <a href="javascript:;" class="collapse"></a>
+
+
+                <a id="aDivCodigoSeriePS">
+                    <asp:UpdatePanel runat="server" RenderMode="Inline" ID="UpCodigoSeriePS">
+                        <ContentTemplate>
+
+                            <div runat="server" id="DivCodigoSeriePS" visible="false">
+                                <table class="d-inline-block">
+                                    <tr>
+                                        <td><i class="fa fa-barcode fa-5x" style="font-size: 20px; margin-top: 4px;" aria-hidden="true" data-toggle="tooltip" title="Código Barras"></i></td>
+                                        <td>
+                                            <asp:Panel ID="PanelCodigo" runat="server" DefaultButton="BtnCodigoPS">
+                                                <asp:TextBox ID="TxtCodigoPS" Width="140px" ClientIDMode="Static" Text="" runat="server" />
+                                                <asp:Button Text="" ID="BtnCodigoPS" OnClick="BtnCodigoPS_Click" Style="display: none" runat="server" />
+                                            </asp:Panel>
+                                        </td>
+
+                                        <td runat="server" visible="false" id="TdSeriePS">
+                                            <asp:Panel ID="PanelSerie" runat="server" DefaultButton="BtnSeriePS">
+                                                <asp:TextBox ID="TxtSeriePS" Text="" runat="server" />
+                                                <asp:Button Text="" ID="BtnSeriePS" OnClick="BtnSeriePS_Click" Style="display: none" runat="server" />
+                                            </asp:Panel>
+                                        </td>
+
+                                    </tr>
+                                </table>
+                            </div>
+
+
+                        </ContentTemplate>
+                    </asp:UpdatePanel>
+
+                </a>
+                <a href="javascript:;" class="collapse d-inline-block" data-original-title="" title=""></a>
+
+
+
             </div>
         </div>
         <div class="portlet-body form-horizontal form-row-sepe formnombottom">
 
             <asp:UpdatePanel ID="UPInv" runat="server" UpdateMode="Conditional">
                 <ContentTemplate>
-                    <asp:UpdatePanel runat="server">
-                        <ContentTemplate>
-                            <div class="row" runat="server" id="DivCodigoSeriePS" clientidmode="Static" visible="false">
-                                <div class="col-md-4 pull-right">
-                                    <table style="float: right;">
-                                        <tr>
-                                            <%-- <td>
-                                                        <asp:TextBox Width="35px" Text="1" ID="TxtCantidadCodigoBarras" runat="server" />
-                                                    </td>--%>
-                                            <td><i class="fa fa-barcode" style="font-size: 1.8em; margin-top: 8px;" aria-hidden="true" data-toggle="tooltip" title="Código Barras"></i></td>
-                                            <td>
-                                                <asp:Panel ID="PanelCodigo" runat="server" DefaultButton="BtnCodigoPS">
-                                                    <asp:TextBox ID="TxtCodigoPS" Width="140px" ClientIDMode="Static" Text="" runat="server" />
-                                                    <asp:Button Text="" ID="BtnCodigoPS" OnClick="BtnCodigoPS_Click" Style="display: none" runat="server" />
-                                                </asp:Panel>
-                                            </td>
-                                            <td runat="server" visible="false" id="TdSeriePS">
-                                                <asp:Panel ID="PanelSerie" runat="server" DefaultButton="BtnSeriePS">
-                                                    <asp:TextBox ID="TxtSeriePS" Text="" runat="server" />
-                                                    <asp:Button Text="" ID="BtnSeriePS" OnClick="BtnSeriePS_Click" Style="display: none" runat="server" />
-                                                </asp:Panel>
-                                            </td>
-                                        </tr>
-                                    </table>
-                                </div>
-                            </div>
-                        </ContentTemplate>
-                    </asp:UpdatePanel>
+
+                  
 
                     <asp:GridView ID="GvInv" runat="server" EmptyDataText="Aun no hay registros." AutoGenerateColumns="False" ShowFooter="True" ShowHeader="true" ShowHeaderWhenEmpty="True"
                         DataKeyNames="EntregaDirecta,Consec,CodigoBarras,CvePS,CveUM,PU,CantidadC,CantidadF,UM,PS,CveCompraDetalle,CveOrdenCompraDetalle,PUExtranjero,AplicaSerieLote,CveClasificacion,Codigo,CveVentaDetalle,CostoIndirecto,CveTamaño,Lote,AplicaSeccion,AplicaLote,AplicaCaducidad,AplicaSerie" HeaderStyle-CssClass="Titulos" RowStyle-Height="25px" CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" data-heighterror="450" data-freezerows="1" GridLines="None">
diff --git a/OC/OC.aspx b/OC/OC.aspx
index 437fa1ea0..db50d4266 100644
--- a/OC/OC.aspx
+++ b/OC/OC.aspx
@@ -1030,7 +1030,7 @@
                                             <asp:TemplateField>
                                                 <ItemTemplate>
                                                     <%--<asp:Literal ID="LtlIva" runat="server" Text='<%#  If(Not IsDBNull(Eval("IVA")), If(Eval("IVA").ToString <> "0", String.Concat(Eval("IVA", "{0:#,##0.00####}"), "<br>", Eval("IVAPorcentaje", "{0:0.### %}")), ""), "")  %>'></asp:Literal>--%>
-                                                    <asp:Literal ID="LtlIva" runat="server" Text='<%#  If(Not IsDBNull(Eval("IVA")), If(Eval("IVA").ToString <> "0", String.Concat(Eval("IVA", "{0:#,##0.00####}"), "<br>", If(Decimal.Parse(Eval("IVAPorcentaje").ToString) > 0.10001, "16.00 %", Eval("IVAPorcentaje", "{0:0.### %}"))), ""), "")  %>'></asp:Literal>
+                                                    <asp:Literal ID="LtlIva" runat="server" Text='<%#  If(Not IsDBNull(Eval("IVA")), If(Eval("IVA").ToString <> "0", String.Concat(Eval("IVA", "{0:#,##0.00####}"), "<br>", If(Not IsDBNull(Eval("IVAPorcentaje")) AndAlso Decimal.Parse(Eval("IVAPorcentaje").ToString) > 0.10001, "16.00 %", Eval("IVAPorcentaje", "{0:0.### %}"))), ""), "")  %>'></asp:Literal>
                                                 </ItemTemplate>
                                                 <ItemStyle HorizontalAlign="Right" />
                                             </asp:TemplateField>
diff --git a/Sistemas/UsuarioDetalle.aspx.vb b/Sistemas/UsuarioDetalle.aspx.vb
index ae83edfa9..4b7bbcf57 100644
--- a/Sistemas/UsuarioDetalle.aspx.vb
+++ b/Sistemas/UsuarioDetalle.aspx.vb
@@ -1383,6 +1383,9 @@ Partial Class Sistemas_UsuarioDetalle
         GlobalDTAlmacenUsuarios(-1, UsuarioActual.CveEmpresa) = Nothing
         GlobalDTUsuarioResponsable(UsuarioActual.CveEmpresa) = Nothing
         GlobalDTUsuarios(CveEmpresa:=UsuarioActual.CveEmpresa) = Nothing
+        If UsuarioActual.CveUsuario = 100 Then
+            Alert("Globals Recargados")
+        End If
         'If ObjUsuarios.GetUsuariosEmpresas(-1, UsuarioActual.CveEmpresa) Then
         '    Application("GlobalDTUsuarios") = ObjUsuarios.DtResultados
         '    Application("GlobalDTUsuarioResponsable") = ObjUsuarios.DtResultados.FiltraParametros("ProveedoresResponsables > 0")