From 5c2b6105797b5fb13cbe7331c1526ca034c97a16 Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Wed, 15 Jan 2025 21:13:20 -0700
Subject: [PATCH] --FIX datos de cliente

---
 Ventas/PV.aspx.vb     |  2 +-
 Ventas/Ventas.aspx.vb | 24 +++++++++++++-----------
 2 files changed, 14 insertions(+), 12 deletions(-)

diff --git a/Ventas/PV.aspx.vb b/Ventas/PV.aspx.vb
index a1fd84ddd..c2834f001 100644
--- a/Ventas/PV.aspx.vb
+++ b/Ventas/PV.aspx.vb
@@ -6624,7 +6624,7 @@ Partial Class PV
         If ObjCliente.AgregarClienteNoFrecuente(TxtNombreCliente.Text.Trim, TxtDireccionCliente.Text.Trim, TxtNumExtCliente.Text.Trim, TxtNumIntCliente.Text.Trim,
                                                 TxtColoniaCliente.Text.Trim, TxtLocalidadCliente.Text.Trim, TxtCiudadCliente.Text.Trim, DdlEstadoSAT.SelectedValue.ToEntero,
                                                 TxtRFCCliente.Text.Trim, TxtCPCliente.Text.Trim, TxtTelefonoCliente.Text.Trim, TxtCorreoCliente.Text.Trim,
-                                                DdlSubProyectoDatos.SelectedValue.ToEntero(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, "", -1, -1, CvePrecioLista:=CvePrecioLista,
+                                                DdlSubProyectoDatos.SelectedValue.ToEntero(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, "", DdlMetodoCliente.SelectedValue.ToEntero(), DdlFormaCliente.SelectedValue.ToEntero(), CvePrecioLista:=CvePrecioLista,
                                                 RegimenSociedad:=TxtRegimenSociedad.Text, TipoPersona:=TipoPersona, CveRegimenFiscal:=CveRegimenFiscal, CveUsoCFDI:=CveUsoCFDI, Genero:=GeneroCliente) Then
 
             If ObjCliente.DtResultados.Rows.Count > 0 Then
diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 73e45b42b..a12931001 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -12072,6 +12072,10 @@ Partial Class Ventas
         ObjFacturaBonificacion.Cliente.CodigoRegimenFiscal = ClienteCodigoRegimenFiscal
         ObjFacturaBonificacion.Cliente.RegimenFiscal = ClienteRegimenFiscal
 
+        'CLIENTE
+        ObjFacturaBonificacion.CveCliente = CveCliente
+        ObjFacturaBonificacion.SetCliente()
+
         ObjFacturaBonificacion.CveMetodoPago = 1
         ObjFacturaBonificacion.MetodoPago = "Pago en una sola exhibición"
         ObjFacturaBonificacion.ClaveMetodoPagoSAT = "PUE"
@@ -12217,10 +12221,6 @@ Partial Class Ventas
 
         ObjFacturaBonificacion.DtFirmas = DTmpF
 
-        'CLIENTE
-        ObjFacturaBonificacion.CveCliente = CveCliente
-        ObjFacturaBonificacion.SetCliente()
-
         ''SUCURSAL
         'ObjFacturaBonificacion.CveSucursal = DdlSucursal.SelectedValue.ToEntero()
         'ObjFacturaBonificacion.SetSucursalMatriz(Me)
@@ -40681,14 +40681,9 @@ Partial Class Ventas
 
             'GvExist.Columns(0).ItemStyle.Width = New Unit(200, UnitType.Pixel)
             'ORDENA HACIA LA DERECHA LAS CANTIDAD - OJO!! NO SE USO GV.COLUMNS.COUNT PORQUE LAS COLUMNAS GENERADAS EN BEHIND NO LAS RECONOCE
-            For index As Integer = 0 To DtExistencias.Columns.Count - 1
+            For index As Integer = 1 To DtExistencias.Columns.Count - 1
                 For Each gvr As GridViewRow In GvExist.Rows
-                    If index = 0 Then
-                        gvr.Cells(index).Attributes.Add("colspan", "3")
-                    Else
-                        gvr.Cells(index).HorizontalAlign = HorizontalAlign.Right
-                    End If
-
+                    gvr.Cells(index).HorizontalAlign = HorizontalAlign.Right
                 Next
             Next
         End If
@@ -40696,5 +40691,12 @@ Partial Class Ventas
         RegistraScript("$('#DivModalExistenciaTotal').modal('show');")
         UPExist.Update()
     End Sub
+
+    Protected Sub GvExist_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvExist.RowDataBound
+        If e.Row.RowType = DataControlRowType.Header OrElse e.Row.RowType = DataControlRowType.DataRow Then
+            e.Row.Cells(0).Attributes.Add("colspan", "3")
+        End If
+    End Sub
+
 End Class