--FIX , validar que el rfc tenga datos

Ventas/Ventas.aspx.vb

@@ -25233,29 +25233,45 @@ Partial Class Ventas
             DdlRegimenFiscalCliente.DataBind()
             CargaComboCFDICliente()
         Else
-            Dim ObjCliente As New ClsClientes
+
-            If ObjCliente.ValidaClienteRFC(TxtRFCCliente.Text, UsuarioActual.CveEmpresa) Then
+            If TxtRFCCliente.Text.Trim.Length > 2 Then
-                If ObjCliente.DtResultados.Rows.Count > 0 Then
+                Dim ObjCliente As New ClsClientes
-                    RegistraScript("hideDivEC();")
+                If ObjCliente.ValidaClienteRFC(TxtRFCCliente.Text, UsuarioActual.CveEmpresa) Then
-                    ViewState("CveCliente") = ObjCliente.DtResultados(0)("CveCliente").ToString().ToEntero()
+                    If ObjCliente.DtResultados.Rows.Count > 0 Then
-                    HdnCveCliente.Value = ObjCliente.DtResultados(0)("CveCliente").ToString()
+                        RegistraScript("hideDivEC();")
-                    CargaCliente(CveCliente)
+                        ViewState("CveCliente") = ObjCliente.DtResultados(0)("CveCliente").ToString().ToEntero()
-                    UpCliente.Update()
+                        HdnCveCliente.Value = ObjCliente.DtResultados(0)("CveCliente").ToString()
-                Else
+                        CargaCliente(CveCliente)
-                    DivNombreCliente.Visible = True
+                        UpCliente.Update()
-                    DivTipoPersona.Visible = True
+                    Else
-                    DivDireccionCliente.Visible = True
+                        DivNombreCliente.Visible = True
-                    DivNumeroCPCliente.Visible = True
+                        DivTipoPersona.Visible = True
-                    'DivColoniaTelefonoCliente.Visible = True
+                        DivDireccionCliente.Visible = True
-                    DivCiudadLocalidadCliente.Visible = True
+                        DivNumeroCPCliente.Visible = True
-                    DivEstadoPaisCliente.Visible = True
+                        'DivColoniaTelefonoCliente.Visible = True
-                    DivCorreoCuentaCliente.Visible = True
+                        DivCiudadLocalidadCliente.Visible = True
-                    DivBotonesAgregarCliente.Visible = True
+                        DivEstadoPaisCliente.Visible = True
-                    DivFormaCliente.Visible = True
+                        DivCorreoCuentaCliente.Visible = True
-                    divRegimenCliente.Visible = True
+                        DivBotonesAgregarCliente.Visible = True
+                        DivFormaCliente.Visible = True
+                        divRegimenCliente.Visible = True
+                    End If
                 End If
+                ObjCliente.Dispose()
+            Else
+                DivNombreCliente.Visible = True
+                DivTipoPersona.Visible = True
+                DivDireccionCliente.Visible = True
+                DivNumeroCPCliente.Visible = True
+                'DivColoniaTelefonoCliente.Visible = True
+                DivCiudadLocalidadCliente.Visible = True
+                DivEstadoPaisCliente.Visible = True
+                DivCorreoCuentaCliente.Visible = True
+                DivBotonesAgregarCliente.Visible = True
+                DivFormaCliente.Visible = True
+                divRegimenCliente.Visible = True
             End If
-            ObjCliente.Dispose()
+
 
             RFVDireccionC.Visible = True
             RFVNoEC.Visible = True