From e58f2ece36b8d38f5405fe22f48e0393d96ee1d2 Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Mon, 21 Apr 2025 14:42:36 -0700
Subject: [PATCH] =?UTF-8?q?--Sob/Fal=20en=20impresi=C3=B3n=20de=20poliza?=
 =?UTF-8?q?=20en=20deposito=20de=20caja?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Bancos/DepositosCaja.aspx    |  2 +-
 Bancos/DepositosCaja.aspx.vb | 11 ++++++++++-
 2 files changed, 11 insertions(+), 2 deletions(-)

diff --git a/Bancos/DepositosCaja.aspx b/Bancos/DepositosCaja.aspx
index 085d86b98..599a630af 100644
--- a/Bancos/DepositosCaja.aspx
+++ b/Bancos/DepositosCaja.aspx
@@ -372,7 +372,7 @@
         <ContentTemplate>
             <br />
             <div style="height: 250px; overflow-x: scroll">
-                <asp:GridView ID="GvFacturas" runat="server" AutoGenerateColumns="False" DataKeyNames="CveVenta, CvePrePoliza, CveIE, TipoCambio, CveMoneda, CveCliente, Importe, SerieFolio,CveCuenta,CveSubProyecto" CssClass="table table-striped table-advance table-hover" Style="text-align: center; float: right; width: 100%;" GridLines="None">
+                <asp:GridView ID="GvFacturas" runat="server" AutoGenerateColumns="False" DataKeyNames="CveVenta, CvePrePoliza, CveIE, TipoCambio, CveMoneda, CveCliente, Importe, SerieFolio,CveCuenta,CveSubProyecto,SobranteFaltante" CssClass="table table-striped table-advance table-hover" Style="text-align: center; float: right; width: 100%;" GridLines="None">
                     <Columns>
                         <asp:TemplateField>
                             <HeaderTemplate>
diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb
index 0ae16b335..77b25a49a 100644
--- a/Bancos/DepositosCaja.aspx.vb
+++ b/Bancos/DepositosCaja.aspx.vb
@@ -323,8 +323,17 @@ Partial Class Bancos_DepositosCaja
                 End If
             End If
 
-            NuevaCvePrePoliza = ObjConta.AddPrePolizas("DepCaja", 13, TotalImportePrePoliza, TotalImportePrePoliza, CveMoneda, Fecha, $"Depósito Bancario - {DdlTipoDeposito.SelectedItem.Text}", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveTipoPoliza:=1)
+            Dim ImporteSobFaltante As Decimal = 0
 
+            If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
+                For Each Gvr As GridViewRow In GvFacturas.Rows
+                    If Gvr.FCCheckBox("ChkFactura").Checked Then
+                        ImporteSobFaltante += Gvr.DataKey("SobranteFaltante").ToDecimal()
+                    End If
+                Next
+            End If
+
+            NuevaCvePrePoliza = ObjConta.AddPrePolizas("DepCaja", 13, TotalImportePrePoliza, TotalImportePrePoliza, CveMoneda, Fecha, $"Depósito Bancario - {DdlTipoDeposito.SelectedItem.Text} {If(ImporteSobFaltante <> 0, $"- Sobrante/faltante: ${ImporteSobFaltante:N2}", "")}", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveTipoPoliza:=1)
 
 
             Dim CveTransaccionBanco As Integer = DdlTipoDeposito.SelectedValue.ToEntero