From 74c40041c3cac95a874663f1ece73d702494e92b Mon Sep 17 00:00:00 2001
From: MLopez <Mario.lopez@adssistemas.mx>
Date: Fri, 24 Feb 2023 20:44:58 -0700
Subject: [PATCH] =?UTF-8?q?Ocultar=20bot=C3=B3n=20de=20'Generar=20Salida'?=
 =?UTF-8?q?=20dependiendo=20si=20el=20folio=20ya=20tiene=20un=20movimiento?=
 =?UTF-8?q?=20de=20salida=20existente=20+=20Col=20Mov.=20Salida?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

CAMBIOS BD (VENTAS):
PA_Acum_FoliosGarantiaGet, left join Inv_Movimientos
+ Cols CveMovimiento, Folio
---
 Acumuladores/CatFoliosGarantia.aspx    |  3 ++-
 Acumuladores/CatFoliosGarantia.aspx.vb | 18 +++++++++++++++++-
 2 files changed, 19 insertions(+), 2 deletions(-)

diff --git a/Acumuladores/CatFoliosGarantia.aspx b/Acumuladores/CatFoliosGarantia.aspx
index 9633d73ca..9d44d0e67 100644
--- a/Acumuladores/CatFoliosGarantia.aspx
+++ b/Acumuladores/CatFoliosGarantia.aspx
@@ -121,7 +121,7 @@
                     <ContentTemplate>
 
                         <asp:GridView ID="GvFolioGarantia" runat="server" AutoGenerateColumns="False"
-                            DataKeyNames="CveFolioGarantia,FolioGarantia,CveEstatus,Estatus,CveUsuario,Usuario,FechaIng,SubProyecto,CveSubProyecto,tipoFolio,Limite"
+                            DataKeyNames="CveFolioGarantia,FolioGarantia,CveEstatus,Estatus,CveUsuario,Usuario,FechaIng,SubProyecto,CveSubProyecto,tipoFolio,Limite,CveMovimiento"
                             EmptyDataText="No se encontraron registros" ToolTip="Listado de Folios de Garantía"
                             CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn"
                             data-sort="true"
@@ -170,6 +170,7 @@
                                         <asp:Literal ID="lblUsuario" runat="server" Text='<%# Eval("Usuario") %>'></asp:Literal>
                                     </ItemTemplate>
                                 </asp:TemplateField>
+                                <asp:HyperLinkField HeaderText="Mov. Salida" DataTextField="CveMovimiento" DataNavigateUrlFields="CveMovimiento" DataNavigateUrlFormatString="/Inventarios/EntradasSalidas.aspx?CveMovimiento={0}" Target="_blank" ControlStyle-CssClass="Texto"/>
 
                                 <asp:TemplateField ItemStyle-HorizontalAlign="Right" ItemStyle-Width="80px">
                                     <ItemTemplate>
diff --git a/Acumuladores/CatFoliosGarantia.aspx.vb b/Acumuladores/CatFoliosGarantia.aspx.vb
index 739276730..1ac31b0e6 100644
--- a/Acumuladores/CatFoliosGarantia.aspx.vb
+++ b/Acumuladores/CatFoliosGarantia.aspx.vb
@@ -20,6 +20,21 @@ Partial Class Acumuladores_CatFoliosGarantia
 
     End Property
 
+    Private Property CveMovimiento As Integer
+        Get
+            If ViewState("CveMovimiento") IsNot Nothing Then
+                Return ViewState("CveMovimiento").ToString.ToEntero
+            Else
+                Return -1
+            End If
+
+        End Get
+        Set(value As Integer)
+            ViewState("CveMovimiento") = value
+        End Set
+
+    End Property
+
     Private Property Actualizar As Boolean
         Get
             If Not ViewState("Actualizar") Is Nothing Then
@@ -219,13 +234,14 @@ Partial Class Acumuladores_CatFoliosGarantia
         Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
 
         CveFolioGarantia = GvRow.DataKey("CveFolioGarantia")
-
+        CveMovimiento = IIf(GvRow.DataKey("CveMovimiento") <> "", GvRow.DataKey("CveMovimiento"), -1)
         LblFolio.Text = GvRow.DataKey("FolioGarantia")
 
         Using ObjAcum As New ClsAcumuladores
             If ObjAcum.GetFoliosGarantiasDetalle(CveFolioGarantia, CveEstatusConsecutivo:=DdlEstatusConsecutivo.SelectedValue.ToEntero()) Then
                 GvGarantiasDetalle.DataSource = ObjAcum.DtResultados
                 HplGenerarSalida.NavigateUrl = "/Inventarios/TraspasoAlmacen.aspx?CveFolioGarantia=" & CveFolioGarantia
+                HplGenerarSalida.Visible = (CveMovimiento = -1)
             End If
         End Using
         GvGarantiasDetalle.DataBind()