From 25e20985c86b7c85387fb4337739d629ef0b8c8d Mon Sep 17 00:00:00 2001 From: rrene Date: Wed, 3 Jan 2024 17:28:03 -0700 Subject: [PATCH] cambios alamcen --- Ventas/Clientes.aspx | 57 ++++++++++++++++++++++------------------- Ventas/Clientes.aspx.vb | 4 +-- 2 files changed, 32 insertions(+), 29 deletions(-) diff --git a/Ventas/Clientes.aspx b/Ventas/Clientes.aspx index 4d8c5d0db..893ba9fe4 100644 --- a/Ventas/Clientes.aspx +++ b/Ventas/Clientes.aspx @@ -5200,27 +5200,33 @@ -
- - - - +
+
+ + + + +
+ +
+ + + + +
- -
- - - - -
- -
- - - -
- - +
+
+ + + +
+
+ + + +
+
@@ -5256,7 +5262,7 @@
-
+
-
- - - +
-
+
diff --git a/Ventas/Clientes.aspx.vb b/Ventas/Clientes.aspx.vb index 48cf8ebd8..9a6b8334a 100644 --- a/Ventas/Clientes.aspx.vb +++ b/Ventas/Clientes.aspx.vb @@ -1205,7 +1205,7 @@ Partial Class Clientes CargaVendedores() - CargaCorporativo() + 'CargaCorporativo() CargaMetodosPago33() CargaFormaPago33() @@ -3072,7 +3072,7 @@ Partial Class Clientes Else ProcesoOK = False End If - ObjCliente.Dispose() + Else If ObjCliente.AddSucursal(CveCliente, TxtNombreSucursal.Text.Trim, UsuarioActual.CveUsuario, TxtCiudadSucursal.Text.Trim, TxtColoniaSucursal.Text.Trim, TxtCPSucursal.Text.Trim, TxtDireccionSucursal.Text.Trim, TxtEstadoSucursal.Text.Trim, TxtLocalidadSucursal.Text.Trim, TxtPaisSucursal.Text.Trim, TxtNumExtSucursal.Text.Trim, TxtNumIntSucursal.Text.Trim, TxtTelefonoSucursal.Text.Trim.Replace(" ", "").Replace("(", "").Replace(")", "").Replace("-", ""), TxtCorreoSucursal.Text.Trim, TxtCorreoSucursalCotizacion.Text.Trim, TxtContactoSucursal.Text.Trim,