From bb41ab62519d11367db64adeb7137c5f241ebe9d Mon Sep 17 00:00:00 2001
From: JPerez <jonathan.perez@asdsistemas.mx>
Date: Fri, 20 Jun 2025 20:01:19 -0700
Subject: [PATCH] --Obs al saldar IxC

---
 Bancos/RepIngresosPorComprobar.aspx    | 18 +++++++++++++-----
 Bancos/RepIngresosPorComprobar.aspx.vb | 15 ++++++++++-----
 2 files changed, 23 insertions(+), 10 deletions(-)

diff --git a/Bancos/RepIngresosPorComprobar.aspx b/Bancos/RepIngresosPorComprobar.aspx
index f0c84a439..928e41330 100644
--- a/Bancos/RepIngresosPorComprobar.aspx
+++ b/Bancos/RepIngresosPorComprobar.aspx
@@ -282,7 +282,7 @@
                         <div class="row">
                             <div class="col-md-2" style="text-align: left">Fecha:</div>
                             <div class="col-md-2">
-                                 <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 120px !important; padding: 0px;">
+                                <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 120px !important; padding: 0px;">
                                     <asp:TextBox ID="TxtFecha" CssClass="form-control input-sm ADSMaskDate" Style="width: 118px" runat="server"></asp:TextBox>
                                     <span class="input-group-btn ">
                                         <asp:LinkButton ID="LnkCortfecha" class="btn default " Text=" <i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
@@ -294,11 +294,19 @@
                                 </div>
                             </div>
                         </div>
-                        <div class="row"> 
-                             <div class="col-md-2" style="text-align: left">SubProyecto:</div>
+                        <br />
+                        <div class="row">
+                            <div class="col-md-2" style="text-align: left">SubProyecto:</div>
                             <div class="col-md-4">
-                                     <asp:DropDownList ID="DdlSubProyectoSaldar" runat="server" DataTextField="SubProyecto" DataValueField="CveSubProyecto" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-sm select2me" Width="100%">
-                                        </asp:DropDownList>                                                                     
+                                <asp:DropDownList ID="DdlSubProyectoSaldar" runat="server" DataTextField="SubProyecto" DataValueField="CveSubProyecto" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-sm select2me" Width="100%">
+                                </asp:DropDownList>
+                            </div>
+                        </div>
+                        <br />
+                        <div class="row">
+                            <div class="col-md-2" style="text-align: left">Observaciones:</div>
+                            <div class="col-md-10">
+                                <asp:TextBox ID="TxtObservaciones" Text="" Rows="3" TextMode="MultiLine" CssClass="Widthall form-control input-sm" runat="server" />
                             </div>
                         </div>
                     </div>
diff --git a/Bancos/RepIngresosPorComprobar.aspx.vb b/Bancos/RepIngresosPorComprobar.aspx.vb
index 32e006658..12998e47f 100644
--- a/Bancos/RepIngresosPorComprobar.aspx.vb
+++ b/Bancos/RepIngresosPorComprobar.aspx.vb
@@ -267,6 +267,7 @@ Partial Class Bancos_RepIngresosPorComprobar
     End Sub
 
     Protected Sub LnkSaldar_Click(sender As Object, e As EventArgs)
+        TxtObservaciones.Text = ""
         RegistraScript("$('#DivModalSaldar').modal();")
     End Sub
 
@@ -277,16 +278,20 @@ Partial Class Bancos_RepIngresosPorComprobar
         ObjConta.IniciaTransacSQL()
         Dim CvePrePoliza As Integer = 0
         Dim MsgError As String = ""
-        CvePrePoliza = ObjConta.AddPrePolizas("Bancos/RepIngresosPorComprobar", 6, 0, 0, 1, TxtFecha.Text.ToDate, "Saldo de IxC", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
+
+        Dim Obs As String = TxtObservaciones.Text.Trim()
+
+        CvePrePoliza = ObjConta.AddPrePolizas("Bancos/RepIngresosPorComprobar", 6, 0, 0, 1, TxtFecha.Text.ToDate, Obs, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
+
+        Dim FolioPoliza As Integer = ObjConta.FolioPoliza
 
         For Each gr As GridViewRow In GvIPC.Rows
             If gr.FCCheckBox("Chk").Checked Then
-
-                If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, gr.DataKey("Saldo").ToDecimal, gr.DataKey("Saldo").ToDecimal, 92, "", "Saldo de IxC", CveIE:=gr.DataKey("CveIE").ToEntero, CveCliente:=gr.DataKey("CveCliente").ToEntero, CveSubProyecto:=DdlSubProyectoSaldar.SelectedValue.ToEntero) Then
+                If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, gr.DataKey("Saldo").ToDecimal, gr.DataKey("Saldo").ToDecimal, 92, "Saldo de IxC", Obs, CveIE:=gr.DataKey("CveIE").ToEntero, CveCliente:=gr.DataKey("CveCliente").ToEntero, CveSubProyecto:=DdlSubProyectoSaldar.SelectedValue.ToEntero) Then
                     MsgError = "Ocurrio un error al saldar el movimiento"
                 End If
 
-                If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, gr.DataKey("Saldo").ToDecimal, gr.DataKey("Saldo").ToDecimal, 78, "", "Saldo de IxC", CveIE:=gr.DataKey("CveIE").ToEntero, CveSubProyecto:=DdlSubProyectoSaldar.SelectedValue.ToEntero) Then
+                If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, gr.DataKey("Saldo").ToDecimal, gr.DataKey("Saldo").ToDecimal, 78, "Saldo de IxC", Obs, CveIE:=gr.DataKey("CveIE").ToEntero, CveSubProyecto:=DdlSubProyectoSaldar.SelectedValue.ToEntero) Then
                     MsgError = "Ocurrio un error al saldar el movimiento"
                 End If
             End If
@@ -296,7 +301,7 @@ Partial Class Bancos_RepIngresosPorComprobar
             ObjConta.Commit()
             CargaDatos()
 
-            Alert(String.Format("Los movimientos se saldaron correctamente.</br> <br/>Póliza: <b> <a href='/Contabilidad/RegPrePolizas.aspx?CvePrePoliza={0}' class='Texto' target='_blank'>{1}</a><br/>", CvePrePoliza, ObjConta.ContaFolio))
+            Alert(String.Format("Los movimientos se saldaron correctamente.</br> <br/>Póliza: <b> <a href='/Contabilidad/RegPrePolizas.aspx?CvePrePoliza={0}' class='Texto' target='_blank'>{1}</a><br/>", CvePrePoliza, FolioPoliza))
         Else
             ObjConta.RollBack()
             Alert(MsgError, TipoMensaje.MsgError)