diff --git a/Ventas/Clientes.aspx.vb b/Ventas/Clientes.aspx.vb
index e7ad27b0c..5e15b2c02 100644
--- a/Ventas/Clientes.aspx.vb
+++ b/Ventas/Clientes.aspx.vb
@@ -2787,7 +2787,8 @@ Partial Class Clientes
         TxtNumeroCuenta.Text = ""
         DdlMetodoPagoSucursal.SelectedIndex = 0
         UpAgregarSucursal.Update()
-
+        Me.CveClienteSuc = -1
+        Me.Actualizar = False
         txtLg.Text = ""
         txtLt.Text = ""
         HDMAPOP.Value = "2"
@@ -2896,11 +2897,11 @@ Partial Class Clientes
         UpAgregarSucursal.Update()
         CargaDdlSucursalCliente()
         ObjCliente.Dispose()
-        RegistraScript("hideDivEC();")
-        Actualizar = False
-
-
 
+        Me.Actualizar = False
+        Me.CveClienteSuc = -1
+        RegistraScript("hideDivEC();")
+
     End Sub
     Protected Sub LnkAgragarDireccion_Click(sender As Object, e As EventArgs)
 
@@ -2971,8 +2972,8 @@ Partial Class Clientes
     End Sub
     Protected Sub GvDatos_RowEditing(sender As Object, e As System.Web.UI.WebControls.GridViewEditEventArgs) Handles GVSucursales.RowEditing
 
-        Actualizar = True
-        CveClienteSuc = GVSucursales.DataKeys(e.NewEditIndex).Value.ToString.ToEntero
+        Me.Actualizar = True
+        Me.CveClienteSuc = GVSucursales.DataKeys(e.NewEditIndex).Value.ToString.ToEntero
 
 
         Dim ObjCliente As New ClsClientes