FoxPro/Visual FoxPro - Formularios

 
Vista:

Formularios

Publicado por victor espinosa (7 intervenciones) el 13/06/2005 23:42:07


Favor ayudarmen con lo siguiente, estoy haciendo un formulario, necesito que el usuario digite un codigo y al dar enter vaya a la tabla de proveedores y si esta muestre los datos del proveedor en el formulario y si no esta que de un mensaje de error y de la opcion de digitar otro.


Muchas gracias.
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:Formularios

Publicado por Pedro L. (9 intervenciones) el 23/08/2005 14:53:51
Victor:

Lo que necesitas seria algo similar a esto:

En el Valid del TXT deberias poner lo siguiente

this.value = upper(this.value)
sele PROVEEDORES && (O la tabla que necesites)
if !empty(this.value)
set order to codigo && (El orden que te permita buscar por el codigo)
seek this.value
if found()
scatter memvar
thisform.refresh
else
messagebox("Cuenta inexistente", 48, "Cuentas")
this.value = ""
return .f.
endif
endif

Con esto deberia funcionar.

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