-- cambios Estados.

Ventas/Clientes.aspx.vb

@@ -937,27 +937,12 @@ Partial Class Clientes
     Private Sub CargaEstados(Optional ClaveSATPais As String = "MEX")
 
         DdlEstadoSAT.Items.Clear()
-
-        Dim ObjCliente As New ClsClientes
-
-
-
-        If ObjCliente.GetEstados(ClaveSATPais) Then
-            DdlEstadoSAT.DataSource = ObjCliente.DtResultados.Copy
-        End If
-
-
-
-
-        ObjCliente.Dispose()
+        DdlEstadoSAT.DataSource = GlobalDTEstado(ClaveSATPais)
 
         DdlEstadoSAT.DataBind()
-        DdlEstadoSAT.Items.Insert(0, New ListItem("Seleccione", "-1"))
-        'DdlEstadoSAT.SelectedValue = "-1"
-
+        DdlEstadoSAT.Items.Insert(0, New ListItem("Seleccione", "-1"))
         UpDatos.Update()
 
-
     End Sub
 
     Private Sub CargaResponsables()