From 7ea9d8f11a2208c11586c8ab4fdbbf5984c0cc39 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Fri, 3 May 2024 19:45:34 -0700
Subject: [PATCH] =?UTF-8?q?--=20tipo=20de=20pago,=20previo=20al=20registro?=
 =?UTF-8?q?=20del=20dep=C3=B3sito?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Bancos/DepositosCaja.aspx    | 16 ++++++++++++++--
 Bancos/DepositosCaja.aspx.vb | 10 ++++++----
 2 files changed, 20 insertions(+), 6 deletions(-)

diff --git a/Bancos/DepositosCaja.aspx b/Bancos/DepositosCaja.aspx
index 45747d1ea..ec3f491a6 100644
--- a/Bancos/DepositosCaja.aspx
+++ b/Bancos/DepositosCaja.aspx
@@ -147,9 +147,9 @@
             <div class="row" style="margin-bottom: 5px">
 
                 <div class="col-md-1" runat="server">
-                    <label style="">Cuenta Depósito:</label>
+                    <label style="">Cuenta:</label>
                 </div>
-                <div class="col-md-3" runat="server">
+                <div class="col-md-2" runat="server">
                     <asp:DropDownList ID="DdlCuentaDeposito" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="NumCuentaMoneda" DataValueField="CveCuenta" Width="100%"></asp:DropDownList>
                 </div>
 
@@ -171,6 +171,18 @@
                         <ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender2" runat="server" HighlightCssClass="vco" TargetControlID="CompareValidator1" Width="350px"></ajax:ValidatorCalloutExtender>
                     </div>
                 </div>
+                <div class="col-md-1" runat="server" id="divTipoPago1">
+                    <label style="width: 70px;">Forma:</label>
+                </div>
+                <div class="col-md-1" runat="server" id="divTipoPago" >
+                     <asp:DropDownList ID="DdlTipoDeposito" runat="server" Width="75px" AppendDataBoundItems="true" DataTextField="NumCuentaMoneda" AutoPostBack="true" DataValueField="CveCuenta" OnSelectedIndexChanged="DdlTipoPago_SelectedIndexChanged" Class="table-group-action-input form-control input-inline input-small input-sm select2me">                       
+                         <asp:ListItem Value="13" Text="Efectivo" Selected="True"></asp:ListItem>
+                         <asp:ListItem Value="3" Text="Cheque"></asp:ListItem>
+                         <asp:ListItem Value="11" Text="Tarjeta de Débito"></asp:ListItem>
+                         <asp:ListItem Value="12" Text="Tarjeta de Crédito"></asp:ListItem>
+                         <asp:ListItem Value="8" Text="Transferencia"></asp:ListItem> 
+                     </asp:DropDownList>
+                </div>
                 <div class="col-md-1" runat="server" id="divFolio" visible="false">
                     <div class="row">
                         <label style="width: 70px;">Folio:</label><asp:TextBox ID="TxtFolio" Width="60px" runat="server"></asp:TextBox>
diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb
index ca047fa89..9551eba19 100644
--- a/Bancos/DepositosCaja.aspx.vb
+++ b/Bancos/DepositosCaja.aspx.vb
@@ -61,6 +61,8 @@ Partial Class Bancos_DepositosCaja
             DivRowCuenta.Visible = True
         End If
 
+        If UsuarioActual.CveEmpresa.Contiene(140, 141) Then divTipoPago.Visible = False : divTipoPago1.Visible = False
+
         DdlSubProyectos.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa)
         DdlSubProyectos.DataBind()
         DdlSubProyectos.Items.Insert(0, New ListItem("Todos", "-1"))
@@ -284,15 +286,15 @@ Partial Class Bancos_DepositosCaja
                 End If
 
             End If
-            Dim CveTransaccionBanco As Integer = 13
+            Dim CveTransaccionBanco As Integer = DdlTipoDeposito.SelectedValue.ToEntero
 
             If TotalImporte < 0 Then 'que es una devolución, entonces como es negativo, se cambia el concetpo de bancos, por condición de trigger
                 CveTransaccionBanco = 6
             End If
 
-            If DdlTipoPago.SelectedValue.Contiene("11", "12") Then ' cuando son pagos con tarjetas
-                CveTransaccionBanco = DdlTipoPago.SelectedValue.ToEntero
-            End If
+            'If DdlTipoPago.SelectedValue.Contiene("11", "12") Then ' cuando son pagos con tarjetas
+            '    CveTransaccionBanco = DdlTipoPago.SelectedValue.ToEntero
+            'End If
 
             'código temporal, para claudia y toñita, monge, anadelia, alba,patricia
             If UsuarioActual.CveUsuario.Contiene(1937, 2452, 3358, 3033, 2897, 2560) Then