Gracias A todos. Solucione Lo de la busqueda utilizando una con consulta sql y un cursor (SELECT * FROM <CURSOR1> where ... INTO CURSOR <CURSOR2>), pero la grilla me sigue penando. Explicaré con más claridad lo que pasa: los objetos textbox de la grilla no reacciona ante los eventos valid o interchange, que ya estan definidos y codificados. ni siquiera ante el evento DBLclick. Además, al refrescarla no muestra la configuración de los formatos definidos en cada objeto textbox y solo me los muestra cuando cliqueo cada celda textbox ; una vez que la celda pierde el foco pierde el formato, cuando debiera estar mostrandolo siempre. La definición de formato de la grilla lo hago en el evento init del formulario, en el cual defino el recordsource,el recordtype, el columncount, los nombres de las columnas, las propiedades de los objetos header y textbox.
ejemplo
evento init
THISFORM.GRID.RECORDSOURCE= "PAS"
THISFORM.GRID.RECORDSOURCETYPE= 1
THISFORM.GRID.COLUMNCOUNT=4
THISFORM.GRID.Columns(1).Name = "CNombre"
THISFORM.GRID.COLUMNS(1).HNOMBRE.CAPTION = "Nombre"
THISFORM.GRID.COLUMNS(1).HNOMBRE.FONTBOLD=.T.
THISFORM.GRID.COLUMNS(1).HNOMBRE.FONTNAME = "Tahoma"
THISFORM.GRID.COLUMNS(1).HNOMBRE.FONTSIZE = 7
THISFORM.GRID.COLUMNS(1).HNOMBRE.ALIGNMENT = 6
THISFORM.GRID.COLUMNS(1).WIDTH = 250
THISFORM.GRID.COLUMNS(1).ControlSource = "nombre"
THISFORM.GRID.COLUMNS(1).TNOMBRE.READONLY = .T.
THISFORM.GRID.COLUMNS(1).TNOMBRE.ALIGNMENT= 0
THISFORM.GRID.REFRESH()
el cursor "PAS" es temporal.
Luego cuando se llena ese cursor se llama a un procedimiento llena_grid para lugo mostrarla.
Ejemplo
procedimiento llena_grid
THISFORM.GRID.RECORDSOURCE= "PAS"
THISFORM.GRID.RECORDSOURCETYPE= 1
THISFORM.GRID.COLUMNCOUNT=4
THISFORM.GRID.Columns(1).Name = "CNombre"
THISFORM.GRID.COLUMNS(1).HEADER1.CAPTION = "Nombre"
THISFORM.GRID.COLUMNS(1).HEADER1.FONTBOLD=.T.
THISFORM.GRID.COLUMNS(1).HEADER1.FONTNAME = "Tahoma"
THISFORM.GRID.COLUMNS(1).HEADER1.FONTSIZE = 7
THISFORM.GRID.COLUMNS(1).HEADER1.ALIGNMENT = 6
THISFORM.GRID.COLUMNS(1).WIDTH = 250
THISFORM.GRID.COLUMNS(1).ControlSource = "nombre"
THISFORM.GRID.COLUMNS(1).TEXT1.READONLY = .T.
THISFORM.GRID.COLUMNS(1).TEXT1.ALIGNMENT= 0
THISFORM.GRID.REFRESH()
Aclaro que estas son columnas de ejemplo.
Bueno ese es mi problema espero que me entiendan y me ayuden
de ante manos muchas gracias