Tdolphin: se bloquea seek al cambiar el orden de Query
Posted: Mon May 07, 2012 3:41 am
Buenas noches
En una aplicacion tengo la necesidad de brindar al usuario la opcion de hacer busquedas en un query sobre un campo numero o sobre un campo nombre. Si el usuario hace una busqueda en un query ordenado sobre el campo numero y despues hace una busqueda sobre el campo nombre todo funciona bien, pero si despues se vuelve a hacer otra busqueda sobre el campo numero el sistema se bloquea, a continuacion pongo el codigo con un ejemplo del problema:
Saludos
En una aplicacion tengo la necesidad de brindar al usuario la opcion de hacer busquedas en un query sobre un campo numero o sobre un campo nombre. Si el usuario hace una busqueda en un query ordenado sobre el campo numero y despues hace una busqueda sobre el campo nombre todo funciona bien, pero si despues se vuelve a hacer otra busqueda sobre el campo numero el sistema se bloquea, a continuacion pongo el codigo con un ejemplo del problema:
- Code: Select all Expand view
//1.- se ordena por el campo numero y se hace una busqueda (esta busqueda funciona bien)
oQry:setOrder('Numero'+" ASC",.t.)
If oQry:seek('5', 'Numero',,,.f. ) > 0
msginfo('numero 5 encontrado')
else
msginfo('numero 5 no encontrado')
endif
//2.- Se ordena por el campo nombre y se hace una busqueda (esta busqueda funciona bien)
oQry:setOrder('Nombre'+" ASC",.t.)
If oQry:seek('A', 'Nombre',,,.f. ) > 0
msginfo('Nombre A encontrado')
else
msginfo('Nombre A no encontrado')
endif
//3.- se ordena por el campo numero y se hace una busqueda: identico al paso 1, aqui se bloquea el sistema
oQry:setOrder('Numero'+" ASC",.t.)
If oQry:seek('5', 'Numero',,,.f. ) > 0
msginfo('numero 5 encontrado')
else
msginfo('numero 5 encontrado')
endif
Saludos