Consulta select

Hola tenemos 2 textbox uno para el nombre y el otro para el apellido, lo que queremos es que no haya 2 clientes con el mismo nombre y apellido. Es decir, se agregan un cliente con el nombre (Alejandro Sosa) no se pueda ingresar de nuevo. Te dejo el codigo
SELECT * FROM clientes WHERE clientes.apellido = apel AND clientes.nombre = nomb;
    INTO CURSOR tempo
Por ejemplo si queremos agregar Ale Sosa, no nos permite porque ya esta en la tabla Alejandro Sosa.
Pero si hacemos Ales Sosa no hay problema.
Gracias Saludos

1 Respuesta

Respuesta
1
Luego para saber si hay una coincidencia
If reccount('tempo')>0
  Messagebox('ya existe')
Endif
Excelente, pero el problema es que en la base de datos existe un Alejandro sosa por ejemplo, y nosotros queremos agregar un Ale sosa, con el select que te mostramos y el ejemplo que nos diste, nos dice que existe, parece que toma la coincidencia de las primeras letras, es decir Alejandro = Ale. Gracias
usa set exact on y al hacer la consulta puedes vquitarle los espacios en blanco nombre=alltrim(thisform.txtnombre.value)
Tenemos un programa principal donde seteamos, ahí agregamos el set exact on, pero el problema persiste, este es el código que tenemos.
nomb = ALLTRIM(UPPER(thisform.text1.Text))
apel = ALLTRIM(UPPER(thisform.text2.Text))
...
SELECT * FROM clientes WHERE clientes.apellido = apel AND clientes.nombre = nomb;
    INTO CURSOR temp
IF reccount("tempo") > 0 then  
        MESSAGEBOX("El cliente ya existe en la base de datos")
ELSE
gracias de todos modos, solucione el problema con el set exact on y en vez de = puse == asi
SELECT * FROM clientes WHERE clientes.apellido == apel AND clientes.nombre == nomb;
    INTO CURSOR tempo
;-)

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas