FoxPro/Visual FoxPro - duda sobre sistema de captura

 
Vista:

duda sobre sistema de captura

Publicado por neo (296 intervenciones) el 15/06/2006 16:02:09
Saludos...

Tengo una duda sobre sistema de captura:

Yo he visto que en algunos sistemas, sobre todo de captura (Ya saben esos donde registran muchos nombres de personas u cosas). Cuando van escribiendo por ejemplo: El nombre completo, van apareciendo otros datos de este registro, como su dirección, colonia, teléfono, etc.

Lo que yo deseo hacer es que por ejemplo: si una persona ya ha sido capturada, y que aparezca de nuevo y tengan que volver a capturar, que cuando empiecen a escribir vaya apareciendo sus datos.

En otras palabras que el sistema me detecte si ese registro ya existe.

Quiero que lo haga en un form de textbox y no quiero utilizar grid, mejor aun no utilizo ningun grid.

seria algo así: (textbox)

nombre completo: direccion
Jorge alberto sanchez moreno Guerrero 2520

telefono colonia
715-25-30 Infonavit


Espero haberme explicado.

Gracias de antemano
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

RE:duda sobre sistema de captura

Publicado por Ernesto Hernandez (4623 intervenciones) el 15/06/2006 17:40:33
Para validar si ya existe el registro podrias usar algo como esto donde va a checar si el registro existe en la base de datos y creas 2 Metodos en tu forma.
1. DisplayData <- este procedimiento te desplegara los datos si existen
2. NewReg <- este le dara de alta al registro si no existe


WITH THISFORM
IF SEEK(CurCli.CLI_NUM,"CLI",1)
MESSAGEBOX("Cliente ya se encuentra registrado en la base de datos... ",48+4096,"SISTEMAS")
THISFORM.displaydata
.BARRahn1.ENabledisablebuttons
ELSE
THISFORM.NewReg .BARRahn1.Enabledisablebuttons
ENDIF

ENDWITH


Metodo DisplayData
IF RECCOUNT("CLI")<>0
SELECT CLI
SCATTER TO oArray
SELECT CurCli
GO TOP
GATHER FROM oArray
REPLACE CLI_EXPED WITH CLI.CLI_EXPED
replace CLI_expemp WITH curCLI.cli_expemp
ENDIF


Metodo NewReg
Selec CurCli

y aqui creas el registro en blanco
REPLACE campo1 with ""
replace campo2 with 0
replace campo3 with { / / }

si tienes dudas no dudes en preguntar ;-)

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

RE:duda sobre sistema de captura

Publicado por Jorge (423 intervenciones) el 15/06/2006 18:27:45
Cada textBox contiene una propiedad que es la de "InteractiveChange"
Ahi puedes intentar hacer la validacion de esta forma cada ves que teclees algo, te haria la busqueda y te mostraria los datos que ocupas al ir tecleando...

Intentalo...
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

RE:gracias, ya quedo listo!!

Publicado por neo (296 intervenciones) el 15/06/2006 18:42:53
Gracias Colegas ya quedó listo!!
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
sin imagen de perfil

RE:gracias, ya quedo listo!!

Publicado por Ernesto Hernandez (4623 intervenciones) el 16/06/2006 23:28:03
bIEN cómpañero espero te haya servido la informacion

Estamos para servirte

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