FoxPro/Visual FoxPro - BUSCA LOS ELIMINADOS

   
Vista:

BUSCA LOS ELIMINADOS

Publicado por Sebastian (253 intervenciones) el 26/02/2009 16:04:09
Hola programadores tengo este codigo funciona bien el problema es que me busca hasta los eliminados y no se como puedo hacer para que no haga eso gracias.
SET exact on
SELEC socios
SET order to soc_cod
locate for soc_cod = thisform.text8.value
IF found()then
=messagebox("El Socio Pertenece a la empresa",64,"Mensaje del Sistema")
endif
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:BUSCA LOS ELIMINADOS

Publicado por Angel Ricardo Piedrabuena (88 intervenciones) el 26/02/2009 16:31:26
debes ajustar
SET DELETED OFF

Saludos cordiales
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:BUSCA LOS ELIMINADOS (

Publicado por Angel Ricardo Piedrabuena (88 intervenciones) el 26/02/2009 16:37:25
Me corrijo
El comando SET DELETE esté en OFF por defecto
Lo debes ajustar a
SET DELETED ON

Saludos Cordiales
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:BUSCA LOS ELIMINADOS (

Publicado por HELDER MARTINEZ (COUNDY)  (710 intervenciones) el 26/02/2009 17:00:09
SET DELETE ON

EN EL INIT DE TU FORM, O EN EL PROGRAMA PRINCIPAL

SALUDES
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:BUSCA LOS ELIMINADOS

Publicado por kong (681 intervenciones) el 26/02/2009 19:42:44
o en su defecto

locate for soc_cod = thisform.text8.value and not deleted()
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:BUSCA LOS ELIMINADOS

Publicado por Sebastian (253 intervenciones) el 26/02/2009 22:31:17
GRACIAS AMIGOS POR LA INFORMACION
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