FoxPro/Visual FoxPro - busqueda en fox pro

 
Vista:

busqueda en fox pro

Publicado por Selene Moreno (6 intervenciones) el 07/04/2009 06:18:54
Hola
lo que pasa esque quiero realizar la busqueda de datos a travez de una clave
pero no se como
por ejemplo
que ponga el id del articulo y m aparezcan el resto de los datos
como el nombre, proveedor, existencia y eso m podrian ayudar
x favor.
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
sin imagen de perfil
Val: 29
Ha aumentado su posición en 3 puestos en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

RE:busqueda en fox pro

Publicado por Javier (271 intervenciones) el 07/04/2009 13:48:25
Hola:
Es un formulario lo que estás haciendo? Podrías detallar un poco más ?
Consulta los comandos LOCATE , SEEK y las funciones Found() y Eof()
Saludos.
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 en fox pro

Publicado por Carlos AC (1 intervención) el 07/04/2009 19:52:47
en el lostfocus de la caja de texto donde ingresas el ID utiliza un
LOCATE FOR tabla.campo = DATO ID
IF FOUND()
THISFORM.TEXT1.VALUE = DATO 1 (Ejm nombre)
...
ELSE
WAIT WINDOWD(" NO EXISTE") NO WAIT
ENDIF

esto varia si lo vas a presentar en un grid...

suerte Selene...
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 en fox pro

Publicado por ANDRES CORTEZ M (162 intervenciones) el 09/04/2009 11:58:29
HOLA SELENE

en el lostfocus del text1 donde ingresa la clave escribes

select * from tabla where ALLTRIM(thisform.text1.value)==compoabuscar into cursor arctem

select arctem
go top
if bof()
mensaje no se econtro campo clave
else
thisform.text2.value=arctem.nombre
thisform.text3.value=arctem.direccion
thisform.text4.value=arctem.email
..............
endif

otra forma si tu tabla tiene muchos campos y solo quieres sacar algunos
ejemplo

select compoclave,nombre,direccion,email from tabla where ALLTRIM(thisform.text1.value)==campoclave into cursor arctem

select arctem
go top
if bof()
mensaje no se econtro campo clave
else
thisform.text2.value=arctem.nombre
thisform.text3.value=arctem.direccion
thisform.text4.value=arctem.email
endif

- en la rutina de arriba crea un cursor temporal identido a la tabla base
- en la segunda crea un cursor pero solamente con los campos indicados

nota :

tabla = es el nombre de la tabla que vas a buscar

compoclave=es el campo de tu tabla por el cual estas buscando

arctem = es el cursor temporal que se creara

espero te sirva

ACM
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