FoxPro/Visual FoxPro - busqueda no funciona

 
Vista:
sin imagen de perfil

busqueda no funciona

Publicado por jorge alfredo (45 intervenciones) el 01/04/2004 18:39:19
saludos a todos
una pregunta tengo una tabla con un campo tipo numerico de 10, entre otros. Lo que sucede es que no se porque razon no me funciona una busqueda, la cual siempre me dice que existe determindado valor, almacenado en la tabla; que en realidad no existe.
mi codigo es así
local lncode
lncode =thisform.txt.value
select mitabla
set order to idsocio
seek (lncode)
if found()
Wait"codigo existe, no se admite"windo
else
=tableupdate
cual puede ser el error, si mi tabla no tiene ningun dato guardo, siempre me da codigo exite
gracias recuerden que el campo es numerico
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:busqueda no funciona

Publicado por Roman Suazo (2723 intervenciones) el 01/04/2004 19:17:34
Usa SET DELETE ON antes de ejecutar la busqueda, posiblemente ya se habia creado
un registro anteriomente con el codigo que buscas (ahora esta marcado como borrado).
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:busqueda no funciona

Publicado por Mauro (43 intervenciones) el 13/04/2004 20:17:49
Jorge:
1) Definí una variable con 0 para hacerla numérica (m_indice = 0).
2) Asigná esta variable al TextBox, donde ingresas dicho valor.
3) No uses seek ni find, poné lo siguiente
select mi tabla
go top
locate for mitabla.id_socio = m_socio
if found()
?"el socio existe"
else
-------el proceso que quieras
endif

P.D.: Asegurate de que el campo indice de tu tabla sea numérica, igual que la variable que utilizas.
Creo que seek() no funciona con indices de tabla numéricos, averiguá.
De esta forma que te comento, no necesitas tener índice para hacer la búsqueda.
Suerte.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar